DGRURB ; ALB/SCK - LIST MANAGER INTERFACE FOR ROOM-BED TRANSLATION; 16-FEB-2000
Source file <DGRURB.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; -- main entry point for DGRU ROOM-BED
|
|
HDR | ; -- header code
|
|
INIT | ; -- init variables and list array
; Variables ; DGIEN - ien of the file #46.13 entry ; DGNODE - Zero node of file #46.13 ; DGCNT - Count of entries in the LM array ; DGTRN - File #46.13 ien^translated Room-Bed^Bed description ; DGRM - Room-Bed name in external format |
|
HELP | ; -- help code
|
|
EXIT | ; -- exit code
|
|
ADD | ; Add a new room-bed translation value
|
|
DEL | ; Delete an existing room-bed translation value
|
|
RAI(DGIEN) | ; Screening logic for room lookup. Associated ward must have the
; RAI/MDS WARD field = "Yes" |
|
EXITSC | ||
SET(X,DGCNT,DGIEN) | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DG(405.4 - [#405.4] | GET1^DIQ |
^DIC(42 - [#42] | GET1^DIQ |
^DGRU(46.13 - [#46.13] | Classic Fileman Calls |