Ì i 2
main
[initials]
*(N2)NPL[gu]
Field Name Len Dat Typ J DPM Offset/Local/VAL
initials 10 FREE L NUR.NURSE gu
Ì i 2
patients
[initials, pt.line]
*(N2)NPL[gu]PT[npl]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pt.line 3 PINT R npl
patient 30 FREE L NUR.PAT *(N2)NPL[gu]PT[npl]|0
pt.id 44 FREE L *(N2)NPL[gu]PT[npl]|1
Ì i 2
rooms.and.beds
[initials, rb.line]
*(N2)NPL[gu]R[rbl]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rb.line 3 PINT R rbl
bed 3 FREE L *(N2)NPL[gu]R[rbl]|1
occupant 43 FREE L VAL=IF{@ADM.PAT.room.bed.index[-@MIS.ROOM.facilities[@
VAL=room,""],@room,@bed]^patient %NUR.NURSE.PT.ee.pt.l
VAL=ist.M.pt.label(patient)}
rb.patient 30 URN L ADM.PAT VAL=@ADM.PAT.room.bed.index[-@MIS.ROOM.facilities[@roo
VAL=m,""],@room,@bed]
room 10 FREE L MIS.ROOM *(N2)NPL[gu]R[rbl]|0
Index Files Subscripts/Physical Base
patient.x [patient,initials]
*(N2)NPLP[aa,gu]
room.bed.x [room,bed,initials]
*(N2)NPLR[ggr,ggrB,gu]
user.x [initials,patient]
*(N2)NPLU[gu,aa]
|
|
| |