sHelp
                                     NUR.NURSE.PT
     i   2
 main
   patients
   rooms.and.beds

 Ì     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]