BGP7DPA ; IHS/CMI/LAB - COMP NATIONAL GPRA FOR PTS W/APPT 03 Jun 2017 2:54 PM 06 May 2017 1:23 PM ;
Source file <BGP7DPA.m>
Package | Total | Call Graph |
---|---|---|
IHS GPRA Information System | 7 | PROCCY^BGP7D1 PROC^BGP7DPA PRINT^BGP7DPAW PAUSE^BGP7DU JRNL^BGP7UTL ($$DEMOCHK,UNFOLDTX)^BGP7UTL2 TAXCHK^BGP7XTCN |
VA Fileman | 6 | NOW^%DTC ^DIC FILE^DICN ^DIE (,IX1)^DIK ^DIR |
Kernel | 4 | ^%ZIS ^%ZISC ^%ZTLOAD ($$FMADD,$$FMDIFF,$$FMTE,$$NOW)^XLFDT |
IHS VA Utilities | 3 | ^XBFMK GUIR^XBLM EN^XBVK |
IHS Changes To Scheduling | 1 | LIST^BSDAPI2 |
Registration | 1 | TERM^VALM0 |
Package | Total | Caller Graph |
---|---|---|
IHS GPRA Information System | 2 | BGP7DPA BGP7GFOR |
Name | Comments | DBIA/ICR reference |
---|---|---|
DATES | ;
|
|
TSKMN | ;EP ENTRY POINT FROM TASKMAN
|
|
RTYPE | ;
|
|
EOJ | ;
|
|
STMP | ;EP
|
|
ZISCP | ;
|
|
GUIEP | ;EP
|
|
USR() | ;EP - Return name of current user from ^VA(200.
|
|
EOP | ;EP - End of page.
|
|
BDMG(BGPBD,BGPED,BGPCLN) | ;EP - GUI DMS Entry Point
|
|
GETPAT1 | ;
|
|
CLIN | ;
|
|
DIV | ;
|
|
ZIS | ;
|
|
TEMP | ;search template created?
|
|
CTR(X,Y) | ;EP - Center X in a field Y wide.
|
|
COVPAGE | ;EP - called from option to display the cover page
|
|
GUIECP | ;EP
|
|
EN1 | ;EP Help
|
|
EN2 | ||
SELPT | ;
|
|
CPDONE | ;
|
|
NT | ||
ADDON | ;
|
|
ENDDATE | ;
|
|
GPRAYR | ;
|
|
F | ;calendar year
|
|
DRIVER | ;
|
|
GETPAT | ;
|
|
ENDLOG | ;-- write the end of the log
|
|
CPHEADER | ;EP
|
|
TSKMNCP | ;EP ENTRY POINT FROM TASKMAN
|
|
DUP | ||
EP | ;EP - called from option interactive
|
|
CLIN1 | ;
|
|
LOC() | ;EP - Return location name from file 4 based on DUZ(2).
|
|
ZIS1 | ;
|
|
CPHEAD1 | ;
|
|
TEST | ;
|
|
CPPRINT | ;EP - called from xbdbque
|
|
PROC | ;EP
|
Name | Field # of Occurrence |
---|---|
NOW^%DTC | BDMG+7, ENDLOG+1 |
^%ZIS | NT+6, ZISCP+2 |
^%ZISC | DRIVER+5 |
^%ZTLOAD | TSKMN+5, BDMG+20, TSKMNCP+5 |
PROCCY^BGP7D1 | PROC+18, PROC+51 |
PROC^BGP7DPA | DRIVER+2 |
PRINT^BGP7DPAW | DRIVER+4 |
PAUSE^BGP7DU | EP+12 |
JRNL^BGP7UTL | PROC+1 |
$$DEMOCHK^BGP7UTL2 | EP+11 |
UNFOLDTX^BGP7UTL2 | PROC+3 |
TAXCHK^BGP7XTCN | EP+10 |
LIST^BSDAPI2 | PROC+26 |
^DIC | DIV+4, CLIN1+2, GETPAT1+3, SELPT+12, SELPT+16, EN2+1 |
FILE^DICN | BDMG+13 |
^DIE | ENDLOG+4, DUP+16 |
^DIK | DUP+7 |
IX1^DIK | GUIEP+10, GUIECP+9, DUP+8 |
^DIR | EP+6, EP+8, RTYPE+4, TEMP+2, DATES+4, DATES+6, ADDON+4, ADDON+9, CLIN+2, SELPT+8 , EOP+5, CPHEADER+2, CPDONE+2, DUP+3, F+5 |
TERM^VALM0 | EP+3 |
^XBFMK | EOJ+1, BDMG+18 |
GUIR^XBLM | GUIEP+4, GUIECP+3 |
EN^XBVK | EOJ+3 |
$$FMADD^XLFDT | DATES+11, BDMG+2, PROC+6, PROC+8, PROC+20, PROC+21 |
$$FMDIFF^XLFDT | DATES+7 |
$$FMTE^XLFDT | CPHEAD1+4 |
$$NOW^XLFDT | BDMG+10, BDMG+20 |
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 |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DG(40.8 - [#40.8] | Classic Fileman Calls |
^SC - [#44] | Classic Fileman Calls |
^AUPNPAT - [#9000001] | Classic Fileman Calls |
^BGPGUIG - [#90558.19] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^BGPCTRL - [#90241.01] | EP+5, ENDDATE+4, CPPRINT+9, CPPRINT+11 |
^BGPCTRL("B" | EP+4, ENDDATE+3, CPPRINT+8 |
^BGPGUIG - [#90558.19] | GUIEP+8*, GUIEP+9*, GUIECP+7*, GUIECP+8* |
^BGPINDG("GPRA" | ENDDATE+2 |
^BGPSITE - [#90241.02] | ZIS+2 |
^DIBT( | SELPT+14, PROC+16, PROC+17*, PROC+32, PROC+49, PROC+50*, EN2+3, DUP+6, DUP+7, DUP+8* , DUP+9, DUP+11, DUP+13! |
^DIBT("B" | PROC+16, PROC+32, PROC+49 |
^DIC(4 - [#4] | LOC+1 |
^DPT - [#2] | PROC+14, PROC+30, PROC+47 |
^SC - [#44] | PROC+38, PROC+39, PROC+40, PROC+41 |
^TMP($J | EOJ+4!, GUIEP+2!, GUIEP+5, GUIEP+6, GUIEP+12!, GUIECP+1!, GUIECP+4, GUIECP+5, GUIECP+11! |
^VA(200 - [#200] | USR+1, CPHEAD1+4 |
^XTMP("BGP15TAX" | PROC+2!, PROC+53! |
^XTMP("BGP7DPA" | PROC+7!, PROC+8* |
^XTMP("BGPSNOMEDSUBSET" | PROC+2!, PROC+53! |
^XUSEC("BGPZ PATIENT LISTS" | EP+7 |
Name | Line Occurrences |
---|---|
BDMG | TEST+1 |
CLIN | GPRAYR+9, CLIN1+3, CLIN1+4, CLIN1+7 |
CLIN1 | CLIN1+9 |
CPDONE | CPPRINT+12 |
CPHEAD1 | CPHEADER+1 |
CPHEADER | CPPRINT+7, CPPRINT+10 |
DATES | TEMP+4, DATES+6, DATES+7, DATES+9 |
DIV | GPRAYR+10 |
EN2 | DUP |
ENDLOG | GUIEP+11, GUIECP+10 |
EOJ | EP+1, EP+12, RTYPE+5, NT+7, DRIVER+6, TSKMN+5, BDMG+21, ZISCP+3, TSKMNCP+5 |
F | GPRAYR+2, F+8, F+10 |
GETPAT | GPRAYR+11 |
NT | ENDDATE+9 |
PROC | GUIEP+1 |
RTYPE | GPRAYR+3, GPRAYR+9, GPRAYR+10, GPRAYR+11, GPRAYR+12, TEMP+3, ADDON+2 |
SELPT | GPRAYR+12 |
STMP | TEMP+5 |
TEMP | GPRAYR+9, GPRAYR+10, GPRAYR+11, GPRAYR+12, TEMP+6, DATES+4 |
TSKMN | ZIS1+1 |
TSKMNCP | ZISCP+5 |
ZIS | DATES+1 |
Name | Field # of Occurrence |
---|---|
^(0 | USR+1, LOC+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | BDMG+8, ENDLOG+2 |
%ZIS | NT+5!, NT+6*, ZISCP+1!, ZISCP+2* |
>> A | PROC+38*, PROC+39, PROC+40, PROC+41 |
>> BDMGIEN | BDMG+17* |
>> BGP3YE | PROC+6* |
BGPABD | DATES+2!, DATES+4*, DATES+7, DATES+9, DATES+11, PROC+20 |
>> BGPADDOD | ADDON+8*, ADDON+12*, PROC+41 |
BGPAED | DATES+2!, DATES+6*, DATES+7, DATES+9, PROC+21 |
>> BGPALLPT | ZIS+1* |
BGPAPPT | PROC+9!, PROC+22! |
BGPAPPT( | PROC+27, PROC+28, PROC+37, PROC+41!, PROC+43 |
BGPAPPTS | PROC+9! |
BGPAPPTS( | PROC+43*, PROC+45, PROC+46 |
>> BGPARRAY | PROC+24*, PROC+26 |
>> BGPASD | DATES+11* |
>> BGPBBD | GPRAYR+7*, ENDDATE+12* |
BGPBD | GPRAYR+4*, GPRAYR+5, GPRAYR+7, ENDDATE+10*, BDMG~, BDMG+2 |
>> BGPBED | GPRAYR+8*, ENDDATE+12* |
>> BGPBEN | ZIS+1* |
BGPCLN | CLIN+1*, CLIN+4*, CLIN+5!, CLIN+7!, CLIN1+3, CLIN1+5, CLIN1+6, CLIN1+7, BDMG~, PROC+23* , PROC+26 |
BGPCLN( | CLIN1+8* |
BGPCLN("DEV" | PROC+25* |
BGPCLN(0 | PROC+23 |
>> BGPCPLC | NT+1* |
>> BGPCPPL | ZIS+1*, BDMG+6* |
>> BGPCTRL | EP+4*, EP+5 |
>> BGPDATA | GUIEP+6*, GUIEP+7*, GUIEP+8, GUIECP+5*, GUIECP+6*, GUIECP+7 |
>> BGPDIVI | DIV+1*, DIV+6*, GETPAT1+1*, PROC+25 |
BGPED | GPRAYR+4*, GPRAYR+6, GPRAYR+8, ENDDATE+10*, BDMG~, PROC+6 |
BGPET | CPDONE+3! |
>> BGPGPRAH | PROC+4*, PROC+7 |
>> BGPGPRAJ | PROC+4*, PROC+7 |
BGPGPYR | CPDONE+3! |
>> BGPGUI | BDMG+3*, CPPRINT+4, CPPRINT+5, CPHEAD1+3 |
>> BGPGYR | CPPRINT+8*, CPPRINT+9, CPPRINT+11 |
>> BGPHOME | ZIS+2* |
BGPIEN | BDMG+4~, BDMG+15*, BDMG+16*, BDMG+17, GUIEP+8, GUIEP+9, GUIEP+10, GUIECP+7, GUIECP+8, GUIECP+9 , ENDLOG+3 |
>> BGPIISO | PROC+18*, PROC+51* |
>> BGPIND( | ENDDATE+2* |
>> BGPINDG | ZIS+1*, BDMG+6* |
>> BGPIOSL | CPPRINT+4* |
>> BGPISSO | PROC+51* |
>> BGPISST | PROC+18*, PROC+51* |
>> BGPLIST | NT* |
BGPM | CPDONE+3! |
>> BGPMJ | SELPT+14*, SELPT+15 |
>> BGPNGR09 | F+1*, F+12* |
BGPNOW | BDMG+4~, BDMG+8*, BDMG+11, ENDLOG+2*, ENDLOG+3 |
>> BGPOD | PROC+21*, PROC+26 |
BGPOPT | BDMG+4~, BDMG+5*, BDMG+11 |
BGPPATS | GETPAT+1!, GETPAT1+4, SELPT+1!, SELPT+14*, SELPT+17* |
BGPPATS( | GETPAT1+5*, SELPT+14*, SELPT+17*, PROC+12, PROC+13, PROC+29 |
BGPPATS("" | SELPT+20 |
>> BGPPBD | GPRAYR+5*, ENDDATE+11* |
>> BGPPED | GPRAYR+6*, ENDDATE+11* |
>> BGPPER | GPRAYR+3, GPRAYR+4, F+1*, F+11*, F+12 |
>> BGPPG | CPPRINT+3*, CPHEADER+1, CPHEAD1+1, CPHEAD1+2*, CPHEAD1+3, CPHEAD1+4 |
BGPQ | ADDON+1!, ADDON+2, ADDON+5*, ADDON+10*, ADDON+11*, CPPRINT+6!, CPPRINT+9, CPPRINT+10, CPHEADER+2* |
BGPQUIT | RTYPE+1!, GPRAYR+9, GPRAYR+10, GPRAYR+11, GPRAYR+12, DIV+1*, DIV+5*, CLIN+1*, CLIN+3*, GETPAT1+1* , GETPAT1+4*, SELPT+20*, EN1+1!, EN2+2* |
>> BGPRT1 | RTYPE+2*, RTYPE+6*, GPRAYR+9, GPRAYR+10, GPRAYR+11, GPRAYR+12, DATES+1, ADDON+2, PROC+11, PROC+25 , PROC+29, PROC+35, PROC+51 |
>> BGPRT2 | ADDON+6*, ADDON+7, PROC+35 |
>> BGPRTYPE | ZIS+1*, BDMG+6* |
BGPS | CPDONE+3! |
>> BGPSD | BDMG+2*, PROC+20*, PROC+21 |
>> BGPSMI | SELPT+2*, SELPT+14*, SELPT+17* |
>> BGPSNAM | EN2+3*, DUP+8, DUP+12 |
>> BGPSOX | PROC+12*, PROC+13, PROC+45*, PROC+46 |
BGPSTMP | TEMP+1*, TEMP+6, PROC+17, PROC+50, EN1+1*, EN2+3*, DUP!, DUP+6, DUP+7, DUP+8 , DUP+9, DUP+11, DUP+13, DUP+14, DUP+15 |
>> BGPSTN | DUP+7* |
>> BGPTA | PROC+10*, PROC+43* |
BGPTS | CPDONE+3! |
>> BGPVDT | F+1*, F+9*, F+11 |
BGPX | CPPRINT+9*, CPPRINT+11, CPDONE+3! |
>> BGPYGPU | ZIS+1*, BDMG+6* |
>> BGPYRPTH | ZIS+1*, BDMG+6* |
>> C | GUIEP+5*, GUIEP+8*, GUIEP+9, GUIECP+4*, GUIECP+7*, GUIECP+8, PROC+37*, PROC+38, PROC+39, PROC+40 , PROC+41 |
>> D | PROC+37*, PROC+38, PROC+39, PROC+40, PROC+41 |
D0 | BDMG+9! |
DA | RTYPE+4!, TEMP+2!, ADDON+4!, ADDON+9!, CLIN+2!, BDMG+14!, GUIEP+10*, GUIECP+9*, ENDLOG+3*, ENDLOG+5! , DUP+3!, DUP+7*, DUP+8*, DUP+15*, DUP+17! |
DD | BDMG+9! |
DFN | EOJ+2!, PROC+13*, PROC+14, PROC+16, PROC+17, PROC+46*, PROC+47, PROC+49, PROC+50 |
DFOUT | EOP+4! |
>> DHIT | DUP+14* |
DIADD | BDMG+12*, BDMG+14! |
DIC | EOJ+2!, DIV+2!, DIV+3*, DIV+4!, CLIN1+1*, CLIN1+2!, GETPAT1+2!, GETPAT1+3*!, SELPT+12!*, SELPT+16!* , BDMG+9!, BDMG+12*, BDMG+14!, EN2!*, EN2+1! |
DIC("A" | CLIN1+1*, EN2* |
DIC("DR" | BDMG+11* |
DIC("S" | CLIN1+2*, SELPT+12*, EN2* |
DIC(0 | DIV+3*, CLIN1+1*, GETPAT1+3*, SELPT+12*, SELPT+16*, BDMG+12*, EN2* |
DIE | ENDLOG+3*, ENDLOG+5!, DUP+15*, DUP+17! |
>> DIK | GUIEP+10*, GUIECP+9*, DUP+7*, DUP+8* |
DIR | EP+6!, EP+8!, RTYPE+4!, TEMP+2!, DATES+3!, DATES+5!, ADDON+4!, ADDON+9!, EOJ+2!, CLIN+2! , SELPT+8!, EOP+3!, CPHEADER+2!, CPDONE+1!, CPDONE+2!, DUP+3!, F+5! |
DIR("?" | SELPT+5*, SELPT+6*, SELPT+7*, F+4* |
DIR("??" | SELPT+7* |
DIR("A" | EP+6*, EP+8*, RTYPE+4*, TEMP+2*, DATES+3*, DATES+5*, ADDON+4*, ADDON+9*, CLIN+2*, SELPT+4* , EOP+5*, CPDONE+2*, DUP+3*, F+3* |
DIR("B" | RTYPE+4*, TEMP+2*, ADDON+4*, CLIN+2*, DUP+3* |
DIR(0 | EP+6*, EP+8*, RTYPE+3*, TEMP+2*, DATES+3*, DATES+5*, ADDON+3*, ADDON+9*, CLIN+2*, SELPT+4* , EOP+5*, CPHEADER+2*, CPDONE+2*, DUP+3*, F+2* |
DIRUT | RTYPE+5, TEMP+3, ADDON+5, ADDON+10, CLIN+3, EOP+4!, CPDONE+2*, DUP+4, F+6, F+7* |
DLAYGO | BDMG+12*, BDMG+14!, EN2!*, EN2+1! |
DLOUT | EOP+4! |
DR | ENDLOG+3*, ENDLOG+5!, DUP+15*, DUP+17! |
DT | ADDON+9, GUIEP+9, GUIECP+8, PROC+8, CPHEAD1+4, DUP+15 |
DTOUT | EOP+4!, CPHEADER+2 |
DUOUT | EOP+4!, CPDONE+2, F+7 |
DUZ | EP+7, BDMG+10, BDMG+11, USR+1, CPHEAD1+4, DUP+15 |
DUZ(2 | ZIS+2, LOC+1 |
>> G | PROC+34*, PROC+38*, PROC+41*, PROC+42 |
IO | DRIVER+3, TSKMN+1, CPPRINT+1, CPHEADER+2, CPDONE+2, TSKMNCP+1 |
IO("DOC" | TSKMN+2, TSKMNCP+2 |
IO("Q" | ZIS1+1, ZISCP+5 |
IO("S" | EOP+2 |
IO(0 | CPHEADER+2, CPDONE+2 |
>> IOCPU | TSKMN+5, TSKMNCP+5 |
IOF | EP+2, CPHEAD1+1 |
IOM | TSKMN+3, GUIEP+3*, GUIECP+2*, CTR+1, TSKMNCP+3 |
ION | TSKMN+1, TSKMNCP+1 |
IOP | NT+5!, ZISCP+1! |
IOSL | TSKMN+3, CPPRINT+4, CPPRINT+5*, CPPRINT+10, TSKMNCP+3 |
IOST | TSKMN+1, EOP+1, CPHEADER+2, CPDONE+2, TSKMNCP+1 |
>> IOT | EOP+2 |
>> POP | NT+7, ZISCP+3 |
>> Q | DUP, DUP+1*, DUP+4*, DUP+5* |
U | ZIS+2, SELPT+3, SELPT+9, PROC+14, PROC+28, PROC+30, PROC+37, PROC+40, PROC+41, PROC+46 , PROC+47, USR+1, LOC+1, CPHEAD1+4, EN2+3, DUP, DUP+7 |
X | EP+5*, EP+11*, EP+12, GPRAYR+7, GPRAYR+8, ENDDATE+2*, ENDDATE+3*, ENDDATE+4, CLIN1+4, CLIN1+7 , SELPT+3, SELPT+9*, SELPT+10, SELPT+11*, SELPT+12, BDMG+10*, GUIEP+5*, GUIEP+6, GUIEP+8, GUIECP+4* , GUIECP+5, GUIECP+7, PROC+16*, PROC+27*, PROC+28, PROC+37, PROC+41, PROC+43, PROC+49*, CTR~ , CTR+1 |
Y | RTYPE+6, TEMP+4, DATES+4, DATES+6, ADDON+6, ADDON+11, ADDON+12, ENDDATE+4*, DIV+5, DIV+6 , CLIN+4, CLIN1+3, CLIN1+5, CLIN1+6, CLIN1+8, GETPAT1+4, GETPAT1+5, SELPT+13, SELPT+14*, SELPT+17 , BDMG+15, BDMG+16, PROC+28*, PROC+29, PROC+30, PROC+32, PROC+40, CTR~, CTR+1, CPHEADER+2 , EN2+2, EN2+3, DUP!, DUP+5, F+8, F+9, F+10 |
>> Z | PROC+32* |
>> ZTCPU | TSKMN+5*, TSKMNCP+5* |
>> ZTDESC | TSKMN+5*, BDMG+20*, TSKMNCP+5* |
>> ZTDTH | TSKMN+5*, BDMG+20*, TSKMNCP+5* |
>> ZTIO | TSKMN+1*, TSKMN+2*, TSKMN+3*, BDMG+20*, TSKMNCP+1*, TSKMNCP+2*, TSKMNCP+3* |
>> ZTQUEUED | DRIVER+1, EOP+2, CPPRINT+2 |
>> ZTREQ | DRIVER+1*, GUIEP+13*, GUIECP+12*, CPPRINT+2* |
>> ZTRTN | TSKMN+5*, BDMG+20*, TSKMNCP+5* |
ZTSAVE | TSKMN+4!, BDMG+19!, TSKMNCP+4! |
ZTSAVE("*" | BDMG+19* |
ZTSAVE("BGP*" | TSKMN+4*, TSKMNCP+4* |