Ì i 2
nur.patient.data (main)
[patient]
:NURPT[aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
patient 30 FREE L aa
acct.number 12 FREE L VAL=IF{@ADM.PAT.acct.number;@MIS.PAT.acct.number}
acuity.level 10 FREE L VAL=IF{@NUR.PARAM.pat.acuity.screen.query^QRY @ADM.PAT
VAL=.ccdqr.response[patient,QRY]}
admit.date 8 DATE L VAL=IF{@ADM.PAT.admit.date;@MIS.PAT.admit.date}
admit.date.at.time 16 FREE L VAL=IF{@ADM.PAT.admit.date (%Z.date.out(@ADM.PAT.admit
VAL=.date),("at "_@ADM.PAT.admit.time>"at "));@MIS.
VAL=PAT.admit.date (%Z.date.out(@MIS.PAT.admit.date),(
VAL="at "_@MIS.PAT.admit.time>"at "))}
admit.doctor 10 FREE L MIS.DOC.DICT VAL=IF{@ADM.PAT.admit.doctor;@MIS.PAT.admit.doctor}
admit.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[IF{@ADM.PAT.admit.doctor;@MIS.P
VAL=AT.admit.doctor}]
admit.time 4 HHMM L VAL=IF{@ADM.PAT.admit.time;@MIS.PAT.admit.time}
age.and.sex 10 FREE L VAL=(@NUR.PAT.current.age,@NUR.PAT.sex)
attend.doctor 10 FREE L MIS.DOC.DICT VAL=IF{@ADM.PAT.attend.doctor;@MIS.PAT.attend.doctor}
attend.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[IF{@ADM.PAT.attend.doctor;@MIS.
VAL=PAT.attend.doctor}]
bed 3 FREE L VAL=IF{@ADM.PAT.bed;@MIS.PAT.bed}
birthdate 8 DATE L VAL=IF{@ADM.PAT.birthdate;@MIS.PAT.birthdate}
ck.confidential 1 YN L VAL=%NUR.PAT.pat.ck.confidential(@patient)
confidential 1 YN L VAL=IF{@ADM.PAT.confidential;@MIS.PAT.confidential}
current.age 7 FREE L VAL=%NUR.PAT.pat.current.age(@patient)
discharge.date 8 DATE L VAL=%NUR.PAT.pat.discharge.date(@patient)
discharge.time 4 HHMM L VAL=%NUR.PAT.pat.discharge.time(@patient)
er.doctor 10 FREE L MIS.DOC.DICT VAL=IF{@ADM.PAT.er.doctor;@MIS.PAT.er.doctor}
er.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[IF{@ADM.PAT.er.doctor;@MIS.PAT.
VAL=er.doctor}]
facility 10 FREE L MIS.FACILITY VAL=IF{@ADM.PAT.facility;@MIS.PAT.facility}
family.doctor 10 FREE L MIS.DOC.DICT VAL=IF{@ADM.PAT.family.doctor;@MIS.PAT.family.doctor}
family.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[IF{@ADM.PAT.family.doctor;@MIS.
VAL=PAT.family.doctor}]
health.care.number 14 FREE L VAL=@ADM.PAT.health.care.number
last.med.edit 10 FREE L VAL=%NUR.PC.WORK.get.last.med.edit(@patient)
location 10 FREE L MIS.LOCN.DICT VAL=IF{@ADM.PAT.location;@MIS.PAT.location}
location.and.temp 25 FREE L VAL=%NUR.PAT.pat.location(@patient,.)
location.w.temp 12 FREE L VAL=%NUR.PAT.pat.location(@patient)
mri.urn 25 URN L MRI.PAT VAL=IF{@ADM.PAT.mri.urn;@MIS.PAT.mri.urn}
name 30 FREE L VAL=IF{@ADM.PAT.name;@MIS.PAT.name}
number 12 FREE L VAL=IF{@ADM.PAT.acct.number;@MIS.PAT.acct.number}
number.and.name 44 FREE L VAL=IF{(@ADM.PAT.acct.number_" "_@ADM.PAT.name:0S);(@
VAL=MIS.PAT.acct.number_" "_@MIS.PAT.name:0S)}
other.doctor 10 FREE L MIS.DOC.DICT VAL=IF{@ADM.PAT.other.doctor;@MIS.PAT.other.doctor}
other.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[IF{@ADM.PAT.other.doctor;@MIS.P
VAL=AT.other.doctor}]
patient.date 8 DATE L VAL=%NUR.PAT.pat.admit.date(@patient)
patient.time 4 HHMM L VAL=%NUR.PAT.pat.admit.time(@patient)
prim.care.doctor 10 FREE L MIS.DOC.DICT VAL=IF{@ADM.PAT.prim.care.doctor;@MIS.PAT.prim.care.do
VAL=ctor}
prim.care.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[IF{@ADM.PAT.prim.care.doctor;@M
VAL=IS.PAT.prim.care.doctor}]
pt.id 43 FREE L
room 10 FREE L MIS.ROOM.DICT VAL=IF{@ADM.PAT.room;@MIS.PAT.room}
sex 1 CHOICE L VAL=IF{@ADM.PAT.sex;@MIS.PAT.sex}
status 8 CHOICE L VAL=IF{@ADM.PAT.status;@MIS.PAT.status}
status.w.flags 9 FREE L VAL=%NUR.PAT.pat.status(@patient)
status.w.obsv 8 FREE L VAL=IF{@ADM.PAT.status (@ADM.PAT.status_IF{@ADM.PAT.ob
VAL=servation.patient="Y" "o"});(@MIS.PAT.status_IF{@M
VAL=IS.PAT.observation.patient="Y" "o"})}
temporary.location 10 FREE L MIS.LOCN.DICT VAL=@ADM.PAT.temporary.location
unit.number 10 FREE L VAL=IF{@ADM.PAT.unit.number;@MIS.PAT.unit.number}
urn 30 URN L ADM.PAT
visit.date 8 DATE L
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
nur.adm.room.bed.index [facility,room,bed] = patient
adm.room.bed.index *AARB[gqb,ggr,ggrB]
|
|