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