Ì i 2
pha.medical.records.file (main)
[urn]
?TM[ea]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn 25 URN L MRI.PAT ea
age 7 AGE R VAL=@t.MRI.PAT.age
birthdate 8 BDATE L VAL=@t.MRI.PAT.birthdate
body.surface.area 6 DEC2 R ?TM[ea]PHA|6
current.age 7 FREE L VAL=%Z.age(@t.MRI.PAT.computed.birthdate,PHA.MRI.expir
VAL=e.date)
discharge.disposition 10 FREE L MIS.DIS.DICT VAL=@t.MRI.PAT.discharge.disposition
expire.date 8 DATE L VAL=IF{@MRI.PAT.exp.date;"Y"'=@MIS.DIS.DICT.expired[@M
VAL=RI.PAT.discharge.disposition] "";@MRI.PAT.visit.di
VAL=scharge.date[+@MRI.PAT.visits[urn,""]^XX];99999999
VAL=-(XX#"0|"$8)}
last.update 9 PINT R ?TM[ea]|0
mri.patient 40 URN L
pha.ht.in.cm 5 DEC1 R ?TM[ea]PHA|2
pha.ht.in.ft 1 INT R ?TM[ea]PHA|0
pha.ht.in.in 4 DEC1 R ?TM[ea]PHA|1
pha.wt.in.kg 6 DEC3 R ?TM[ea]PHA|5
pha.wt.in.lb 4 INT R ?TM[ea]PHA|3
pha.wt.in.oz 4 DEC1 R ?TM[ea]PHA|4
sex 1 CHOICE L VAL=@t.MRI.PAT.sex
unit.number 10 FREE L VAL=@t.MRI.PAT.px.unit.number[PHA.MRI.urn,@.mri.pfx]
Ì € i 2
pha.mri.ingred.allergy.codes (allergy.codes)
[urn, allergy.code]
?TM[ea]AC[tta]
Field Name Len Dat Typ J DPM Offset/Local/VAL
allergy.code 10 FREE L PHA.ALLERGY tta
allergy.code.date 8 DATE L VAL=IF{@allergy.code.entered^XX %Z.date.in.magic(XX)}
allergy.code.entered 9 PINT R ?TM[ea]AC[tta]|0
allergy.code.time 4 HHMM L VAL=IF{@allergy.code.entered^XX %Z.time.out(XX)}
allergy.code.user 10 FREE L MIS.USER ?TM[ea]AC[tta]|1
Ì € i 2
pha.mri.ingred.aller.code.text (allergy.codes.text)
[urn,allergy.code, allergy.code.text.q]
?TM[ea]AC[tta]R[ttaR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
allergy.code.text.q 2 PINT R ttaR
allergy.code.text 75 FREE L ?TM[ea]AC[tta]R[ttaR]
Ì € i 2
pha.mri.audit.trail (audit.trail)
[urn, audit.trail.changed,audit.trail.type]
?TM[ea]AU[tmauA,tmauT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.changed 9 PINT R tmauA
audit.trail.type 1 CHOICE L tmauT
audit.trail.date 8 DATE L VAL=%Z.date.in.magic(@audit.trail.changed)
audit.trail.ht.flag 1 FREE L ?TM[ea]AU[tmauA,tmauT]PHA|6
audit.trail.ht.in.cm 5 DEC1 R ?TM[ea]AU[tmauA,tmauT]PHA|2
audit.trail.ht.in.ft 1 INT R ?TM[ea]AU[tmauA,tmauT]PHA|0
audit.trail.ht.in.in 4 DEC1 R ?TM[ea]AU[tmauA,tmauT]PHA|1
audit.trail.text 12 FREE L VAL="ADDED,DELETED,MERGED,UNMERGED,SWITCHED,BYPASSED,A
VAL=CKNOWLEDGED,CHANGED,REVIEWED,NO CHANGES"#(L("ADMUS
VAL=BKCRN",audit.trail.type$1)_",")
audit.trail.time 4 HHMM L VAL=%Z.time.out(@audit.trail.changed)
audit.trail.user 10 FREE L MIS.USER ?TM[ea]AU[tmauA,tmauT]|0
audit.trail.wt.flag 1 FREE L ?TM[ea]AU[tmauA,tmauT]PHA|7
audit.trail.wt.in.kg 6 DEC3 R ?TM[ea]AU[tmauA,tmauT]PHA|5
audit.trail.wt.in.lb 4 INT R ?TM[ea]AU[tmauA,tmauT]PHA|3
audit.trail.wt.in.oz 4 DEC1 R ?TM[ea]AU[tmauA,tmauT]PHA|4
Ì € i 2
pha.mri.audit.trail.class.adrs (audit.trail.class.adrs)
[urn,audit.trail.changed,audit.trail.type, audit.trail.class.adr]
?TM[ea]AU[tmauA,tmauT]CR[tdc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.class.adr 10 FREE L PHA.CLASS tdc
Ì € i 2
pha.mri.audit.trail.classes (audit.trail.classes)
[urn,audit.trail.changed,audit.trail.type, audit.trail.class]
?TM[ea]AU[tmauA,tmauT]C[tdc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.class 10 FREE L PHA.CLASS tdc
Ì € i 2
pha.mri.disease.audit.trail (audit.trail.diseases)
[urn,audit.trail.changed,audit.trail.type, audit.trail.disease]
?TM[ea]AU[tmauA,tmauT]D[ted]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.disease 10 FREE L PHA.DIS ted
Ì € i 2
pha.mri.audit.trail.gen.adrs (audit.trail.generic.adrs)
[urn,audit.trail.changed,audit.trail.type, audit.trail.generic.adr]
?TM[ea]AU[tmauA,tmauT]GR[tdg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.generic.adr 10 FREE L PHA.GENERIC tdg
Ì € i 2
pha.mri.audit.trail.generics (audit.trail.generics)
[urn,audit.trail.changed,audit.trail.type, audit.trail.generic]
?TM[ea]AU[tmauA,tmauT]G[tdg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.generic 10 FREE L PHA.GENERIC tdg
Ì € i 2
pha.mri.audit.trail.ingred.adr (audit.trail.ingred.adrs)
[urn,audit.trail.changed,audit.trail.type, audit.trail.ingred.adr]
?TM[ea]AU[tmauA,tmauT]IR[tta]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.ingred.adr 10 FREE L PHA.ALLERGY tta
Ì € i 2
pha.mri.audit.trail.ingredient (audit.trail.ingredients)
[urn,audit.trail.changed,audit.trail.type, audit.trail.ingredient]
?TM[ea]AU[tmauA,tmauT]I[tta]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.trail.ingredient 10 FREE L PHA.ALLERGY tta
Ì € i 2
pha.mri.class.adrs (class.adrs)
[urn, class.adr]
?TM[ea]CAR[tdc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
class.adr 10 FREE L PHA.CLASS tdc
class.adr.date 8 DATE L VAL=IF{@class.adr.entered^XX %Z.date.in.magic(XX)}
class.adr.entered 9 PINT R ?TM[ea]CAR[tdc]|0
class.adr.time 4 HHMM L VAL=IF{@class.adr.entered^XX %Z.time.out(XX)}
class.adr.user 10 FREE L MIS.USER ?TM[ea]CAR[tdc]|1
Ì € i 2
pha.mri.class.adrs.text (class.adrs.text)
[urn,class.adr, class.adr.text.q]
?TM[ea]CAR[tdc]R[tdcR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
class.adr.text.q 2 PINT R tdcR
class.adr.text 75 FREE L ?TM[ea]CAR[tdc]R[tdcR]
Ì € i 2
pha.mri.class.allergies (class.allergies)
[urn, class.allergy]
?TM[ea]CA[tdc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
class.allergy 10 FREE L PHA.CLASS tdc
class.allergy.date 8 DATE L VAL=IF{@class.allergy.entered^XX %Z.date.in.magic(XX)}
class.allergy.entered 9 PINT R ?TM[ea]CA[tdc]|0
class.allergy.time 4 HHMM L VAL=IF{@class.allergy.entered^XX %Z.time.out(XX)}
class.allergy.user 10 FREE L MIS.USER ?TM[ea]CA[tdc]|1
Ì € i 2
pha.mri.class.allergies.text (class.allergies.text)
[urn,class.allergy, class.allergy.text.q]
?TM[ea]CA[tdc]R[tdcR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
class.allergy.text.q 2 PINT R tdcR
class.allergy.text 75 FREE L ?TM[ea]CA[tdc]R[tdcR]
Ì € i 2
pha.mri.diseases (diseases)
[urn, disease]
?TM[ea]D[ted]
Field Name Len Dat Typ J DPM Offset/Local/VAL
disease 10 FREE L PHA.DIS ted
disease.date 8 DATE L VAL=IF{@disease.entered^XX %Z.date.in.magic(XX)}
disease.entered 9 PINT R ?TM[ea]D[ted]|0
disease.time 4 HHMM L VAL=IF{@disease.entered^XX %Z.time.out(XX)}
disease.user 10 FREE L MIS.USER ?TM[ea]D[ted]|1
Ì € i 2
pha.mri.external.comments (ext.comments)
[urn, ext.com.q]
?TM[ea]C[tmc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ext.com.q 2 PINT R tmc
ext.comment 75 FREE L ?TM[ea]C[tmc]
Ì € i 2
pha.mri.generic.adrs (generic.adrs)
[urn, generic.adr]
?TM[ea]GAR[tdg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
generic.adr 10 FREE L PHA.GENERIC tdg
generic.adr.date 8 DATE L VAL=IF{@generic.adr.entered^XX %Z.date.in.magic(XX)}
generic.adr.entered 9 PINT R ?TM[ea]GAR[tdg]|0
generic.adr.time 4 HHMM L VAL=IF{@generic.adr.entered^XX %Z.time.out(XX)}
generic.adr.user 10 FREE L MIS.USER ?TM[ea]GAR[tdg]|1
Ì € i 2
pha.mri.generic.adrs.text (generic.adrs.text)
[urn,generic.adr, generic.adr.text.q]
?TM[ea]GAR[tdg]R[tdgR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
generic.adr.text.q 2 PINT R tdgR
generic.adr.text 75 FREE L ?TM[ea]GAR[tdg]R[tdgR]
Ì € i 2
pha.mri.generic.allergies (generic.allergies)
[urn, generic.allergy]
?TM[ea]GA[tdg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
generic.allergy 10 FREE L PHA.GENERIC tdg
generic.allergy.date 8 DATE L VAL=IF{@generic.allergy.entered^XX %Z.date.in.magic(XX
VAL=)}
generic.allergy.entered 9 PINT R ?TM[ea]GA[tdg]|0
generic.allergy.time 4 HHMM L VAL=IF{@generic.allergy.entered^XX %Z.time.out(XX)}
generic.allergy.user 10 FREE L MIS.USER ?TM[ea]GA[tdg]|1
Ì € i 2
pha.mri.generic.allergies.text (generic.allergies.text)
[urn,generic.allergy, generic.allergy.text.q]
?TM[ea]GA[tdg]R[tdgR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
generic.allergy.text.q 2 PINT R tdgR
generic.allergy.text 75 FREE L ?TM[ea]GA[tdg]R[tdgR]
Ì € i 2
pha.mri.ingredient.adrs (ingredient.adrs)
[urn, ingredient.adr]
?TM[ea]ACR[tta]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ingredient.adr 10 FREE L PHA.ALLERGY tta
ingredient.adr.date 8 DATE L VAL=IF{@ingredient.adr.entered^XX %Z.date.in.magic(XX)
VAL=}
ingredient.adr.entered 9 PINT R ?TM[ea]ACR[tta]|0
ingredient.adr.time 4 HHMM L VAL=IF{@ingredient.adr.entered^XX %Z.time.out(XX)}
ingredient.adr.user 10 FREE L MIS.USER ?TM[ea]ACR[tta]|1
Ì € i 2
pha.mri.ingredient.adrs.text (ingredient.adrs.text)
[urn,ingredient.adr, ingredient.adr.text.q]
?TM[ea]ACR[tta]R[tdcR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ingredient.adr.text.q 2 PINT R tdcR
ingredient.adr.text 75 FREE L ?TM[ea]ACR[tta]R[tdcR]
Ì € i 2
pha.mri.internal.comments (int.comments)
[urn, int.com.q]
?TM[ea]I[tmi]
Field Name Len Dat Typ J DPM Offset/Local/VAL
int.com.q 2 PINT R tmi
int.comment 75 FREE L ?TM[ea]I[tmi]
Ì € i 2
pha.mri.progress.notes (progress.notes)
[urn, notes.q]
?TM[ea]P[tmP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
notes.q 3 PINT R tmP
notes.category 10 FREE L PHA.NCAT ?TM[ea]P[tmP]|3
notes.date 8 DATE L ?TM[ea]P[tmP]|0
notes.status 1 CHOICE L ?TM[ea]P[tmP]|4
notes.status.name 9 FREE L VAL=IF{@notes.status^XX="A" "Active";XX="I" "Inactive"
VAL=}
notes.time 4 HHMM L ?TM[ea]P[tmP]|1
notes.user 10 FREE L MIS.USER ?TM[ea]P[tmP]|2
notes.user.name 30 FREE L VAL=@MIS.USER.name[@notes.user]
Ì € i 2
pha.mri.progress.notes.at (progress.notes.at)
[urn,notes.q, notes.at.q]
?TM[ea]P[tmP]AT[tmAT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
notes.at.q 3 PINT R tmAT
notes.at.activity 1 CHOICE L ?TM[ea]P[tmP]AT[tmAT]|3
notes.at.activity.name 10 FREE L VAL=IF{@notes.at.activity^XX="A" "Activate";XX="I" "In
VAL=activate";"Enter"}
notes.at.date 8 DATE L ?TM[ea]P[tmP]AT[tmAT]|0
notes.at.terminal 20 FREE L ?TM[ea]P[tmP]AT[tmAT]|4
notes.at.time 4 HHMM L ?TM[ea]P[tmP]AT[tmAT]|1
notes.at.user 10 FREE L MIS.USER ?TM[ea]P[tmP]AT[tmAT]|2
notes.at.user.name 30 FREE L VAL=@MIS.USER.name[@notes.at.user]
Ì € i 2
pha.mri.progrss.notes.text (progress.notes.text)
[urn,notes.q, notes.text.q]
?TM[ea]P[tmP]T[tmPT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
notes.text.q 3 PINT R tmPT
notes.text 80 FREE L ?TM[ea]P[tmP]T[tmPT]
Ì i 2
pha.mri.xfer.log (xfer.log)
[xfer.log.date,xfer.log.time,xfer.log.q]
?TML[tmlDT,tmlTM,tmlQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
xfer.log.date 8 DATE L tmlDT
xfer.log.time 4 HHMM L tmlTM
xfer.log.q 4 PINT R tmlQ
xfer.log.new.mri 25 URN L MRI.PAT ?TML[tmlDT,tmlTM,tmlQ]|2
xfer.log.old.mri 25 URN L MRI.PAT ?TML[tmlDT,tmlTM,tmlQ]|1
xfer.log.patient 30 URN L ADM.PAT ?TML[tmlDT,tmlTM,tmlQ]|3
xfer.log.type 7 CHOICE L ?TML[tmlDT,tmlTM,tmlQ]|0
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
pha.mri.progress.notes.x [notes.date,notes.time,urn,notes.q]
progress.notes.x ?TMD[tmPD,tmPT,ea,tmP]
|
|
| | | | | | | | | | | | | | | | | | | | | | | | | | |