Ì 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=(@ADM.PAT.current.age_" "_@ADM.PAT.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
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>"}
facility 10 FREE L MIS.FACILITY VAL=@ADM.PAT.facility
ht.in.cm 5 DEC1 R *AA.OE[aa]|3
ht.in.ft 1 INT R *AA.OE[aa]|1
ht.in.in 4 DEC1 R *AA.OE[aa]|2
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)
pat.bed 3 FREE L *AA.OE[aa]|12
pat.location 10 FREE L *AA.OE[aa]|10
pat.room 10 FREE L *AA.OE[aa]|11
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.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}]
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"]),@.lines.left-1^@.lines.l
VAL=eft)&""
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 R *AA.OE[aa]|6
wt.in.lb 4 INT R *AA.OE[aa]|4
wt.in.oz 4 DEC1 R *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
|
|