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 |