Routine: BGP8D35

Package	Total	Call Graph
IHS GPRA Information System	7	$$HIVDX^BGP8D24A ($$ANCONT,$$MMRCONT)^BGP8D31 ($$IMMREF,GETIMMS)^BGP8D32 ($$IMMUNO,$$LYMPHO)^BGP8D36 ($$IPLSNOND,$$PLTAXND)^BGP8DU $$CPTREFT^BGP8UTL1 $$ICD^BGP8UTL2
DRG Grouper	1	($$CODEN,$$CPT)^ICPTCOD
IHS Patient	1	$$DOB^AUPNPAT
Kernel	1	$$FMDIFF^XLFDT
Patient Care Component Reports	1	$$START1^APCLDF

Package	Total	Caller Graph
IHS GPRA Information System	1	BGP8D32

Entry Points

Name	Comments	DBIA/ICR reference
VAR(P,EDATE)	;EP
I
HIB(P,EDATE)	;EP
HEP(P,EDATE)	;EP
EVIDVAR(P,C,ED)	;EP - HX CHICKEN POX, IMMUNE
PNEUMO(P,EDATE,MINN)	;EP

External References

Name	Field # of Occurrence
$$START1^APCLDF	VAR+19, VAR+22, I+2, HIB+26, PNEUMO+27
$$DOB^AUPNPAT	VAR+10, VAR+19, VAR+22, VAR+29, VAR+34, HEP+9, I+2, I+7, I+12, HIB+8 , HIB+26, HIB+39, HIB+44, HIB+47, PNEUMO+9, PNEUMO+27, PNEUMO+38, PNEUMO+43
$$HIVDX^BGP8D24A	VAR+29
$$ANCONT^BGP8D31	I+17, HIB+49, PNEUMO+48
$$MMRCONT^BGP8D31	VAR+31
$$IMMREF^BGP8D32	HIB+47
GETIMMS^BGP8D32	VAR+6, HEP+5, HIB+5, PNEUMO+6
$$IMMUNO^BGP8D36	VAR+28
$$LYMPHO^BGP8D36	VAR+30
$$IPLSNOND^BGP8DU	VAR+25, I+5
$$PLTAXND^BGP8DU	VAR+24, I+4
$$CPTREFT^BGP8UTL1	I+12, HIB+44, PNEUMO+43
$$ICD^BGP8UTL2	HEP+15, HEP+17, PNEUMO+14, PNEUMO+16
$$CODEN^ICPTCOD	VAR+40
$$CPT^ICPTCOD	VAR+15, VAR+17, HEP+15, HEP+17, HIB+13, HIB+15, PNEUMO+14, PNEUMO+16
$$FMDIFF^XLFDT	HEP+21, HIB+19, HIB+31, PNEUMO+20, PNEUMO+32

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: 4,1:3)_U_$S(BGPNMI:"NMI Variable: Q $S(BGPNMI Line Location: VAR+38
Function Call: READ	Timeout: 4,1:3)_U_$S(BGPNMI:"NMI Variable: Q $S(BGPNMI Line Location: VAR+42
Function Call: READ	Timeout: 4,1:3)_U_$S(BGPNMI:"NMI",1:"Ref")_" Variable: Q $S(BGPNMI Line Location: I+11
Function Call: READ	Timeout: 4,1:3)_U_$S(BGPNMI:"NMI",1:"Ref")_" Variable: Q $S(BGPNMI Line Location: I+16
Function Call: READ	Timeout: 4,1:3)_U_$S(BGPNMI:"NMI",1:"Ref")_" Variable: Q $S(BGPNMI Line Location: HIB+43
Function Call: READ	Timeout: $P(R,U,3)="N" Variable: S Line Location: HIB+45
Function Call: READ	Timeout: 4,1:3)_U_$S(BGPNMI:"NMI",1:"Ref")_" Variable: Q $S(BGPNMI Line Location: HIB+48
Function Call: READ	Timeout: 4,1:3)_U_$S(BGPNMI:"NMI",1:"Ref")_" Variable: Q $S(BGPNMI Line Location: PNEUMO+42
Function Call: READ	Timeout: 4,1:3)_U_$S(BGPNMI:"NMI",1:"Ref")_" Variable: Q $S(BGPNMI Line Location: PNEUMO+47

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX("B"	HEP+10, I+12, HIB+44, PNEUMO+14, PNEUMO+16, PNEUMO+43
^AUPNPREF - [#9000022]	VAR+37, VAR+41, I+10, HIB+42, PNEUMO+41
^AUPNPREF("AA"	VAR+37, VAR+41, I+10, HIB+42, PNEUMO+41
^AUPNVCPT - [#9000010.18]	VAR+15, HEP+15, HIB+13, PNEUMO+14
^AUPNVCPT("AD"	VAR+14, HEP+14, HIB+12, PNEUMO+13
^AUPNVSIT - [#9000010]	VAR+13, HEP+13, HIB+11, PNEUMO+12
^AUPNVSIT("AA"	VAR+11, VAR+12, HEP+11, HEP+12, HIB+9, HIB+10, PNEUMO+10, PNEUMO+11
^AUPNVTC - [#9000010.33]	VAR+17, HEP+17, HIB+15, PNEUMO+16
^AUPNVTC("AD"	VAR+16, HEP+16, HIB+14, PNEUMO+15
^AUTTIMM("C"	VAR+36, I+9, HIB+41, PNEUMO+40, EVIDVAR+2
^BICONT - [#9002084.81]	EVIDVAR+5, EVIDVAR+10, EVIDVAR+11
^BIPC - [#9002084.11]	EVIDVAR+3, EVIDVAR+6, EVIDVAR+9
^BIPC("AC"	EVIDVAR+2

Label References

Name	Line Occurrences
$$EVIDVAR	VAR+26

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	VAR+19, VAR+22, I+2, HIB+26, PNEUMO+27*
B	VAR+1~, VAR+34, VAR+37, VAR+41, I+7, I+10, HIB+39, HIB+42, PNEUMO+38, PNEUMO+41
BD	VAR+1~, VAR+10, VAR+11, HEP+1~, HEP+9, HEP+11, HIB+8, HIB+9, PNEUMO+9, PNEUMO+10
BGP10743	HEP+1~, HEP+2, HEP+11, HEP+15, HEP+17, I
>> BGPADOL	I
BGPAHIB	HIB+2!, HIB+25
BGPAHIB(	HIB+6, HIB+27
BGPAHIB(9999999	HIB+13, HIB+15
BGPAPNU	PNEUMO+3!, PNEUMO+26
BGPAPNU(	PNEUMO+7, PNEUMO+28
BGPAPNU(9999999	PNEUMO+14, PNEUMO+16
BGPC	VAR+1~, HEP+1~, HIB+1!, PNEUMO+1!
BGPG	VAR+1~, VAR+19!, VAR+22!, HEP+1~, I+2!, HIB+1!, HIB+26!, PNEUMO+1!, PNEUMO+27!
BGPG(	HIB+27, PNEUMO+28
BGPG(1	VAR+20, VAR+23, I+3, HIB+27, PNEUMO+28
BGPHEP	HEP+1~, HEP+24*, HEP+26, I
BGPHEP(	HEP+7*, HEP+19, HEP+21!, HEP+24
BGPHEP(9999999	HEP+15, HEP+17
BGPHIB	HIB+2!, HIB+22, HIB+23, HIB+25!, HIB+34*, HIB+35
BGPHIB(	HIB+6, HIB+17, HIB+19!, HIB+22, HIB+27, HIB+29, HIB+31!, HIB+34
BGPHIB(9999999	HIB+13, HIB+15
BGPIMM	VAR+1~, VAR+35, VAR+36, VAR+39, VAR+40, I+8, I+9, HIB+40, HIB+41, HIB+47* , PNEUMO+39*, PNEUMO+40
BGPNMI	VAR+1~, VAR+34, VAR+37, VAR+38, VAR+41, VAR+42, I+7, I+10, I+11, I+13 , HIB+39, HIB+42, HIB+43, HIB+45, HIB+48, PNEUMO+38, PNEUMO+41, PNEUMO+42, PNEUMO+44
BGPPNU	PNEUMO+3!, PNEUMO+23, PNEUMO+24, PNEUMO+26!, PNEUMO+35*, PNEUMO+36
BGPPNU(	PNEUMO+7, PNEUMO+18, PNEUMO+20!, PNEUMO+23, PNEUMO+28, PNEUMO+30, PNEUMO+32!, PNEUMO+35
BGPPNU(9999999	PNEUMO+14, PNEUMO+16
BGPVARI	VAR+1~, VAR+3!, VAR+18
BGPVARI(9999999	VAR+15, VAR+17
BGPX	VAR+1~, VAR+6, HEP+1~, HEP+5, HIB+1!, HIB+5, PNEUMO+1!, PNEUMO+6
BGPX(	HEP+7, HIB+6, PNEUMO+7
BGPX(0	VAR+8
BGPZ	VAR+1~, VAR+26, VAR+28, VAR+29, VAR+30, VAR+31, I+17, HIB+49, PNEUMO+48
C	VAR+1~, VAR+5, VAR+6, HEP+1~, HEP+4, HEP+5, HEP+19, HEP+20, HIB+4, HIB+5 , HIB+17, HIB+18, HIB+29, HIB+30, PNEUMO+5, PNEUMO+6, PNEUMO+18, PNEUMO+19, PNEUMO+30*, PNEUMO+31 , EVIDVAR~, EVIDVAR+2
>> D	VAR+37, VAR+41, I+10, HIB+42, PNEUMO+41, EVIDVAR+6, EVIDVAR+7, EVIDVAR+10, EVIDVAR+11
>> E	VAR+19, VAR+22, VAR+34, VAR+37, VAR+41, I+2, I+7, I+10, HIB+26, HIB+39* , HIB+42, PNEUMO+27, PNEUMO+38, PNEUMO+41
ED	VAR+1~, VAR+10, VAR+11, VAR+12, VAR+15, VAR+17, HEP+1~, HEP+9, HEP+11, HEP+12 , HEP+15, HEP+17, HIB+8, HIB+9, HIB+10, HIB+13, HIB+15, PNEUMO+9, PNEUMO+10, PNEUMO+11 , PNEUMO+14, PNEUMO+16, EVIDVAR~, EVIDVAR+9
EDATE	VAR~, VAR+6, VAR+10, VAR+19, VAR+22, VAR+24, VAR+25, VAR+26, VAR+28, VAR+29 , VAR+30, VAR+31, VAR+34, HEP~, HEP+5, HEP+9, I+2, I+4, I+5, I+7 , I+12, I+17, HIB~, HIB+5, HIB+8, HIB+26, HIB+39, HIB+44, HIB+47, HIB+49 , PNEUMO~, PNEUMO+6, PNEUMO+9, PNEUMO+27, PNEUMO+38, PNEUMO+43, PNEUMO+48
G	VAR+1~, VAR+10, HEP+1~, HEP+9, HIB+8, PNEUMO+9, EVIDVAR+2, EVIDVAR+10, EVIDVAR+11*, EVIDVAR+12
>> I	VAR+36, VAR+37, VAR+40, VAR+41, I+9, I+10, HIB+41, HIB+42, PNEUMO+40*, PNEUMO+41
MINN	PNEUMO~, PNEUMO+24, PNEUMO+36
P	VAR~, VAR+6, VAR+10, VAR+11, VAR+12, VAR+19, VAR+22, VAR+24, VAR+25, VAR+26 , VAR+28, VAR+29, VAR+30, VAR+31, VAR+34, VAR+37, VAR+41, HEP~, HEP+5, HEP+9 , HEP+11, HEP+12, I+2, I+4, I+5, I+7, I+10, I+12, I+17, HIB~ , HIB+5, HIB+8, HIB+9, HIB+10, HIB+26, HIB+39, HIB+42, HIB+44, HIB+47, HIB+49 , PNEUMO~, PNEUMO+6, PNEUMO+9, PNEUMO+10, PNEUMO+11, PNEUMO+27, PNEUMO+38, PNEUMO+41, PNEUMO+43, PNEUMO+48 , EVIDVAR~, EVIDVAR+2
R	VAR+1~, VAR+34, VAR+37, VAR+38, VAR+41, VAR+42, I+7, I+10, I+11, I+12 , I+13, HIB+39, HIB+42, HIB+43, HIB+44, HIB+45, HIB+47, HIB+48, PNEUMO+38, PNEUMO+41 , PNEUMO+42, PNEUMO+43, PNEUMO+44, EVIDVAR+3, EVIDVAR+4, EVIDVAR+5, EVIDVAR+10, EVIDVAR+11
T	HEP+1~, HEP+10*, HEP+15, HEP+17
U	VAR+8, VAR+15, VAR+17, VAR+18, VAR+20, VAR+23, VAR+24, VAR+25, VAR+27, VAR+28 , VAR+29, VAR+30, VAR+32, VAR+37, VAR+38, VAR+41, VAR+42, HEP+15, HEP+17, HEP+26 , I, I+3, I+4, I+5, I+10, I+11, I+13, I+18, HIB+13, HIB+15 , HIB+23, HIB+27, HIB+35, HIB+42, HIB+43, HIB+45, HIB+48, HIB+50, PNEUMO+14, PNEUMO+16 , PNEUMO+24, PNEUMO+28, PNEUMO+36, PNEUMO+41, PNEUMO+42, PNEUMO+44, PNEUMO+49, EVIDVAR+3, EVIDVAR+6, EVIDVAR+9 , EVIDVAR+10, EVIDVAR+11
V	VAR+1~, VAR+12, VAR+13, VAR+14, VAR+16, HEP+1~, HEP+12, HEP+13, HEP+14, HEP+16 , HIB+10, HIB+11, HIB+12, HIB+14, PNEUMO+11, PNEUMO+12, PNEUMO+13, PNEUMO+15
X	VAR+1~, VAR+14, VAR+15, VAR+16, VAR+17, VAR+26, VAR+27, VAR+31, VAR+32, VAR+37* , VAR+41, HEP+1~, HEP+7, HEP+14, HEP+15, HEP+16, HEP+17, HEP+19, HEP+20, HEP+21 , HEP+22, HEP+24, I+10, I+17, I+18, HIB+6, HIB+12, HIB+13, HIB+14, HIB+15 , HIB+17, HIB+18, HIB+19, HIB+20, HIB+22, HIB+27, HIB+29, HIB+30, HIB+31, HIB+32 , HIB+34, HIB+42, HIB+49, HIB+50, PNEUMO+7, PNEUMO+13, PNEUMO+14, PNEUMO+15, PNEUMO+16, PNEUMO+18 , PNEUMO+19, PNEUMO+20, PNEUMO+21, PNEUMO+23, PNEUMO+28, PNEUMO+30, PNEUMO+31, PNEUMO+32, PNEUMO+33, PNEUMO+35 , PNEUMO+41, PNEUMO+48, PNEUMO+49, EVIDVAR+1~, EVIDVAR+2*, EVIDVAR+3, EVIDVAR+6, EVIDVAR+9
Y	VAR+1~, VAR+15, VAR+17, VAR+37, VAR+41, HEP+1~, HEP+15, HEP+17, HEP+19, HEP+20 , HEP+21, HEP+22, I+10, HIB+13, HIB+15, HIB+17, HIB+18, HIB+19, HIB+20, HIB+29 , HIB+30, HIB+31, HIB+32, HIB+42, PNEUMO+14, PNEUMO+16, PNEUMO+18, PNEUMO+19, PNEUMO+20, PNEUMO+21 , PNEUMO+30, PNEUMO+31, PNEUMO+32, PNEUMO+33, PNEUMO+41, EVIDVAR+2*
Z	HEP+1~, HEP+15, HEP+17

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP8D35

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: