©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
SDAMN ;ALB/MJK - No-Show Appt Action ; 2/4/92
Source file <SDAMN.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 4 | ($$STATUS,BLD)^SDAM1 BLD^SDAM3 (73,EN1)^SDN DIV^SDUTL |
| Registration | 3 | LO^DGUTL ($$SETFLD,FULL,PAUSE)^VALM1 SEL^VALM2 |
| IHS Changes To ADT | 1 | $$READ^BDGF |
| VA Fileman | 1 | NOW^%DTC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; -- protocol SDAM APPT NO-SHOW entry pt
; input: VALMY := array entries |
|
| UPDQ | ||
| ENQ | ||
| 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) |
|
| NSQ | ||
| 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] |
|
| CHK() | ; -- check if status of appt permits no-show
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(40.8 - [#40.8] | NS+12 |
| ^DPT - [#2] | EN+12, EN+16 |
| ^SC - [#44] | NS+12 |
| ^SD(409.63 - [#409.63] | CHK+2 |
| ^TMP("SDAM" | EN+10, UPD+10* |
| ^TMP("SDAMIDX" | EN+7 |
| ^UTILITY($J | NS+9! |
| Name | Line Occurrences |
|---|---|
| $$CHK | EN+13 |
| $$NS | EN+15 |
| $$UPD | EN+17 |
| ENQ | EN+5 |
| UPDQ | UPD+6 |
| Name | Field # of Occurrence |
|---|---|
| ^( | EN+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | EN+9 |
| A | NS+8~ |
| AFTER | UPD~, UPD+6, UPD+7, UPD+10 |
| BEFORE | UPD~, UPD+6 |
| CNST | UPD~ |
| >> CNSTLNK | EN+17 |
| DFN | EN+3~, EN+11*, EN+12, EN+15, EN+16, NS~ |
| DT | NS+10 |
| I | NS+8~, NS+10* |
| L | NS+8~ |
| SC | NS~, NS+12 |
| >> SDAMLIST | UPD+8 |
| >> SDAMLIST( | UPD+7 |
| >> SDAMLIST("SCR" | UPD+7 |
| >> SDAMTYP | EN+21, EN+22 |
| SDAT | EN+3~, EN+7!*, EN+8, EN+10, EN+11, EN+17, UPD~, UPD+10 |
| SDCL | EN+3~, EN+11*, EN+12, EN+15, EN+16, NS+8~ |
| SDCP | NS+8~ |
| SDDT | NS+8~, NS+10* |
| SDI | EN+3~, EN+6*, EN+7*, NS+8~, CHK+4 |
| SDINP | NS+8~ |
| SDLT | NS+8~ |
| SDLT1 | NS+8~, NS+10* |
| SDMSG | NS+8~, NS+11* |
| SDNSACT | EN+3~, EN+4*, EN+15, EN+17*, EN+21, EN+22, NS~ |
| SDOK | CHK+1~*, CHK+2*, CHK+3*, CHK+4, CHK+5 |
| SDSTA | EN+3~, EN+16*, EN+17 |
| SDSTB | EN+3~, EN+12*, EN+14, EN+17, CHK+2 |
| SDSTOP | EN+3~, EN+4*, EN+7, EN+8*, EN+15* |
| SDT | EN+3~, EN+11*, EN+12, EN+15, EN+16, NS~, NS+10*, CHK+3 |
| SDTIME | EN+3~, EN+9*, EN+15, NS~, CHK+3 |
| SDV1 | NS+8~, NS+12* |
| SDYES | NS+8~, NS+10* |
| U | EN+8, EN+11, NS+12, UPD+8 |
| >> VALMBCK | EN+4*, EN+6* |
| VALMY | EN+3~ |
| VALMY( | EN+7, CHK+4! |
| VALMY(0 | EN+5 |
| >> X | CHK+2*, CHK+3*, CHK+4 |
| Y | NSQ, UPD+5~*, UPD+6*, UPD+7*, UPD+8*, UPD+9, UPDQ |