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* |