sHelp
                                     ADM.HSK
       2
 main

 Ì   €     2
main
[room,bed]
*(A1)AK[ggr,ggrB]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 room                        10 FREE     L  MIS.ROOM       ggr                                                     
 bed                          3 FREE     L                 ggrB                                                        
 comment                     40 FREE     L                 *(A1)AK[ggr,ggrB]|1                                         
 dirty.isolation              1 YN       L                 *(A1)AK[ggr,ggrB]|4                                         
 location                    10 FREE     L  MIS.LOCN                                                               
 occupied                     1 YN       L                 VAL=IF{@ADM.PAT.room.bed.index[@.facility,ADM.HSK.room      
                                                           VAL=,ADM.HSK.bed] "Y";"N"}                                  
 occupied.yes.only            1 YN       L                 VAL=IF{@ADM.PAT.room.bed.index[@.facility,ADM.HSK.room      
                                                           VAL=,ADM.HSK.bed] "Y"}                                      
 priority                    10 FREE     L  ADM.BB.PRI     *(A1)AK[ggr,ggrB]|3                                     
 pt.loa.status                1 YN       L                 VAL=IF{@ADM.PAT.room.bed.index[@.facility,ADM.HSK.room      
                                                           VAL=,ADM.HSK.bed]^URN,@ADM.PAT.loa.status[URN]="F"!(@A      
                                                           VAL=DM.PAT.loa.status[URN]="L") "Y"}                        
 reason                      10 FREE     L  ADM.BLOCK.RSN  *(A1)AK[ggr,ggrB]|2                                     
 status                      10 FREE     L  ADM.BED.STATUS *(A1)AK[ggr,ggrB]|0                                     
 status.description          30 FREE     L                 VAL=@ADM.BED.STATUS.name[@ADM.HSK.status]                   
 user                        10 FREE     L  MIS.USER                                                               
 yes.no                       1 YN       L