SDAMN ;ALB/MJK - No-Show Appt Action ; 2/4/92
Source file <SDAMN.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; -- protocol SDAM APPT NO-SHOW entry pt
; input: VALMY := array entries |
|
ENQ | ||
NS(DFN,SDT,SC,SDTIME,SDNSACT) | ; execute no-show code
; input: DFN := pt file ifn ; SDT := d/t of appt ; SC := clinic ifn ; SDTIME := now ; SDNSACT := ns processing flag ; [return] := did user uparrow [ 0|no , 1|yes] |
|
NSQ | ||
CHK() | ; -- check if status of appt permits no-show
|
|
UPD(BEFORE,AFTER,SDAT,CNST) | ; can just the 1 display line be changed w/o re-build
; input: BEFORE := before status info in $$STATUS format ; AFTER := after " " " " " ; SDAT := selected VALMY entry's data ; CNST := consult status (null, consult link ien) |
|
UPDQ |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|