Routine: BGPMUD01

Package	Total	Call Graph
IHS GPRA Information System	1	($$PRV,$$VSTCPT)^BGPMUUT1
IHS Patient	1	$$AGE^AUPNPAT
Kernel	1	$$FMADD^XLFDT

Package	Total	Caller Graph
IHS GPRA Information System	1	BGPMUD02

Entry Points

Name	Comments	DBIA/ICR reference
TOBU	;;
HFA(BGPTOBU,BGPTOBN)	;build arrays of health factor pointers ; BGPTOBU(<health factor pointer>) array of health factors indicating tobacco user ; BGPTOBN(<health factor pointer>) array of health factors indicating non-tobacco user
CPT1	;;
CPT2	;;
EM2(DFN,VIEN,BGP2,BGPDT)	;
TOTAL(DFN,BGPNUM,BGPMUTF,BGPDSTR,BGPNSTR)	;See where this patient ends up ; BGPDSTR = Denominator string: encounter dates in FM format pieced by ";" ; BGPNSTR = Numerator string: <health factor text> ";" <health factor edit date in FM format>
TEST	; debug target
ENTRY	;EP ; expects: ; DFN = patient code from VA PATIENT file ; BGPBDATE = begin date of report ; BGPEDATE = end date of report ; BGPPROV = provider code from NEW PERSON file ; BGPMUTF = timeframe variable - "C"=current year; "P"=previous year; "B"=baseline year
TOBN	;;
EM1(DFN,VIEN,BGP1,BGPDT)	;

External References

Name	Field # of Occurrence
$$AGE^AUPNPAT	ENTRY+15
$$PRV^BGPMUUT1	ENTRY+27
$$VSTCPT^BGPMUUT1	EM2+3, EM1+3
$$FMADD^XLFDT	ENTRY+45

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVHF - [#9000010.23]	ENTRY+50
^AUPNVHF("AD"	ENTRY+49
^AUPNVSIT - [#9000010]	ENTRY+25, ENTRY+48
^AUPNVSIT("AA"	ENTRY+23, ENTRY+24, ENTRY+46, ENTRY+47
^AUTTHF("B"	HFA+9, HFA+17
^TMP("BGPMU0028A"	TOTAL+5, TOTAL+6, TOTAL+7, TOTAL+8, TOTAL+13, TOTAL+14, TOTAL+17, TOTAL+18, TOTAL+21, TOTAL+22 , TOTAL+23*

Label References

Name	Line Occurrences
EM1	ENTRY+29
EM2	ENTRY+28
HFA	ENTRY+44
TOTAL	ENTRY+55

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ENTRY+58!
BGP1	ENTRY+7~, ENTRY+22, ENTRY+23, ENTRY+24, ENTRY+29, ENTRY+32, ENTRY+33, ENTRY+37, EM1~, EM1+2 , EM1+4
BGP2	ENTRY+7~, ENTRY+22, ENTRY+23, ENTRY+24, ENTRY+28, ENTRY+32, ENTRY+33, ENTRY+37, EM2~, EM2+2 , EM2+4
BGPAGEE	ENTRY+7~, ENTRY+15*, ENTRY+17
>> BGPBDATE	ENTRY+15, ENTRY+19, ENTRY+45
BGPDEN	ENTRY+7~, ENTRY+10, ENTRY+35, TOTAL+12, TOTAL+25
BGPDSTR	ENTRY+7~, ENTRY+12, ENTRY+37, ENTRY+55, TOTAL~, TOTAL+14, TOTAL+18, TOTAL+22, TOTAL+25
BGPDT	ENTRY+7~, ENTRY+25, ENTRY+28, ENTRY+29, ENTRY+48, ENTRY+51, ENTRY+52, TOTAL+4~, EM2~, EM2+4 , EM1~, EM1+4
>> BGPEDATE	ENTRY+19
BGPH	ENTRY+40~, ENTRY+51, ENTRY+52
BGPHFF	ENTRY+40~, ENTRY+41, ENTRY+46, ENTRY+47, ENTRY+51, ENTRY+52*, ENTRY+53
BGPHFI	ENTRY+8~, ENTRY+50*, ENTRY+51, ENTRY+52
BGPI	EM2+1~, EM2+2, EM1+1~, EM1+2, HFA+3~, HFA+6, HFA+14
>> BGPICARE("MU.EP.0028a.1"	TOTAL+25*
>> BGPIEN	ENTRY+49*, ENTRY+50
BGPIND	HFA+3~, HFA+9, HFA+10, HFA+17, HFA+18
BGPL	ENTRY+58!
BGPLHTS	ENTRY+58!
BGPLHTS1	ENTRY+58!
BGPLWTS	ENTRY+58!
BGPLWTS1	ENTRY+58!
BGPMUTF	ENTRY+55, TOTAL~, TOTAL+5, TOTAL+6, TOTAL+7, TOTAL+8, TOTAL+13, TOTAL+14, TOTAL+17, TOTAL+18 , TOTAL+21, TOTAL+22, TOTAL+23, TOTAL+25
BGPNSTR	ENTRY+7~, ENTRY+13, ENTRY+51, ENTRY+52*, ENTRY+55, TOTAL~, TOTAL+18, TOTAL+25
BGPNUM	ENTRY+7~, ENTRY+11, ENTRY+53, ENTRY+55, TOTAL~, TOTAL+15, TOTAL+19, TOTAL+25
>> BGPPROV	ENTRY+27
BGPTMP	EM2+1~, EM2+2, EM2+3, EM1+1~, EM1+2, EM1+3, HFA+3~, HFA+5, HFA+6, HFA+7 , HFA+8, HFA+9, HFA+10, HFA+13, HFA+14, HFA+15, HFA+16, HFA+17, HFA+18
BGPTOBN	ENTRY+40~, ENTRY+43*, ENTRY+44, HFA~, HFA+12
BGPTOBN(	ENTRY+52, HFA+18*
BGPTOBU	ENTRY+40~, ENTRY+42*, ENTRY+44, HFA~, HFA+4
BGPTOBU(	ENTRY+51, HFA+10*
DEN1CT	TOTAL+4~, TOTAL+8, TOTAL+13, TOTAL+14
DFN	ENTRY+15, ENTRY+23, ENTRY+24, ENTRY+28, ENTRY+29, ENTRY+46, ENTRY+47, ENTRY+55, TOTAL~, TOTAL+14 , TOTAL+18, TOTAL+22, EM2~, EM2+3, EM1~, EM1+3
END	ENTRY+7~, ENTRY+19*, ENTRY+23, ENTRY+46
EXCEPT	ENTRY+58!
FIRST	ENTRY+7~, ENTRY+23, ENTRY+24, ENTRY+46, ENTRY+47
FOLLOW	ENTRY+58!
IEN	ENTRY+7~
INCL1CT	TOTAL+4~, TOTAL+6, TOTAL+16, TOTAL+17
NORMAL	ENTRY+58!
NOT1CT	TOTAL+4~, TOTAL+7, TOTAL+20, TOTAL+21
PT1	TOTAL+4~, TOTAL+9, TOTAL+11, TOTAL+18, TOTAL+22, TOTAL+23
PTCNT	TOTAL+4~, TOTAL+9, TOTAL+10, TOTAL+23
START	ENTRY+7~, ENTRY+19, ENTRY+23, ENTRY+45, ENTRY+46
TERMINAL	ENTRY+58!
TOTALS	TOTAL+4~, TOTAL+5*, TOTAL+9
U	ENTRY+25, ENTRY+48, ENTRY+50, TOTAL+9, TOTAL+14, TOTAL+18, TOTAL+22, TOTAL+23, TOTAL+25
VDATE	ENTRY+7~
VIEN	ENTRY+7~, ENTRY+24, ENTRY+25, ENTRY+27, ENTRY+28, ENTRY+29, ENTRY+47, ENTRY+48, ENTRY+49, EM2~ , EM2+3, EM1~, EM1+3
X	ENTRY+58!, EM2+3, EM2+4, EM1+3, EM1+4
Y	ENTRY+58!

Customize PDF page

Package: IHS GPRA Information System

Routine: BGPMUD01

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items

Name	Field # of Occurrence
$T(CPT1+BGPI	EM1+2
$T(CPT2+BGPI	EM2+2
$T(TOBN+BGPI	HFA+15
$T(TOBU+BGPI	HFA+7