Ì i 2
diagnoses
[diag.pt.urn]
/AA.DX[aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
diag.pt.urn 30 URN L ADM.PAT aa
diag.alt.desc.group 15 FREE L /AA.DX[aa]|1
diag.grouper.version 10 FREE L /AA.DX[aa]|0
Ì € i 2
diag.dates
[diag.pt.urn, diag.eff.date]
/AA.DX[aa]ED[aaDD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
diag.eff.date 8 DATE L aaDD
Ì € i 2
diag.codes
[diag.pt.urn,diag.eff.date, diag.seq.no]
/AA.DX[aa]ED[aaDD]DX[aaDIN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
diag.seq.no 2 PINT R aaDIN
diag.alt.name 60 FREE L /AA.DX[aa]ED[aaDD]DX[aaDIN]|1
diag.code 7 FREE L /AA.DX[aa]ED[aaDD]DX[aaDIN]|0
diag.confidential.data 1 YN L /AA.DX[aa]ED[aaDD]DX[aaDIN]|2
Ì i 2
main
[patient]
*(A)AA.OE[aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
patient 30 URN L ADM.PAT aa
acct.number 12 FREE L VAL=@ADM.PAT.acct.number
admit.date 8 DATE L VAL=@ADM.PAT.admit.date
age.and.sex 12 FREE L VAL=(@OE.PAT.current.age_" "_@ADM.PAT.sex)
attend.doctor 10 FREE L MIS.DOC VAL=@ADM.PAT.attend.doctor
attend.doctor.name 30 FREE L VAL=@MIS.DOC.name[@ADM.PAT.attend.doctor]
bed 3 FREE L VAL=@ADM.PAT.bed
bsa 4 PDEC2 R VAL=%OE.PAT.calc.bsa(IF{@wt.in.kg;0},IF{@ht.in.cm;0})
ck.location.ok 1 YN L VAL=IF{"N"=@MIS.USER.restricted[@.user] "Y";@MIS.LOCN.
VAL=terminal.x[@.machine,] "Y";+@MIS.LOCN.terminal.x[@
VAL=.machine,""] "N"}
current.age 7 FREE L VAL=IF{"Y"=@MRI.PAT.discharge.disposition's.expired %Z
VAL=.age(@ADM.PAT.computed.birthdate,@MRI.PAT.expire.d
VAL=ate);%Z.age(@ADM.PAT.computed.birthdate)}
dis.summary.printed 1 YN L *(A)AA.OE[aa]|11
display.diet.order 10 URN L OE.ORD *(A)AA.OE[aa]|12
facility 10 FREE L MIS.FACILITY VAL=@ADM.PAT.facility
ht.in.cm 6 DEC2 R *(A)AA.OE[aa]|3
ht.in.ft 1 INT R *(A)AA.OE[aa]|1
ht.in.in 5 DEC2 R *(A)AA.OE[aa]|2
location 10 FREE L MIS.LOCN VAL=@ADM.PAT.location
mri.urn 25 URN L MRI.PAT VAL=@ADM.PAT.mri.urn
name 30 FREE L VAL=@ADM.PAT.name
number.and.name 44 FREE L VAL=(@ADM.PAT.acct.number_" "_@ADM.PAT.name:0S)
orders.restored 1 CHOICE L *(A)AA.OE[aa]|10
patient.on.loa 1 FREE L VAL=("F"=@ADM.PAT.loa.status)!("L"=@ADM.PAT.loa.status
VAL=)!("H"=@ADM.PAT.loa.status)
prt.location 12 FREE L VAL=IF{"t "_@temporary.location'="t ";@ADM.PAT.locatio
VAL=n}
registration.date 8 DATE L VAL=IF{@ADM.PAT.admit.date;@ADM.PAT.service.date}
respon.doctor 10 FREE L MIS.DOC VAL=IF{@ADM.PAT.attend.doctor;@ADM.PAT.er.doctor}
respon.doctor.name 30 FREE L VAL=@MIS.DOC.name[IF{@ADM.PAT.attend.doctor;@ADM.PAT.e
VAL=r.doctor}]
room 10 FREE L MIS.ROOM VAL=@ADM.PAT.room
room.and.bed 14 FREE L VAL=(@ADM.PAT.room_"-"_@ADM.PAT.bed)
screen 0 FREE L
screen.begin 0 FREE L VAL=%OE.PAT.zdisp("")
screen.view 0 FREE L VAL=%OE.PAT.zdisp("")
status 8 CHOICE L VAL=@ADM.PAT.status
status.w.obsv 8 FREE L VAL=@ADM.PAT.status.w.flags
temporary.location 10 FREE L MIS.LOCN *(A)AA.OE[aa]|0
tloc.file.date 8 DATE L *(A)AA.OE[aa]TL|0
tloc.file.time 4 HHMM L *(A)AA.OE[aa]TL|1
tloc.return.date 8 DATE L *(A)AA.OE[aa]TL|2
tloc.return.mins 4 PINT R *(A)AA.OE[aa]TL|4
tloc.return.secs 9 PINT R *(A)AA.OE[aa]TL|5
tloc.return.time 4 HHMM L *(A)AA.OE[aa]TL|3
tray.hold.date 8 DATE L *(A)AA.OE[aa]|7
tray.hold.date.meal 12 FREE L VAL=%Z.date.out(@tray.hold.date,"",5)_" "_@tray.hold.m
VAL=eal
tray.hold.meal 1 CHOICE L *(A)AA.OE[aa]|8
tray.release.time 4 HHMM L *(A)AA.OE[aa]|9
unit.number 10 FREE L VAL=@ADM.PAT.unit.number
urn 30 URN L ADM.PAT
wt.in.kg 7 DEC3 R *(A)AA.OE[aa]|6
wt.in.lb 4 INT R *(A)AA.OE[aa]|4
wt.in.oz 5 DEC2 R *(A)AA.OE[aa]|5
Ì € i 2
loa.meds
[patient, loa.med.order.urn]
*(A)AA.OE[aa]RXLOA[po]
Field Name Len Dat Typ J DPM Offset/Local/VAL
loa.med.order.urn 10 URN L OE.ORD po
Ì € i 2
loa.orders
[patient, loa.order.urn]
*(A)AA.OE[aa]POLOA[po]
Field Name Len Dat Typ J DPM Offset/Local/VAL
loa.order.urn 10 URN L OE.ORD po
Index Files Subscripts/Physical Base
temp.location.x [urn,date,time,MIS.LOCN.mnemonic]
*(A)AA.OETL[aa,aaD,aaT,ggn]
|
|
| | | | |