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