BSDAMEPW ; IHS/ANMC/LJF - Extended Display for Wait List Appointments;
Source file <BSDAMEPW.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 4 | PID^VADPT EN^VALM $$SETSTR^VALM1 CNTRL^VALM10 |
| Scheduling | 3 | SET^SDAMEP1 EN^SDCO0 $$CODT^SDCOU |
| IHS Changes To ADT | 2 | ($$CONF,$$SP,WRAP)^BDGF ($$DEAD,$$DOD)^BDGF2 |
| VA Fileman | 2 | WAIT^DICD $$GET1^DIQ |
| Kernel | 1 | $$REPEAT^XLFSTR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| HDR | ; Header
|
|
| VARS | ;-- get vars for the expanded profile
|
|
| WLDATA | ; Appointment Data
|
|
| VISIT | ; -- set up IHS visit display lines
; Appointment Check Out Data |
|
| SET(X) | ; Set in ^TMP global for display
|
|
| ENQ | ||
| INIT | ;
|
|
| EN(SDWE) | ;EP; Selection of appointment
; requires DFN |
|
| EXIT | ;EP;
|
|
| APCOQ |
| Name | Field # of Occurrence |
|---|---|
| $$CONF^BDGF | HDR+2 |
| $$SP^BDGF | HDR+2 |
| WRAP^BDGF | WLDATA+54 |
| $$DEAD^BDGF2 | HDR+5 |
| $$DOD^BDGF2 | HDR+5 |
| WAIT^DICD | EN+8 |
| $$GET1^DIQ | EN+7, HDR+2, HDR+4, VARS+1, VARS+2, VARS+3, VARS+4, VARS+5, VARS+6, VARS+7 , VARS+8, VARS+9 |
| SET^SDAMEP1 | VISIT+3, VISIT+5, VISIT+8 |
| EN^SDCO0 | VISIT+9 |
| $$CODT^SDCOU | VISIT+7 |
| PID^VADPT | HDR+3, INIT+2 |
| EN^VALM | EN+8 |
| $$SETSTR^VALM1 | HDR+5, HDR+7, WLDATA+2, WLDATA+7, WLDATA+8, WLDATA+9, WLDATA+10, WLDATA+14, WLDATA+15, WLDATA+16 , WLDATA+17, WLDATA+21, WLDATA+22, WLDATA+23, WLDATA+24, WLDATA+28, WLDATA+29, WLDATA+30, WLDATA+31, WLDATA+35 , WLDATA+36, WLDATA+37, WLDATA+38, WLDATA+42, WLDATA+43, WLDATA+47, WLDATA+56, WLDATA+57, VISIT+3, VISIT+8 |
| CNTRL^VALM10 | WLDATA+3, VISIT+4 |
| $$REPEAT^XLFSTR | WLDATA+57 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ |
| ^BSDWL - [#9009017.1] | GET1^DIQ |
| 9009017.11 | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BSDWL - [#9009017.1] | WLDATA+51, WLDATA+53 |
| ^DPT - [#2] | HDR+4, HDR+6, WLDATA+8 |
| ^SC - [#44] | HDR+8, WLDATA+10 |
| ^TMP("SDAMEPW" | EN+2!, SET+1*, EXIT+1! |
| Name | Line Occurrences |
|---|---|
| APCOQ | VISIT+7 |
| SET | WLDATA+2, WLDATA+4, WLDATA+11, WLDATA+18, WLDATA+25, WLDATA+32, WLDATA+39, WLDATA+44, WLDATA+48, WLDATA+56 , WLDATA+57, WLDATA+59 |
| VARS | INIT+4 |
| WLDATA | INIT+5 |
| Name | Field # of Occurrence |
|---|---|
| ^( | HDR+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BSDA | WLDATA+49~, WLDATA+51*, WLDATA+53 |
| BSDCMT | WLDATA+49~, WLDATA+50*, WLDATA+53*, WLDATA+54 |
| BSDCMT( | WLDATA+57 |
| BSDCMT(1 | WLDATA+55, WLDATA+56 |
| BSDCMTC | WLDATA+49~, WLDATA+50*, WLDATA+52* |
| CTRLCOL | INIT+1~ |
| DFN | HDR+4, HDR+5, HDR+6, WLDATA+8, EXIT+2!, VISIT+7 |
| >> I | WLDATA+57* |
| >> IOINHI | WLDATA+3, VISIT+4 |
| >> IOINORM | WLDATA+3, VISIT+4 |
| >> IORVOFF | HDR+5 |
| >> IORVON | HDR+5 |
| SDADD | VARS+2*, WLDATA+22, EXIT+3! |
| SDCL | EN+7*, HDR+2, HDR+8, WLDATA+10, EXIT+2!, VISIT+7 |
| SDCMT | EXIT+3! |
| SDDA | EXIT+2! |
| SDFSTCOL | INIT+1~, INIT+3*, WLDATA+8, WLDATA+15, WLDATA+22, WLDATA+29, WLDATA+36, WLDATA+43, WLDATA+56, WLDATA+57 |
| SDIENSA | EN+4~, EN+5*, EN+7, WLDATA+51, WLDATA+53 |
| SDIENSB | EN+4~, EN+6*, WLDATA+51, WLDATA+53 |
| SDLN | INIT+6, WLDATA+3, SET+1*, EXIT+2!, VISIT+4, VISIT+9 |
| SDOE | EXIT+2!, VISIT+9 |
| SDPOV | EXIT+2! |
| SDPRI | VARS+1*, WLDATA+15, EXIT+3! |
| SDPRV | VARS+8*, WLDATA+29, EXIT+3! |
| SDPT | EN+4~ |
| SDPV | EXIT+2! |
| SDREA | VARS+7*, WLDATA+17, EXIT+3! |
| >> SDREC | VARS+4*, WLDATA+31 |
| SDREM | VARS+5*, WLDATA+36, EXIT+3! |
| SDRES | VARS+9*, WLDATA+43, EXIT+3! |
| SDSC | EN+4~ |
| SDSECCOL | INIT+1~, INIT+3*, WLDATA+10, WLDATA+17, WLDATA+24, WLDATA+31, WLDATA+38 |
| SDT | EXIT+2!, VISIT+7 |
| SDUSERA | VARS+3*, WLDATA+24, EXIT+3! |
| SDUSERR | VARS+6*, WLDATA+38, EXIT+3! |
| SDW | EXIT+2! |
| SDWE | EN~, EN+5, EN+6, VARS+1, VARS+2, VARS+3, VARS+4, VARS+5, VARS+6, VARS+7 , VARS+8, VARS+9 |
| SDWIDTH | EN+4~, INIT+3*, WLDATA+7, WLDATA+9, WLDATA+14, WLDATA+16, WLDATA+21, WLDATA+23, WLDATA+28, WLDATA+30 , WLDATA+35, WLDATA+37, WLDATA+42, WLDATA+47, WLDATA+57 |
| U | HDR+8, WLDATA+8, WLDATA+10 |
| VA | HDR+1~, INIT+1~ |
| VA("BID" | HDR+4 |
| VAERR | HDR+1~, INIT+1~ |
| >> VALMBCK | EN+3*, EN+9* |
| VALMCNT | INIT+6*, EXIT+2! |
| >> VALMHDR(1 | HDR+2* |
| >> VALMHDR(2 | HDR+4*, HDR+5*, HDR+7* |
| X | HDR+5*, HDR+6*, HDR+7, HDR+8*, WLDATA+6*, WLDATA+7*, WLDATA+8*, WLDATA+9*, WLDATA+10*, WLDATA+11 , WLDATA+13*, WLDATA+14*, WLDATA+15*, WLDATA+16*, WLDATA+17*, WLDATA+18, WLDATA+20*, WLDATA+21*, WLDATA+22*, WLDATA+23* , WLDATA+24*, WLDATA+25, WLDATA+27*, WLDATA+28*, WLDATA+29*, WLDATA+30*, WLDATA+31*, WLDATA+32, WLDATA+34*, WLDATA+35* , WLDATA+36*, WLDATA+37*, WLDATA+38*, WLDATA+39, WLDATA+41*, WLDATA+42*, WLDATA+43*, WLDATA+44, WLDATA+46*, WLDATA+47* , WLDATA+48, WLDATA+56*, WLDATA+57*, SET~, SET+1 |