Routine: BGP7D31

Package	Total	Call Graph
IHS GPRA Information System	6	$$DATE^BGP1UTL $$ASSEV^BGP7D22 ($$CPT,$$TRAN)^BGP7DU $$DATE^BGP7UTL ($$CPTREFT,$$NMIREF)^BGP7UTL1 $$ICD^BGP7UTL2
Patient Care Component Reports	2	$$START1^APCLDF ($$CLINIC,$$PRIMPOV)^APCLV
IHS Patient	1	$$DOB^AUPNPAT
IHS VA Utilities	1	$$VALI^XBDIQ1
Kernel	1	$$FMTE^XLFDT

Package	Total	Caller Graph
IHS GPRA Information System	13	BGP7D28 BGP7D33 BGP7D34 BGP7D35 BGP7D36 BGP7D37 BGP7D38 BGP7D3A BGP7D3B BGP7D811 BGP7D86 BGP7DPA1 BGP7EL31

Name	Comments	DBIA/ICR reference
MMRCONT(P,C,ED)	;EP - ANApHYLAXIS/NEOMYCIN/IMMUNE CONTRAINDICATION
BI()	;EP
HOSP(P,BDATE,EDATE)	;EP
ANEGCONT(P,C,ED)	;EP - ANALPHYLAXIS/EGG CONTRAINDICATION
ERURG(P,BDATE,EDATE)	;EP
LAST(P,BDATE,EDATE)	;EP last asthma dx
II	;EP
SEVS
SEV(P,BDATE,EDATE)	;EP
V2ASTH(P,BDATE,EDATE)	;EP
ANNECONT(P,C,ED)	;EP - ANALPHYLAXIS/NEOMYCIN CONTRAINDICATION
PNEU(P,BDATE,EDATE,FORE)	;EP
ANCONT(P,C,ED)	;EP - ANALPHYLAXIS CONTRAINDICATION
ANIMCONT(P,C,ED)	;EP - ANApHYLAXIS/IMMUNE CONTRAINDICATION

Name	Field # of Occurrence
$$START1^APCLDF	ERURG+5, V2ASTH+4, LAST+3, HOSP+4, PNEU+7, PNEU+9, PNEU+11, PNEU+13, PNEU+15, PNEU+17
$$CLINIC^APCLV	ERURG+14
$$PRIMPOV^APCLV	ERURG+16, HOSP+13
$$DOB^AUPNPAT	II+10, PNEU+28, PNEU+30, PNEU+32, PNEU+34, PNEU+36, PNEU+38
$$DATE^BGP1UTL	ERURG+18
$$ASSEV^BGP7D22	V2ASTH+20
$$CPT^BGP7DU	PNEU+19
$$TRAN^BGP7DU	PNEU+21
$$DATE^BGP7UTL	II+17, V2ASTH+15, LAST+4
$$CPTREFT^BGP7UTL1	PNEU+38
$$NMIREF^BGP7UTL1	PNEU+28, PNEU+30, PNEU+32, PNEU+34, PNEU+36
$$ICD^BGP7UTL2	ERURG+16, V2ASTH+13, SEV+11, HOSP+13
$$VALI^XBDIQ1	SEV+12
$$FMTE^XLFDT	ERURG+5, V2ASTH+4, LAST+3, HOSP+4, PNEU+5, PNEU+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX("B"	ERURG+7, V2ASTH+6, SEV+3, HOSP+6, PNEU+19, PNEU+21, PNEU+38
^AUPNPROB - [#9000011]	SEV+5, SEV+6, SEV+7, SEV+8, SEV+9, SEVS, SEVS+1, SEVS+2
^AUPNPROB("AC"	SEV+4
^AUPNVAST("AS"	SEVS+6, SEVS+9, SEVS+11
^AUPNVPOV - [#9000010.07]	V2ASTH+13
^AUPNVPOV("AD"	V2ASTH+13
^AUPNVSIT - [#9000010]	ERURG+10, ERURG+11, ERURG+12, ERURG+13, ERURG+16, V2ASTH+9, V2ASTH+10, V2ASTH+11, V2ASTH+12, HOSP+9 , HOSP+10, HOSP+11, HOSP+12, HOSP+13
^AUPNVSIT("AC"	ERURG+3, V2ASTH+2, HOSP+2
^AUTTIMM("C"	PNEU+28, PNEU+30, PNEU+32, PNEU+34, PNEU+36, ANCONT+2, ANNECONT+2, MMRCONT+2, ANIMCONT+2, ANEGCONT+2
^AUTTIMM(0	BI+1
^BICONT - [#9002084.81]	ANCONT+5, ANCONT+10, ANNECONT+5, ANNECONT+10, ANNECONT+11, ANNECONT+12, MMRCONT+5, MMRCONT+10, MMRCONT+11, MMRCONT+12 , ANIMCONT+5, ANIMCONT+10, ANIMCONT+11, ANEGCONT+5, ANEGCONT+10, ANEGCONT+11
^BIPC - [#9002084.11]	ANCONT+3, ANCONT+6, ANCONT+9, ANNECONT+3, ANNECONT+6, ANNECONT+9, MMRCONT+3, MMRCONT+6, MMRCONT+9, ANIMCONT+3 , ANIMCONT+6, ANIMCONT+9, ANEGCONT+3, ANEGCONT+6, ANEGCONT+9
^BIPC("AC"	ANCONT+2, ANNECONT+2, MMRCONT+2, ANIMCONT+2, ANEGCONT+2
^TMP($J	ERURG+4!, ERURG+6, ERURG+9, V2ASTH+3!, V2ASTH+5, V2ASTH+8, V2ASTH+15, HOSP+3!, HOSP+5, HOSP+8
^XTMP("BGPSNOMEDSUBSET"	SEV+13

Name	Line Occurrences
$$ANCONT	PNEU+25
$$BI	PNEU+7
$$ERURG	II+8
$$HOSP	II+7
$$SEV	II+10
$$V2ASTH	II+6
SEVS	SEV+11, SEV+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	II+18!, ERURG+16, V2ASTH+13, HOSP+13, PNEU+17, PNEU+19, PNEU+20, PNEU+21, PNEU+22
A	II+18!, ERURG+1~, ERURG+5, V2ASTH+4, V2ASTH+19~, SEV+1~, HOSP+4*
B	II+18!, ERURG+5, V2ASTH+4, V2ASTH+19~, SEV+1~, HOSP+4*
>> BD	PNEU+3*, PNEU+19, PNEU+21
BDATE	II+18!, ERURG~, ERURG+5, V2ASTH~, V2ASTH+4, SEV~, LAST~, LAST+3, HOSP~, HOSP+4 , PNEU~, PNEU+3, PNEU+6*, PNEU+7, PNEU+9, PNEU+11, PNEU+13, PNEU+15, PNEU+17
>> BGPACTCL	II+4
>> BGPACTUP	II+2, II+3
>> BGPBDATE	II+6, II+7, II+8
>> BGPD1	II+1, II+3
>> BGPD2	II+1, II+4, II+5, II+17
>> BGPD3	II+1*
>> BGPD4	II+1*
>> BGPD5	II+1*
>> BGPD6	II+1*
>> BGPD7	II+1*
>> BGPD8	II+1*
>> BGPD9	II+1*
>> BGPEDATE	II+6, II+7, II+8, II+10
BGPG	LAST+1!, PNEU+1!, PNEU+17!
BGPG(1	LAST+4, PNEU+8, PNEU+10, PNEU+12, PNEU+14, PNEU+16, PNEU+18
>> BGPHOSP	II+1, II+7, II+17
>> BGPLPNU	PNEU+2, PNEU+8, PNEU+10, PNEU+12, PNEU+14, PNEU+16, PNEU+18, PNEU+20, PNEU+22*, PNEU+23
>> BGPN1	II+1, II+6, II+7, II+16, II+17
>> BGPN2	II+1, II+7
>> BGPN3	II+1, II+9, II+17
>> BGPN4	II+1, II+11
>> BGPN5	II+1, II+12
>> BGPN6	II+1, II+13
>> BGPN7	II+1, II+14
>> BGPN8	II+1, II+15
>> BGPNER	II+1, II+8, II+9, II+17
>> BGPSEV	II+1, II+10, II+11, II+12, II+13, II+14, II+15, II+17
>> BGPSTOP	II+2, II+5
>> BGPVALUE	II+17*
>> BGPZ	PNEU+25*
C	II+18!, ERURG+14*, ERURG+15, ANCONT~, ANCONT+2, ANNECONT~, ANNECONT+2, MMRCONT~, MMRCONT+2, ANIMCONT~ , ANIMCONT+2, ANEGCONT~, ANEGCONT+2
D	II+18!, ERURG+1~, V2ASTH+13, V2ASTH+14, SEVS+6, SEVS+7, SEVS+9, SEVS+11, ANCONT+6, ANCONT+7 , ANCONT+10, ANNECONT+6, ANNECONT+7, ANNECONT+10, ANNECONT+11, ANNECONT+12, MMRCONT+6, MMRCONT+7, MMRCONT+10, MMRCONT+11 , MMRCONT+12, ANIMCONT+6, ANIMCONT+7, ANIMCONT+10, ANIMCONT+11, ANEGCONT+6*, ANEGCONT+7, ANEGCONT+10, ANEGCONT+11
>> DFN	II+6, II+7, II+8, II+10
E	II+18!, ERURG+1~, ERURG+5, V2ASTH+4, SEVS+9, LAST+3, HOSP+4, PNEU+7, PNEU+9, PNEU+11 , PNEU+13, PNEU+15, PNEU+17*
ED	PNEU+4*, PNEU+19, PNEU+21, PNEU+25, PNEU+28, PNEU+30, PNEU+32, PNEU+34, PNEU+36, PNEU+38 , ANCONT~, ANCONT+9, ANNECONT~, ANNECONT+9, MMRCONT~, MMRCONT+9, ANIMCONT~, ANIMCONT+9, ANEGCONT~, ANEGCONT+9
EDATE	II+18!, ERURG~, ERURG+5, V2ASTH~, V2ASTH+4, V2ASTH+20, SEV~, SEV+5, SEV+6, SEVS+5 , LAST~, LAST+3, HOSP~, HOSP+4, PNEU~, PNEU+4, PNEU+5*, PNEU+7, PNEU+9, PNEU+11 , PNEU+13, PNEU+15, PNEU+17
>> EDATE1	SEVS+5*, SEVS+6
F	II+18!
FORE	PNEU~
G	ERURG+1~, ERURG+9, ERURG+16, ERURG+18, V2ASTH+8, V2ASTH+15, V2ASTH+17, V2ASTH+19~, V2ASTH+20, V2ASTH+21 , SEV+1~, SEV+4, HOSP+8, HOSP+13, HOSP+15, PNEU+28, PNEU+29, PNEU+30, PNEU+31, PNEU+32* , PNEU+33, PNEU+34, PNEU+35, PNEU+36, PNEU+37, ANCONT+2, ANCONT+10, ANCONT+11, ANNECONT+2, ANNECONT+10 , ANNECONT+11, ANNECONT+12, ANNECONT+13, MMRCONT+2, MMRCONT+10, MMRCONT+11, MMRCONT+12, MMRCONT+14, ANIMCONT+2, ANIMCONT+10 , ANIMCONT+11, ANIMCONT+13, ANEGCONT+2, ANEGCONT+10, ANEGCONT+11, ANEGCONT+12
G(	SEVS+4
G(0	SEVS+4
G(9999999	SEVS, SEVS+2
H	II+18!, ERURG+16, ERURG+18, HOSP+8, HOSP+13*, HOSP+15
>> LAST	SEVS+9*, SEVS+10, SEVS+11
OUT	SEV+1~
P	II+18!, ERURG~, ERURG+2, ERURG+3, ERURG+5, V2ASTH~, V2ASTH+1, V2ASTH+2, V2ASTH+4, V2ASTH+20 , SEV~, SEV+4, SEVS+6, SEVS+9, SEVS+11, LAST~, LAST+3, HOSP~, HOSP+1, HOSP+2 , HOSP+4, PNEU~, PNEU+7, PNEU+9, PNEU+11, PNEU+13, PNEU+15, PNEU+17, PNEU+19, PNEU+21 , PNEU+25, PNEU+28, PNEU+30, PNEU+32, PNEU+34, PNEU+36, PNEU+38, ANCONT~, ANCONT+2, ANNECONT~ , ANNECONT+2, MMRCONT~, MMRCONT+2, ANIMCONT~, ANIMCONT+2, ANEGCONT~, ANEGCONT+2
>> R	PNEU+38, PNEU+39, ANCONT+3, ANCONT+4, ANCONT+5, ANCONT+10, ANNECONT+3, ANNECONT+4, ANNECONT+5, ANNECONT+10 , ANNECONT+11, ANNECONT+12, MMRCONT+3, MMRCONT+4, MMRCONT+5, MMRCONT+10, MMRCONT+11, MMRCONT+12, ANIMCONT+3, ANIMCONT+4 , ANIMCONT+5, ANIMCONT+10, ANIMCONT+11, ANEGCONT+3, ANEGCONT+4, ANEGCONT+5, ANEGCONT+10, ANEGCONT+11
S	II+18!, V2ASTH+19~, SEV+1~, SEV+12, SEV+13, SEVS+11, SEVS+12
SNT	SEV+1~, SEV+2*, SEV+13
T	II+18!, ERURG+1~, ERURG+7, ERURG+8, ERURG+16, V2ASTH+6, V2ASTH+7, V2ASTH+13, V2ASTH+19~, SEV+1~ , SEV+3, SEV+11, HOSP+6, HOSP+7, HOSP+13
U	II+9, II+16, II+17, ERURG+9, ERURG+11, ERURG+12, ERURG+13, ERURG+16, ERURG+18, V2ASTH+8 , V2ASTH+10, V2ASTH+11, V2ASTH+12, V2ASTH+13, V2ASTH+15, V2ASTH+17, SEV+5, SEV+6, SEV+7, SEV+8 , SEV+9, SEVS, SEVS+2, LAST+4, HOSP+8, HOSP+10, HOSP+11, HOSP+12, HOSP+13, PNEU+8 , PNEU+10, PNEU+12, PNEU+14, PNEU+16, PNEU+18, PNEU+20, PNEU+22, PNEU+23, PNEU+26, PNEU+29 , PNEU+31, PNEU+33, PNEU+35, PNEU+37, PNEU+39, ANCONT+3, ANCONT+6, ANCONT+9, ANCONT+10, ANNECONT+3 , ANNECONT+6, ANNECONT+9, ANNECONT+10, ANNECONT+11, ANNECONT+12, MMRCONT+3, MMRCONT+6, MMRCONT+9, MMRCONT+10, MMRCONT+11 , MMRCONT+12, ANIMCONT+3, ANIMCONT+6, ANIMCONT+9, ANIMCONT+10, ANIMCONT+11, ANEGCONT+3, ANEGCONT+6, ANEGCONT+9, ANEGCONT+10 , ANEGCONT+11
V	II+18!, ERURG+1~, ERURG+9, ERURG+10, ERURG+11, ERURG+12, ERURG+13, ERURG+14, ERURG+16, V2ASTH+8 , V2ASTH+9, V2ASTH+10, V2ASTH+11, V2ASTH+12, V2ASTH+13, V2ASTH+19~, SEV+1~, HOSP+8*, HOSP+9, HOSP+10 , HOSP+11, HOSP+12, HOSP+13
X	II+18!, ERURG+1~, ERURG+9, V2ASTH+8, V2ASTH+15, V2ASTH+19~, SEV+1~, SEV+4, SEV+5, SEV+6 , SEV+7, SEV+8, SEV+9, SEV+12, SEVS, SEVS+1, SEVS+2, SEVS+4, LAST+3, HOSP+8 , PNEU+7, PNEU+9, PNEU+11, PNEU+13, PNEU+15, PNEU+25, PNEU+26, ANCONT+1~, ANCONT+2, ANCONT+3 , ANCONT+6, ANCONT+9, ANNECONT+1~, ANNECONT+2, ANNECONT+3, ANNECONT+6, ANNECONT+9, MMRCONT+1~, MMRCONT+2, MMRCONT+3 , MMRCONT+6, MMRCONT+9, ANIMCONT+1~, ANIMCONT+2, ANIMCONT+3, ANIMCONT+6, ANIMCONT+9, ANEGCONT+1~, ANEGCONT+2*, ANEGCONT+3 , ANEGCONT+6, ANEGCONT+9
Y	II+18!, V2ASTH+13, V2ASTH+19~, SEV+1~, SEV+7, SEV+11, SEVS+1, SEVS+2, LAST+2, LAST+3 , ANCONT+2, ANNECONT+2, MMRCONT+2, ANIMCONT+2, ANEGCONT+2*
Z	II+16*, II+17, II+18!

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP7D31

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 13

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: