DVBAUDASK2 ;ALB/CP - UTL Reusable prompting subroutines #2 ; 10/26/18 10:02am
Source file <DVBAUDASK2.m>
| Package | Total | Call Graph |
|---|---|---|
| Automated Medical Information Exchange | 3 | ($$ASKNUM,ASKLIST)^DVBAUDASK1 (CENTER,CONTINUE)^DVBAUDPRT1 $$HOSTSITE^DVBAUDSTR1 |
| Kernel | 1 | $$UP^XLFSTR |
| VA FileMan | 1 | ($$GET1,GETS)^DIQ |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| Automated Medical Information Exchange | 2 | DVBAUDAO DVBAUDUU |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENTRIES(DVBROUTINE,DVBFILENUM) | ; DVBPROMPT for which for file entries to include
|
|
| FILERNG | ||
| NUMVALS1 | ;
|
|
| NUMVALS2 | ;
|
|
| NUMVALS3 | ;
|
|
| FTVALS(DVBFILENAME) | ; DVBPROMPT for the beginning & ending free text data
|
|
| FTVALS1 | ||
| FTVALS2 | ||
| FTVALS3 | ||
| FTVALSX | ||
| FTVALSOK(DVB2FTBEG,DVB2FTEND) | ; Extrinsic function to verify a from-to
|
|
| RSEL | ||
| SITE200(DVBRTN,DVBSTANUM,DVBPROMPT) | ; DVBPROMPT for 'Which INSTITUTION(S) "
|
|
| SCRN200(DVBSITE,DVBIENS) | ;Screen site200 (Institution) entry, set DVBQUIT=1 to bypass
; Input: ; DVBSITE ; Required ; Output of GETS^DIQ(4, of SITE200 entry point ; called by reference. ; DVBIENS ; Required ; Internal entry number string for referencing ; an array from the output array element of ; GETS^DIQ of the GETSITE entry point. |
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | ENTRIES+7 |
| GETS^DIQ | SITE200+21, SITE200+36 |
| $$ASKNUM^DVBAUDASK1 | ENTRIES+20 |
| ASKLIST^DVBAUDASK1 | SITE200+58 |
| CENTER^DVBAUDPRT1 | ENTRIES+10, FTVALSOK+10, FTVALSOK+15, RSEL+12 |
| CONTINUE^DVBAUDPRT1 | ENTRIES+11, RSEL+13 |
| $$HOSTSITE^DVBAUDSTR1 | SITE200+12 |
| $$UP^XLFSTR | NUMVALS2+5, NUMVALS3+6, FTVALS2+4, FTVALS3+5 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DIC - [#1] | GET1^DIQ |
| ^DIC(4 - [#4] | GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("RSEL" | RSEL+8 |
| ^DIC("B" | FTVALS+6 |
| ^DIC(4 - [#4] | SITE200+17, SITE200+34, SITE200+35 |
| ^DISV( | ENTRIES+5, ENTRIES+22*, SITE200+15, SITE200+62* |
| ^UTILITY($J | RSEL+7!, RSEL+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %JO | RSEL+2~ |
| %R | RSEL+2~ |
| %Y | RSEL+2~ |
| DIERR | ENTRIES+2~, SITE200+21, SITE200+36 |
| DTIME | NUMVALS2+2, NUMVALS3+1, FTVALS2+1, FTVALS3+1 |
| DUZ | ENTRIES+5, ENTRIES+22, SITE200+15, SITE200+62 |
| DVB2FTBEG | FTVALSOK~, FTVALSOK+6, FTVALSOK+7, FTVALSOK+8, FTVALSOK+13 |
| DVB2FTEND | FTVALSOK~, FTVALSOK+6, FTVALSOK+7, FTVALSOK+8, FTVALSOK+13 |
| DVBCNT | SITE200+2~, SITE200+23*, SITE200+24, SITE200+25, SITE200+26, SITE200+39*, SITE200+40, SITE200+41, SITE200+42, SITE200+44 , SITE200+53*, SITE200+54*, SITE200+55, SITE200+56 |
| DVBDEF | SITE200+2~, SITE200+15*, SITE200+49*, SITE200+58 |
| DVBDEFAULT | ENTRIES+2~, ENTRIES+5*, ENTRIES+6*, ENTRIES+20 |
| DVBENTRY | ENTRIES+6, ENTRIES+20*, ENTRIES+21, ENTRIES+22, ENTRIES+24! |
| DVBERRMSG | ENTRIES+2~, ENTRIES+9*, ENTRIES+10 |
| DVBFIELDS | SITE200+2~, SITE200+20*, SITE200+21, SITE200+36 |
| DVBFILENAME | ENTRIES+2~, ENTRIES+7*, ENTRIES+8, ENTRIES+15, FTVALS~, FTVALS+6, FTVALS+8, FTVALS1+2 |
| DVBFILENUM | ENTRIES~, ENTRIES+7, ENTRIES+9 |
| >> DVBFTBEG | FTVALS1+1*, FTVALS2+1*, FTVALS2+2, FTVALS2+3, FTVALS2+4*, FTVALS3+2, FTVALS3+7 |
| >> DVBFTEND | FTVALS1+1*, FTVALS3+1*, FTVALS3+2, FTVALS3+3, FTVALS3+4, FTVALS3+5*, FTVALS3+7 |
| DVBIEN4 | SITE200+2~, SITE200+17*, SITE200+24, SITE200+35*, SITE200+40 |
| DVBIENS | SITE200+2~, SITE200+17*, SITE200+21, SITE200+22, SITE200+25, SITE200+26, SITE200+35*, SITE200+36, SITE200+37, SITE200+38 , SITE200+41, SITE200+42, SCRN200~, SCRN200+22, SCRN200+23, SCRN200+24 |
| DVBINARRAY | SITE200+2~ |
| DVBMAX | SITE200+2~, SITE200+44*, SITE200+49, SITE200+50, SITE200+52, SITE200+58 |
| DVBMAXIMUM | ENTRIES+2~, ENTRIES+13*, ENTRIES+20 |
| DVBMSG | FILERNG+2~, FILERNG+5*, NUMVALS2+1*, NUMVALS2+4, NUMVALS3+2*, NUMVALS3+3, FTVALS+2~, FTVALS+7*, FTVALS+8*, FTVALS2+3 , FTVALS3+2 |
| DVBNUMBEG | NUMVALS1+1~, NUMVALS1+2*, NUMVALS2+2*, NUMVALS2+3, NUMVALS2+4, NUMVALS2+5*, NUMVALS3+3, NUMVALS3+8 |
| DVBNUMEND | NUMVALS1+1~, NUMVALS1+2*, NUMVALS3+1*, NUMVALS3+3, NUMVALS3+4, NUMVALS3+5, NUMVALS3+6*, NUMVALS3+8 |
| DVBPROMPT | SITE200~, SITE200+13*, SITE200+52, SITE200+58 |
| DVBPROMPT( | SITE200+24*, SITE200+25*, SITE200+26*, SITE200+40*, SITE200+41*, SITE200+42*, SITE200+54, SITE200+55, SITE200+56 |
| >> DVBQUIT | ENTRIES+3*, ENTRIES+8*, ENTRIES+13*, ENTRIES+21*, FILERNG+4*, NUMVALS2+3*, NUMVALS3+4*, NUMVALS3+8, FTVALS+6*, FTVALS+9* , FTVALS2+2*, FTVALS3+3*, FTVALS3+7, FTVALSOK+11*, FTVALSOK+16*, RSEL+6*, RSEL+8*, RSEL+14*, SITE200+6*, SITE200+10* , SITE200+17*, SITE200+21*, SITE200+22*, SITE200+34, SITE200+36*, SITE200+37*, SITE200+58*, SCRN200+21*, SCRN200+22*, SCRN200+23* , SCRN200+24 |
| DVBRETURN | FTVALSOK+2~, FTVALSOK+4*, FTVALSOK+11*, FTVALSOK+16*, FTVALSOK+18 |
| DVBROUTINE | ENTRIES~, RSEL+3~, RSEL+10*, RSEL+11 |
| DVBRTN | SITE200~, SITE200+10, SITE200+15, SITE200+62 |
| DVBSITE | SITE200+2~, SITE200+5!, SITE200+22, SITE200+37, SITE200+58, SITE200+62, SCRN200~ |
| DVBSITE("DVBCNT" | SITE200+50* |
| DVBSITE(4 | SITE200+25, SITE200+26, SITE200+38, SITE200+41, SITE200+42, SCRN200+22, SCRN200+23, SCRN200+24! |
| DVBSTANUM | SITE200~, SITE200+12*, SITE200+15, SITE200+17, SITE200+33, SITE200+34, SITE200+62 |
| DVBSUFFIX | SITE200+2~, SITE200+33*, SITE200+34*, SITE200+35 |
| IOM | ENTRIES+10, RSEL+12 |
| U | SITE200+24, SITE200+25, SITE200+26, SITE200+40, SITE200+41, SITE200+42, SITE200+55, SITE200+56 |
| XRSEL | RSEL+3~, RSEL+8*, RSEL+9 |
| Name | Field # of Occurrence |
|---|---|
| $T( | ENTRIES+5, ENTRIES+22 |