Routine: BGP1UTL2

Package	Total	Call Graph
IHS GPRA Information System	1	$$DATE^BGP1UTL
IHS Patient	1	$$DOB^AUPNPAT
IHS VA Utilities	1	$$VAL^XBDIQ1
VA Fileman	1	^DIR

Package	Total	Caller Graph
IHS GPRA Information System	77	BGP1CON1 BGP1CU2 BGP1CU4 BGP1D21 BGP1D22 BGP1D39 BGP1D711 BGP1D721 BGP1D722 BGP1D723 BGP1D731 BGP1D732 BGP1D74 BGP1D75 BGP1D81 BGP1D82 BGP1D83 BGP1D84 BGP1D863 BGP1D864 BGP1D87 BGP1DADB BGP1DAP BGP1DAR BGP1DAR9 BGP1DARO BGP1DCHA BGP1DCL BGP1DEL BGP1DGPU BGP1DH BGP1DH1 BGP1DHE BGP1DHE2 BGP1DHW BGP1DL BGP1DNDB BGP1DNE BGP1DNG BGP1DNG9 BGP1DNGP BGP1DNGS BGP1DON BGP1DPA BGP1DPA9 BGP1DPE BGP1DPP BGP1DSL BGP1DSTM BGP1ELH BGP1ELHH BGP1EOA BGP1EOD BGP1EOH BGP1GACW BGP1GAGP BGP1GAGS BGP1GDON BGP1GELD BGP1GFO9 BGP1GFOR BGP1GHED BGP1GLHW BGP1GNT9 BGP1GNTL BGP1GNTP BGP1GNTS BGP1GNXP BGP1GPED BGP1GUA BGP1HEH BGP1HEHH BGP1LHW BGP1NPL BGP1PDH1 BGP1PDLH BGP1PESL

Entry Points

Name	Comments	DBIA/ICR reference
GETDIR()	;EP - get default directory
CHKDST()	;EP - check the demo patient search template to see if it is complete
RCIS(P,BDATE,EDATE,ICDC,CPTC)	;EP
GETDEDIR()	;EP - get default directory
DSTCONT()	;EP - called to ask user if they want to continue
DEMOCHK()	;EP - called to check demo patient
GETMEDS(P,BGPMBD,BGPMED,TAXM,TAXN,TAXC,BGPDNAME,BGPZ)	;EP

External References

Name	Field # of Occurrence
$$DOB^AUPNPAT	RCIS+2
$$DATE^BGP1UTL	RCIS+24
^DIR	DSTCONT+5
$$VAL^XBDIQ1	RCIS+23

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: BGPBOMB Line Location: GETMEDS+24
Function Call: WRITE	Prompt: BGPBOMB Line Location: GETMEDS+25
Function Call: WRITE	Prompt: !!,"Your ",$P(BGPDPST,U,2),".",!,"If you have 'DEMO' patients whose names begin with something" Line Location: DSTCONT+2
Function Call: WRITE	Prompt: !,"other than 'DEMO,PATIENT' they will not be excluded from this report" Line Location: DSTCONT+3
Function Call: WRITE	Prompt: !,"unless you update this template.",! Line Location: DSTCONT+4
Routine Call	DIR Line Location: DSTCONT+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	GETMEDS+32, GETMEDS+34, GETMEDS+35
^ATXAX("B"	GETMEDS+24, GETMEDS+25, GETMEDS+26
^AUPNVMED - [#9000010.14]	GETMEDS+11, GETMEDS+12, GETMEDS+16, GETMEDS+28, GETMEDS+30
^AUPNVMED("AA"	GETMEDS+9, GETMEDS+10
^AUTTSITE(1	GETDIR+5, GETDIR+9, GETDEDIR+3, GETDEDIR+7
^BGPSITE - [#90241.02]	GETDIR+3
^BMCREF - [#90001]	RCIS+11, RCIS+12, RCIS+15, RCIS+18, RCIS+24
^BMCREF("D"	RCIS+10
^BMCTDXC("B"	RCIS+8
^BMCTSVC("B"	RCIS+9
^DIBT(	CHKDST+7
^DIBT("B"	CHKDST+5
^PSDRUG - [#50]	GETMEDS+14, GETMEDS+16, GETMEDS+31, GETMEDS+33, GETMEDS+36
^TMP($J	GETMEDS+4!, GETMEDS+16, GETMEDS+19, GETMEDS+20, GETMEDS+22, GETMEDS+23!, GETMEDS+27, GETMEDS+38, GETMEDS+40!
^XTV(8989.3 - [#8989.3]	GETDIR+7, GETDEDIR+5

Label References

Name	Line Occurrences
$$CHKDST	DEMOCHK+2
$$DSTCONT	DEMOCHK+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	RCIS+7~, RCIS+23*
B	RCIS+7~
BDATE	RCIS~, RCIS+2*, RCIS+13
>> BGPBOMB	GETMEDS+24, GETMEDS+25
BGPC1	GETMEDS+6~, GETMEDS+7, GETMEDS+15, GETMEDS+16, GETMEDS+18, GETMEDS+21, GETMEDS+22, GETMEDS+27, GETMEDS+38, GETMEDS+41!
BGPD	GETMEDS+6~, GETMEDS+12*, GETMEDS+13, GETMEDS+14, GETMEDS+16, GETMEDS+41!
BGPDNAME	GETMEDS~, GETMEDS+5*, GETMEDS+36, GETMEDS+41!
BGPDPST	DSTCONT+2, DEMOCHK+1~, DEMOCHK+2, DEMOCHK+3, DEMOCHK+4, DEMOCHK+5
BGPINBD	GETMEDS+6~, GETMEDS+8*, GETMEDS+9, GETMEDS+41!
BGPINED	GETMEDS+6~, GETMEDS+8, GETMEDS+9, GETMEDS+10, GETMEDS+16, GETMEDS+41!
BGPMBD	GETMEDS~, GETMEDS+8, GETMEDS+41!
BGPMED	GETMEDS~, GETMEDS+8, GETMEDS+41!
BGPMIEN	GETMEDS+6~, GETMEDS+10*, GETMEDS+11, GETMEDS+12, GETMEDS+16
BGPZ	GETMEDS~, GETMEDS+4!, GETMEDS+7!
BGPZ(	GETMEDS+38*
>> C	GETMEDS+31, GETMEDS+32, GETMEDS+33, GETMEDS+34
CPTC	RCIS~, RCIS+5*, RCIS+9
CPTCAT	RCIS+7~, RCIS+19, RCIS+20
CPTCAT(	RCIS+9*, RCIS+20
D	GETDIR+1~, GETDIR+2, GETDIR+3, GETDIR+4, GETDIR+5, GETDIR+6, GETDIR+7, GETDIR+8, GETDIR+9, GETDIR+10 , GETDEDIR+1~, GETDEDIR+2, GETDEDIR+3, GETDEDIR+4, GETDEDIR+5, GETDEDIR+6, GETDEDIR+7, GETDEDIR+8, GETMEDS+6~, GETMEDS+30 , GETMEDS+31, GETMEDS+33, GETMEDS+35, GETMEDS+36, RCIS+7~, RCIS+12*, RCIS+13, RCIS+14
DA	DSTCONT+5!
DIR	DSTCONT+1~, DSTCONT+5!
DIR("A"	DSTCONT+5*
DIR("B"	DSTCONT+5*
DIR(0	DSTCONT+5*
DIRUT	DSTCONT+1~, DSTCONT+6
DT	RCIS+3
DUZ(2	GETDIR+3
EDATE	RCIS~, RCIS+3*, RCIS+14
G	GETMEDS+6~, GETMEDS+29, GETMEDS+32, GETMEDS+34, GETMEDS+35, GETMEDS+36, GETMEDS+37, GETMEDS+38, RCIS+7~, RCIS+10* , RCIS+21*, RCIS+22, RCIS+23, RCIS+24
ICDC	RCIS~, RCIS+4*, RCIS+8
ICDCAT	RCIS+7~, RCIS+16, RCIS+17
ICDCAT(	RCIS+8*, RCIS+17
P	GETMEDS~, GETMEDS+9, GETMEDS+10, RCIS~, RCIS+1, RCIS+2, RCIS+10
T	GETMEDS+6~, GETMEDS+24*, GETMEDS+35
T1	GETMEDS+6~, GETMEDS+25*, GETMEDS+34
>> T2	GETMEDS+26*, GETMEDS+32
TAXC	GETMEDS~, GETMEDS+3*, GETMEDS+26, GETMEDS+37
TAXM	GETMEDS~, GETMEDS+1*, GETMEDS+24, GETMEDS+37
TAXN	GETMEDS~, GETMEDS+2*, GETMEDS+25, GETMEDS+37
U	GETDIR+3, GETDIR+9, GETDEDIR+7, GETMEDS+12, GETMEDS+16, GETMEDS+27, GETMEDS+30, GETMEDS+31, GETMEDS+33, GETMEDS+36 , RCIS+12, RCIS+15, RCIS+18, RCIS+24, DSTCONT+2
X	GETMEDS+6~, GETMEDS+18, GETMEDS+19, GETMEDS+20, GETMEDS+22, GETMEDS+27, GETMEDS+38, RCIS+7~, RCIS+8, RCIS+9* , RCIS+10, RCIS+11, RCIS+12, RCIS+15, RCIS+18, RCIS+21, RCIS+23, RCIS+24, CHKDST+4~, CHKDST+5* , CHKDST+6, CHKDST+7, DSTCONT+1~
Y	GETMEDS+6~, GETMEDS+20, GETMEDS+22, GETMEDS+27, GETMEDS+28, GETMEDS+30, RCIS+7~, RCIS+8, RCIS+9, RCIS+15* , RCIS+16, RCIS+17, RCIS+18, RCIS+19, RCIS+20, RCIS+23, DSTCONT+1~, DSTCONT+7

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP1UTL2

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 77

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: