Ì 2
oe.patient.diet.labels (diet.labels)
/LBL
Field Name Len Dat Typ J DPM Offset/Local/VAL
nour 2 FREE L
pt.1 30 URN L ADM.PAT /LBL|1
pt.1.nour.1 60 FREE L VAL=@ADM.PAT.ccdqr.response[@pt.1,c.nour.1]
pt.1.nour.2 60 FREE L VAL=@ADM.PAT.ccdqr.response[@pt.1,c.nour.2]
pt.1.nour.3 60 FREE L VAL=@ADM.PAT.ccdqr.response[@pt.1,c.nour.3]
pt.1.nour.4 60 FREE L VAL=@ADM.PAT.ccdqr.response[@pt.1,c.nour.4]
pt.2 30 URN L ADM.PAT /LBL|2
pt.2.nour.1 60 FREE L VAL=@ADM.PAT.ccdqr.response[@pt.2,c.nour.1]
pt.2.nour.2 60 FREE L VAL=@ADM.PAT.ccdqr.response[@pt.2,c.nour.2]
pt.2.nour.3 60 FREE L VAL=@ADM.PAT.ccdqr.response[@pt.2,c.nour.3]
pt.2.nour.4 60 FREE L VAL=@ADM.PAT.ccdqr.response[@pt.2,c.nour.4]
pt.3 30 URN L ADM.PAT /LBL|3
pt.3.nour.1 60 FREE L VAL=@ADM.PAT.ccdqr.response[@pt.3,c.nour.1]
pt.3.nour.2 60 FREE L VAL=@ADM.PAT.ccdqr.response[@pt.3,c.nour.2]
pt.3.nour.3 60 FREE L VAL=@ADM.PAT.ccdqr.response[@pt.3,c.nour.3]
pt.3.nour.4 60 FREE L VAL=@ADM.PAT.ccdqr.response[@pt.3,c.nour.4]
Ì 2
oe.patient.data (main)
[patient]
*AA.OE[aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
patient 43 FREE L 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.age.out(IF{patient;/patient})_" "_@ADM.PA
VAL=T.sex)
attend.doctor 10 FREE L MIS.DOC.DICT VAL=@ADM.PAT.attend.doctor
attend.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[@ADM.PAT.attend.doctor]
bed 3 FREE L VAL=@ADM.PAT.bed
bsa.formula 30 FREE L *AA.OE[aa]|14
bsa.in.m2 6 FREE L VAL=IF{%Z.calc.bsa.M.formula(@facility,@ADM.PAT.age)^F
VAL=AC_.=(%Z.calc.bsa.M.formula(@facility,@ADM.PAT.age
VAL=)_.) @ADM.PAT.bsa.in.m2.ee;%Z.calc.bsa.M.formula(@
VAL=wt.in.kg,@ht.in.cm,FAC,@ADM.PAT.age)}
bsa.in.m2.ee 6 PDEC2 R *AA.OE[aa]|13
ck.conf 1 YN L VAL=IF{"Y"'=@ADM.PAT.confidential;@MIS.USER.confidenti
VAL=al.pts[@.user]="Y";"N"}
conf.msg 25 FREE L VAL=IF{@OE.PARAM.conf.msg[@.facility];"<Confidentia
VAL=l Patient>"}
current.age 7 FREE L VAL=%OE.PAT.check.discharge.disposition(@MRI.PAT.disch
VAL=arge.disposition,@MRI.PAT.computed.birthdate,@MRI.
VAL=PAT.age,MRI.PAT.urn,%OE.PAT.get.discharge.date(mri
VAL=.urn)^LDISDATE)^A
discharge.date 8 DATE L VAL=@ADM.PAT.discharge.date
facility 10 FREE L MIS.FACILITY VAL=@ADM.PAT.facility
hold.date 8 DATE L *AA.OE[aa]HOLD|0
hold.time 4 HHMM L *AA.OE[aa]HOLD|1
ht.in.cm 6 DEC2 L *AA.OE[aa]|3
ht.in.ft 1 INT L *AA.OE[aa]|1
ht.in.in 5 DEC2 L *AA.OE[aa]|2
ht.wt.file.date 8 DATE L *AA.OE[aa]|15
ht.wt.file.time 4 HHMM L *AA.OE[aa]|16
location 10 FREE L MIS.LOCN.DICT 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)
oe.temp.adm.rfv 49 FREE L *AA.OE[aa]CN|5
oe.temp.cond.comment 59 FREE L *AA.OE[aa]CN|4
oe.temp.pt.condition 10 FREE L MIS.PT.COND *AA.OE[aa]CN|0
oe.temp.visitors.allowed 1 YN L *AA.OE[aa]CN|1
pat.bed 3 FREE L *AA.OE[aa]|12
pat.location 10 FREE L MIS.LOCN.DICT *AA.OE[aa]|10
pat.room 10 FREE L MIS.ROOM.DICT *AA.OE[aa]|11
prt.location 12 FREE L VAL=IF{"t "_@temporary.location'="t ";@ADM.PAT.locatio
VAL=n}
pt.cur.age 7 FREE L VAL=%OE.PAT.age.out(ADM.PAT.urn)
registration.date 8 DATE L VAL=IF{@ADM.PAT.admit.date;@ADM.PAT.service.date}
respon.doctor 10 FREE L MIS.DOC.DICT VAL=IF{@ADM.PAT.attend.doctor;@ADM.PAT.er.doctor}
respon.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[IF{@ADM.PAT.attend.doctor;@ADM.
VAL=PAT.er.doctor}]
resume.date 8 DATE L *AA.OE[aa]HOLD|2
resume.time 4 HHMM L *AA.OE[aa]HOLD|3
room 10 FREE L MIS.ROOM.DICT VAL=@ADM.PAT.room
room.and.bed 8 FREE L VAL=(@ADM.PAT.room_"-"_@ADM.PAT.bed:8T)
screen 0 FREE L VAL=%OE.PAT.zdisp("")
screen.print.pci 0 FREE L VAL=(@.lines.left+1^@.lines.left,%MIS.SCREEN.print.hl(
VAL=/MIS.SCREEN.mnemonic,^@Root(@t.queries[patient]),1
VAL=,0,"",/R.F[""],/R.F["b"]))&""
screen.view 0 FREE L VAL=%OE.PAT.zdisp("")
screen.view.pci 0 FREE L VAL=%MIS.SCREEN.view.hl.screen(z.new,^@Root(@t.queries
VAL=[patient]),10,2,18,88,"",1,1)X
status 8 CHOICE L VAL=@ADM.PAT.status
status.w.obsv 8 FREE L VAL=(@ADM.PAT.status_IF{@ADM.PAT.observation.patient="
VAL=Y" "o"})
temporary.location 10 FREE L MIS.LOCN.DICT *AA.OE[aa]|0
tray.hold.date 8 DATE L *AA.OE[aa]|7
tray.hold.meal 1 CHOICE L *AA.OE[aa]|8
tray.release.time 4 HHMM L *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 L *AA.OE[aa]|6
wt.in.lb 4 INT L *AA.OE[aa]|4
wt.in.oz 5 DEC2 L *AA.OE[aa]|5
Ì € 2
OE.pt.admin.edit.data (edit.data)
[patient, edit.urn]
*AA.OE[aa]E[paaED]
Field Name Len Dat Typ J DPM Offset/Local/VAL
edit.urn 3 URN L paaED
edit.date 8 DATE L *AA.OE[aa]E[paaED]|0
edit.event 63 FREE L *AA.OE[aa]E[paaED]|3
edit.time 4 HHMM L *AA.OE[aa]E[paaED]|1
edit.user 10 FREE L MIS.USER *AA.OE[aa]E[paaED]|2
Ì € 2
oe.pat.queries (queries)
[patient, query]
*AA.OE[aa]R[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
query 10 FREE L MIS.QUERY ggv
response 70 FREE L *AA.OE[aa]R[ggv]|0
response.old 70 FREE L *AA.OE[aa]R[ggv]|1
Ì € 2
oe.pat.mult.queries (mult.queries)
[patient,query, mult.response.q]
*AA.OE[aa]R[ggv]M[ggvN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mult.response.q 3 PINT R ggvN
mult.response 70 QRY.RESP L *AA.OE[aa]R[ggv]M[ggvN]|0
|
|
| | |