Routine: BGP3D24

Package	Total	Call Graph
IHS GPRA Information System	2	$$CPT^BGP3DU $$DATE^BGP3UTL
Patient Care Component Reports	2	$$START1^APCLDF $$CLINIC^APCLV
DRG Grouper	1	$$ICDDX^ICDCODE
IHS HIV Management System	1	EN^BKMSTIDS
IHS VA Utilities	1	$$VAL^XBDIQ1
Kernel	1	($$FMADD,$$FMTE)^XLFDT
Taxonomy	1	$$ICD^ATXCHK

Package	Total	Caller Graph
IHS GPRA Information System	1	BGP3EL4

Name	Comments	DBIA/ICR reference
IPC	;EP
ERINJ(P,BDATE,EDATE,BGPRET)	;
PCV(P,BDATE,EDATE)	;EP
ISTI	;EP
STI	;EP
IASB	;EP
BNII(P,BD)	;
BNI(P,V,E)	;
BNIMH	;
ERAS(V)	;was there screening on this visit V and was it positive

Name	Field # of Occurrence
$$START1^APCLDF	ERINJ+5, BNII+6, PCV+5
$$CLINIC^APCLV	ERINJ+14
$$ICD^ATXCHK	ERINJ+22, ERINJ+24, ERAS+30, ERAS+37, BNI+8, BNIMH+10
$$CPT^BGP3DU	BNII+2
$$DATE^BGP3UTL	IASB+18, IASB+25, PCV+12
EN^BKMSTIDS	STI+1, ISTI+5, ISTI+8
$$ICDDX^ICDCODE	ERINJ+22, ERINJ+24
$$VAL^XBDIQ1	ERAS+31, ERAS+38, BNI+9, BNIMH+11
$$FMADD^XLFDT	BNII+2, BNII+6, BNIMH+1
$$FMTE^XLFDT	ERINJ+5, BNII+6, PCV+5

Name	Line Occurrences
Function Call: WRITE	Prompt: !,DFN," ",$$HRN^AUPNPAT(DFN,DUZ(2))," UP: ",BGPACTUP," AC: ",BGPACTCL,! Line Location: ISTI+11
Function Call: WRITE	Prompt: !,DFN," ",$$HRN^AUPNPAT(DFN,DUZ(2))," UP: ",BGPACTUP," AC: ",BGPACTCL," BGPN1: ",BGPN1,! Line Location: ISTI+13
Function Call: WRITE	Prompt: ! Line Location: ISTI+13
Function Call: WRITE	Prompt: ! Line Location: ISTI+13

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMHREC - [#9002011]	BNIMH+2
^AMHREC("AE"	BNIMH+1
^AMHREDU - [#9002011.05]	BNIMH+3
^AMHREDU("AD"	BNIMH+3
^AMHRPROC - [#9002011.04]	BNIMH+10
^AMHRPROC("AD"	BNIMH+9
^AMHTSET - [#9002012.1]	BNIMH+2
^ATXAX - [#9002226]	ERINJ+17
^ATXAX("B"	ERINJ+7, ERINJ+8, ERAS+28, ERAS+37, BNI+6, BNII+2, BNIMH+8
^AUPNVCPT - [#9000010.18]	ERAS+30, BNI+8
^AUPNVCPT("AD"	ERAS+29, BNI+7
^AUPNVHF - [#9000010.23]	ERAS+22, ERAS+23
^AUPNVHF("AD"	ERAS+22
^AUPNVMSR - [#9000010.01]	ERAS+10, ERAS+11, ERAS+12, ERAS+14, ERAS+15, ERAS+18, ERAS+19
^AUPNVMSR("AD"	ERAS+9
^AUPNVPED - [#9000010.16]	BNI+4, BNII+9, BNII+13
^AUPNVPED("AD"	BNI+4
^AUPNVPOV - [#9000010.07]	ERINJ+21, ERINJ+23, ERAS+37
^AUPNVPOV("AD"	ERINJ+20, ERAS+37
^AUPNVSIT - [#9000010]	ERINJ+10, ERINJ+11, ERINJ+12, ERINJ+13, ERINJ+15, ERINJ+16, ERINJ+17, ERINJ+18, BNI+3, BNII+11 , BNII+12, PCV+12
^AUPNVXAM - [#9000010.13]	ERAS+3, ERAS+4
^AUPNVXAM("AD"	ERAS+3
^AUTTEDT - [#9999999.09]	BNI+4, BNII+15, BNII+16, BNIMH+5, BNIMH+6
^AUTTEXAM - [#9999999.15]	ERAS+3
^AUTTHF - [#9999999.64]	ERAS+22, ERAS+23
^AUTTMSR - [#9999999.07]	ERAS+11, ERAS+14, ERAS+18
^DPT - [#2]	ERAS+16, ERAS+17
^TMP($J	ERINJ+2!, ERINJ+6, ERINJ+9

Name	Line Occurrences
$$BNI	ERINJ+22, ERINJ+24
$$BNII	BNI+11
$$ERAS	ERINJ+22, ERINJ+24
$$PCV	IPC+4
BNIMH	BNII+7
ERINJ	IASB+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	BNI+2~, BNI+3, BNI+4, BNI+5, BNI+7, BNI+9, BNI+10, BNII+1~, BNII+8, BNII+17* , BNII+19, BNIMH+1, BNIMH+3, BNIMH+7, BNIMH+9, BNIMH+11, BNIMH+13
A	ERINJ+4~, ERINJ+5, ERINJ+20, ERINJ+21, ERINJ+23, ERAS+2~, ERAS+24*, ERAS+25
B	ERINJ+4~, ERINJ+5, ERINJ+21, ERINJ+22, ERINJ+23*, ERINJ+24
BD	BNII~, BNII+2, BNII+6, BNIMH+1
BDATE	ERINJ~, ERINJ+5, PCV~, PCV+5
>> BGPACTCB	IASB+17
>> BGPACTCL	ISTI+41, IPC+3
>> BGPACTUP	IASB+3
>> BGPAGEB	IASB+4, IASB+5, IASB+10, IASB+11, IPC+6, IPC+7, IPC+8
>> BGPBDATE	STI+1, ISTI+8, IASB+7, IPC+4
BGPCIN	ISTI+1~, ISTI+20, ISTI+22, ISTI+26, ISTI+42*
>> BGPD1	ISTI+2, ISTI+14, IASB+1, IASB+9, IPC+1*
>> BGPD2	ISTI+2, ISTI+30, IASB+1, IASB+10, IPC+1*
>> BGPD3	ISTI+2, ISTI+32, IASB+1, IASB+11, IPC+1*
>> BGPD4	ISTI+2, ISTI+34, IASB+1, IPC+1
>> BGPD5	ISTI+2, ISTI+38, IASB+1, IPC+1
>> BGPD6	IPC+1*
>> BGPD7	IPC+1*
>> BGPD8	IPC+1*
>> BGPD9	IPC+1*
>> BGPDENV	ISTI+3, ISTI+23, ISTI+26*, ISTI+41
>> BGPDEP	BNII+5*
>> BGPEDATE	STI+1, ISTI+8, IASB+7, IPC+4
BGPERV	IASB+6!, IASB+7
BGPERV(	IASB+12, IASB+13, IASB+14, IASB+15, IASB+16, IASB+18, IASB+21, IASB+22, IASB+23, IASB+24 , IASB+25
BGPERV(0	IASB+8, IASB+9, IASB+10, IASB+11
BGPG	BNII+1~, BNII+4!, PCV+2~, PCV+3!
BGPG(	BNII+8, BNII+9, BNII+13, BNII+17, PCV+9, PCV+10, PCV+12
BGPG(1	BNII+7, PCV+6
>> BGPHXX	ISTI+25, ISTI+27
>> BGPMFITI	ERINJ+17
>> BGPN1	ISTI+2, ISTI+12, IASB+1, IASB+12, IPC+1, IPC+5, IPC+6, IPC+7, IPC+8, IPC+10
>> BGPN10	ISTI+2, ISTI+34
>> BGPN11	ISTI+2, ISTI+38
>> BGPN12	ISTI+2, ISTI+38
>> BGPN15	ISTI+2, ISTI+17
>> BGPN16	ISTI+2, ISTI+18
>> BGPN17	ISTI+2, ISTI+19
>> BGPN18	ISTI+2, ISTI+36
>> BGPN2	ISTI+2, ISTI+12, IASB+1, IASB+13, IASB+14, IPC+1, IPC+6
>> BGPN3	ISTI+2, ISTI+15, IASB+1, IASB+14, IASB+15, IASB+16, IPC+1, IPC+7*
>> BGPN4	ISTI+2, ISTI+16, IASB+1, IASB+16, IPC+1, IPC+8
>> BGPN5	ISTI+2, ISTI+30, IASB+1, IASB+16, IPC+1*
>> BGPN6	ISTI+2, ISTI+30
>> BGPN7	ISTI+2, ISTI+32
>> BGPN8	ISTI+2, ISTI+32
>> BGPN9	ISTI+2, ISTI+34
BGPNUMV	ISTI+4!
BGPNUMV(	ISTI+24, ISTI+31, ISTI+33, ISTI+35, ISTI+37, ISTI+39, ISTI+42
BGPRET	ERINJ~, ERINJ+3!
BGPRET(	ERINJ+22, ERINJ+24
BGPRET(0	ERINJ+25*
>> BGPSTOP	ISTI+5, ISTI+9, ISTI+10, IASB+3, IASB+4, IASB+5, IASB+8*
BGPVAL	IPC+4*, IPC+5, IPC+10, IPC+11!
>> BGPVALUE	ISTI+3, ISTI+41, ISTI+42, IASB+2, IASB+17, IASB+26, IPC+2, IPC+10
BGPYAR	STI+1, ISTI+4!, ISTI+8
BGPYAR(	ISTI+27
BGPZAR	STI+1, ISTI+4!, ISTI+8, ISTI+9
BGPZAR(	ISTI+21, ISTI+25, ISTI+26, ISTI+30, ISTI+32, ISTI+34, ISTI+38
BGPZAR(0	ISTI+10, ISTI+12, ISTI+14, ISTI+15, ISTI+16, ISTI+17, ISTI+18, ISTI+19
C	ISTI+25, ISTI+26, PCV+7~, PCV+8, PCV+11, PCV+13
CNT	ERINJ+4~, ERINJ+9, ERINJ+22, ERINJ+24*, ERINJ+25
D	IASB+18, IASB+21, IASB+22, IASB+24, IASB+25, IASB+26, ERINJ+4~, ERINJ+18, ERINJ+22, ERINJ+24 , BNI+2~, BNI+3, BNI+4, BNI+9, BNI+11, BNII+1~, BNII+8, BNIMH+1*, BNIMH+7, BNIMH+11
>> DFN	STI+1, ISTI+8, IASB+7, IPC+4
E	ERINJ+4~, ERINJ+5, ERINJ+8, ERINJ+24, BNI~, BNI+1, BNII+1~, BNII+6, BNII+8, BNIMH+1* , PCV+2~, PCV+5*
EDATE	ERINJ~, ERINJ+5, PCV~, PCV+5
G	ERINJ+4~, ERINJ+9, ERINJ+20, ERINJ+22, ERINJ+24
>> H	ISTI+36*, ISTI+37
>> I	ISTI+25, ISTI+26, ISTI+27, ISTI+36, ISTI+37
>> J	ISTI+27*
P	ERINJ~, ERINJ+5, ERINJ+22, ERINJ+24, ERAS+16, ERAS+17, BNI~, BNI+11, BNII~, BNII+2 , BNII+6, BNIMH+1, PCV~, PCV+5
R	PCV+7~, PCV+8, PCV+12, PCV+13
T	ERINJ+4~, ERINJ+7, ERINJ+22, ERAS+2~, ERAS+28, ERAS+30, BNI+6, BNI+8, BNII+1~, BNII+8 , BNII+13, BNII+14, BNII+15, BNII+16, BNII+17, BNIMH+1, BNIMH+3, BNIMH+4, BNIMH+5, BNIMH+6* , BNIMH+7, BNIMH+8*, BNIMH+10
U	ISTI+10, ISTI+12, ISTI+14, ISTI+15, ISTI+16, ISTI+17, ISTI+18, ISTI+19, ISTI+26, ISTI+27 , ISTI+30, ISTI+31, ISTI+32, ISTI+33, ISTI+34, ISTI+36, ISTI+37, ISTI+38, ISTI+39, IASB+12 , IASB+13, IASB+15, IASB+16, IASB+18, IASB+21, IASB+22, IASB+23, IASB+24, IASB+25, ERINJ+9 , ERINJ+11, ERINJ+12, ERINJ+13, ERINJ+15, ERINJ+16, ERINJ+17, ERINJ+18, ERINJ+21, ERINJ+22, ERINJ+23 , ERINJ+24, ERAS+3, ERAS+4, ERAS+5, ERAS+7, ERAS+9, ERAS+10, ERAS+11, ERAS+12, ERAS+13 , ERAS+14, ERAS+15, ERAS+16, ERAS+17, ERAS+18, ERAS+19, ERAS+20, ERAS+21, ERAS+22, ERAS+23 , ERAS+25, ERAS+26, ERAS+29, ERAS+30, ERAS+32, ERAS+33, ERAS+37, ERAS+38, BNI+1, BNI+3 , BNI+4, BNI+8, BNI+9, BNII+3, BNII+9, BNII+11, BNII+12, BNII+13, BNII+16, BNII+17 , BNIMH+2, BNIMH+3, BNIMH+6, BNIMH+7, BNIMH+10, BNIMH+11, IPC+5, IPC+10, PCV+9, PCV+10 , PCV+12, PCV+13
V	IASB+18, ERINJ+9, ERINJ+10, ERINJ+11, ERINJ+12, ERINJ+13, ERINJ+14, ERINJ+15, ERINJ+16, ERINJ+17 , ERINJ+18, ERINJ+20, ERINJ+22, ERINJ+24, ERAS~, ERAS+1, ERAS+3, ERAS+9, ERAS+22, ERAS+29 , ERAS+37, BNI~, BNI+3, BNI+4, BNI+7, BNII+9, BNII+10, BNII+11, BNII+12, BNIMH+1 , BNIMH+2, BNIMH+3, BNIMH+9
X	ISTI+21, ISTI+24, ISTI+25, ISTI+26, ISTI+30, ISTI+31, ISTI+32, ISTI+33, ISTI+34, ISTI+35 , ISTI+37, ISTI+38, ISTI+39, ISTI+42, IASB+12, IASB+13, IASB+14, IASB+15, IASB+16, IASB+18* , IASB+21, IASB+22, IASB+23, IASB+24, IASB+25, ERINJ+9, ERAS+2~, ERAS+3, ERAS+4, ERAS+9* , ERAS+10, ERAS+11, ERAS+12, ERAS+14, ERAS+15, ERAS+18, ERAS+19, ERAS+22, ERAS+23, ERAS+29 , ERAS+30, ERAS+31, ERAS+37, ERAS+38, BNI+2~, BNI+4, BNI+7, BNI+8, BNI+9, BNI+11 , BNI+12, BNII+1~, BNII+6, BNII+8, BNII+9, BNII+13, BNII+17, BNIMH+3, BNIMH+9, BNIMH+10 , BNIMH+11, PCV+2~, PCV+5, PCV+7~, PCV+9, PCV+10, PCV+12
X(	PCV+9, PCV+10*
Y	ERAS+2~, ERAS+4, ERAS+5, ERAS+12, ERAS+13, ERAS+15, ERAS+16, ERAS+17, ERAS+19, ERAS+20 , ERAS+23, ERAS+24, ERAS+25, ERAS+31, ERAS+32, ERAS+33, BNII+1~, BNII+2, BNII+3, BNII+5 , BNII+6, PCV+2~, PCV+4*, PCV+5
Z	ISTI+30, ISTI+31, ISTI+32, ISTI+33, ISTI+34, ISTI+36, ISTI+37, ISTI+38, ISTI+39, ERAS+2~ , ERAS+3, ERAS+5, ERAS+7, ERAS+9, ERAS+13, ERAS+16, ERAS+17, ERAS+20, ERAS+21, ERAS+22 , ERAS+25, ERAS+26, ERAS+29, ERAS+32, ERAS+33, ERAS+35, ERAS+37, ERAS+38, ERAS+40, BNI+4 , BNIMH+2*

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP3D24

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items