Routine: BGP8D31

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

Information

BGP8D31 ;IHS/CMI/LAB - MEASURE LOGIC;

Source Information

Source file <BGP8D31.m>

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
IHS GPRA Information System	6	$$ASSEV^BGP8D22 $$PAPHPVWH^BGP8D3 ($$CPT,$$TRAN,ALLCPT)^BGP8DU $$DATE^BGP8UTL ($$CPTREFT,$$NMIREF)^BGP8UTL1 $$ICD^BGP8UTL2
Kernel	2	($$FMADD,$$FMTE)^XLFDT $$UP^XLFSTR
Patient Care Component Reports	2	$$START1^APCLDF ($$CLINIC,$$PRIMPOV)^APCLV
IHS Patient	1	$$DOB^AUPNPAT
IHS VA Utilities	1	($$VAL,$$VALI)^XBDIQ1

Caller Graph

Caller Graph Total: 18

Package	Total	Caller Graph
IHS GPRA Information System	18	BGP8CU2 BGP8D28 BGP8D3 BGP8D33 BGP8D34 BGP8D35 BGP8D36 BGP8D37 BGP8D38 BGP8D3A BGP8D3B BGP8D3C BGP8D811 BGP8D86 BGP8DPA1 BGP8EL31 BGP8PC6 BGP8PC7

Entry Points

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
LOINC(A,B)	;
ERURG(P,BDATE,EDATE)	;EP
PAPHPV(P,EDATE,YEARS)	;EP - PAP AND HPV ON THE SAME DAY
HPV	;
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

External References

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 , PAPHPV+25, HPV+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
$$ASSEV^BGP8D22	V2ASTH+20
$$PAPHPVWH^BGP8D3	PAPHPV+6
$$CPT^BGP8DU	PNEU+19
$$TRAN^BGP8DU	PNEU+21
ALLCPT^BGP8DU	PAPHPV+30, HPV+22
$$DATE^BGP8UTL	II+17, ERURG+18, V2ASTH+15, LAST+4, HPV+38
$$CPTREFT^BGP8UTL1	PNEU+38
$$NMIREF^BGP8UTL1	PNEU+28, PNEU+30, PNEU+32, PNEU+34, PNEU+36
$$ICD^BGP8UTL2	ERURG+16, V2ASTH+13, SEV+11, HOSP+13
$$VAL^XBDIQ1	PAPHPV+39, HPV+31
$$VALI^XBDIQ1	SEV+12
$$FMADD^XLFDT	PAPHPV+6, PAPHPV+10, HPV+3
$$FMTE^XLFDT	ERURG+5, V2ASTH+4, LAST+3, HOSP+4, PNEU+5, PNEU+6, PAPHPV+25, HPV+17
$$UP^XLFSTR	PAPHPV+39, HPV+31

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	LOINC+3, LOINC+5
^ATXAX("B"	ERURG+7, V2ASTH+6, SEV+3, HOSP+6, PNEU+19, PNEU+21, PNEU+38, PAPHPV+11, PAPHPV+27, PAPHPV+30 , HPV+4, HPV+19
^ATXLAB - [#9002228]	PAPHPV+18, HPV+10
^ATXLAB("B"	PAPHPV+12, HPV+5
^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
^AUPNVLAB - [#9000010.09]	PAPHPV+16, PAPHPV+17, PAPHPV+18, PAPHPV+20, HPV+9, HPV+10, HPV+12
^AUPNVLAB("AE"	PAPHPV+13, PAPHPV+14, PAPHPV+15, HPV+6, HPV+7, HPV+8
^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
^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
^BWPCD - [#9002086.1]	PAPHPV+37, PAPHPV+38, PAPHPV+40, HPV+29, HPV+30, HPV+32
^BWPCD("C"	PAPHPV+36, HPV+28
^BWPN("B"	PAPHPV+4, PAPHPV+33, HPV+25
^LAB(60 - [#60]	PAPHPV+17
^LAB(95.3 - [#95.3]	LOINC+2, LOINC+4
^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
$$LOINC	PAPHPV+21, HPV+13
$$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, LOINC+1~ , LOINC+2, LOINC+3, LOINC+4, LOINC+5
A	II+18!, ERURG+1~, ERURG+5, V2ASTH+4, V2ASTH+19~, SEV+1~, HOSP+4*, LOINC~, LOINC+2, LOINC+4
B	II+18!, ERURG+5, V2ASTH+4, V2ASTH+19~, SEV+1~, HOSP+4, PAPHPV+1~, PAPHPV+13, HPV+6*, LOINC~ , LOINC+3, LOINC+5
>> 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, PAPHPV+10 , PAPHPV+13, PAPHPV+25, PAPHPV+30, PAPHPV+41, HPV+3*, HPV+6, HPV+17, HPV+22, HPV+33
BGP	PAPHPV+1~
>> BGPACTCL	II+4
>> BGPACTUP	II+2, II+3
BGPAHPV	PAPHPV+1~, HPV+2!
BGPAHPV(	HPV+10, HPV+14, HPV+38
BGPAHPV(9999999	HPV+18, HPV+24, HPV+35*
BGPAPAP	PAPHPV+1~
BGPAPAP(	PAPHPV+17, PAPHPV+18, PAPHPV+22*, HPV+37, HPV+38
BGPAPAP(9999999	PAPHPV+26, PAPHPV+32, PAPHPV+43*
>> BGPBDATE	II+6, II+7, II+8
BGPC	PAPHPV+1~, PAPHPV+9, HPV+1
>> 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!, PAPHPV+1~, PAPHPV+24!, PAPHPV+29!, HPV+16!, HPV+21!
BGPG(	PAPHPV+26, PAPHPV+32, HPV+18, HPV+24
BGPG(1	LAST+4, PNEU+8, PNEU+10, PNEU+12, PNEU+14, PNEU+16, PNEU+18
>> BGPHOSP	II+1, II+7, II+17
BGPLPAP	PAPHPV+1~, PAPHPV+3, PAPHPV+5, HPV+38*, HPV+39
>> BGPLPNU	PNEU+2, PNEU+8, PNEU+10, PNEU+12, PNEU+14, PNEU+16, PNEU+18, PNEU+20, PNEU+22*, PNEU+23
BGPLT	PAPHPV+1~, PAPHPV+12, PAPHPV+18, HPV+5, HPV+10
>> 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+1~, ANCONT+6* , ANCONT+7, ANCONT+10, ANNECONT+1~, ANNECONT+6, ANNECONT+7, ANNECONT+10, ANNECONT+11, ANNECONT+12, MMRCONT+1~, MMRCONT+6 , MMRCONT+7, MMRCONT+10, MMRCONT+11, MMRCONT+12, ANIMCONT+1~, ANIMCONT+6, ANIMCONT+7, ANIMCONT+10, ANIMCONT+11, ANEGCONT+1~ , ANEGCONT+6, ANEGCONT+7, ANEGCONT+10, PAPHPV+1~, PAPHPV+13, PAPHPV+14, PAPHPV+15, PAPHPV+17, PAPHPV+18, PAPHPV+22 , PAPHPV+40, PAPHPV+41, PAPHPV+42, PAPHPV+43, HPV+6, HPV+7, HPV+8, HPV+10, HPV+14, HPV+32 , HPV+33, HPV+34, HPV+35, HPV+37*, HPV+38
>> 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, PAPHPV+1~, PAPHPV+13, PAPHPV+25, HPV+6, HPV+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, PAPHPV~, PAPHPV+6, PAPHPV+10, PAPHPV+13, PAPHPV+25, PAPHPV+30, PAPHPV+42 , HPV+3, HPV+6, HPV+17, HPV+22, HPV+34
>> 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+1~, ANCONT+2, ANCONT+10, ANCONT+11, ANNECONT+1~ , ANNECONT+2, ANNECONT+10, ANNECONT+11, ANNECONT+12, ANNECONT+13, MMRCONT+1~, MMRCONT+2, MMRCONT+10, MMRCONT+11, MMRCONT+12 , MMRCONT+14, ANIMCONT+1~, ANIMCONT+2, ANIMCONT+10, ANIMCONT+11, ANIMCONT+13, ANEGCONT+1~, ANEGCONT+2, ANEGCONT+10, ANEGCONT+12 , PAPHPV+36, HPV+28*
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
>> I	PAPHPV+36, HPV+28
J	PAPHPV+1~, PAPHPV+20, PAPHPV+21, HPV+12, HPV+13
L	PAPHPV+1~, PAPHPV+14, PAPHPV+15, HPV+7, HPV+8
>> 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, PAPHPV~, PAPHPV+6, PAPHPV+13 , PAPHPV+14, PAPHPV+15, PAPHPV+25, PAPHPV+30, PAPHPV+36, HPV+6, HPV+7, HPV+8, HPV+17, HPV+22 , HPV+28
R	PNEU+38, PNEU+39, ANCONT+1~, ANCONT+3, ANCONT+4, ANCONT+5, ANCONT+10, ANNECONT+1~, ANNECONT+3, ANNECONT+4 , ANNECONT+5, ANNECONT+10, ANNECONT+11, ANNECONT+12, MMRCONT+1~, MMRCONT+3, MMRCONT+4, MMRCONT+5, MMRCONT+10, MMRCONT+11 , MMRCONT+12, ANIMCONT+1~, ANIMCONT+3, ANIMCONT+4, ANIMCONT+5, ANIMCONT+10, ANIMCONT+11, ANEGCONT+1~, ANEGCONT+3, ANEGCONT+4 , ANEGCONT+5, ANEGCONT+10
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, PAPHPV+1~, PAPHPV+4, PAPHPV+5, PAPHPV+6, PAPHPV+11 , PAPHPV+19, PAPHPV+21, PAPHPV+27, PAPHPV+33, PAPHPV+38, HPV+4, HPV+11, HPV+13, HPV+19, HPV+22 , HPV+25*, HPV+30
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 , PAPHPV+5, PAPHPV+17, PAPHPV+18, PAPHPV+20, PAPHPV+26, PAPHPV+32, PAPHPV+38, PAPHPV+40, HPV+10, HPV+12 , HPV+18, HPV+24, HPV+30, HPV+32, HPV+38, LOINC+2, LOINC+4
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, PAPHPV+36, PAPHPV+37, PAPHPV+38, PAPHPV+39, PAPHPV+40, HPV+28*, HPV+29 , HPV+30, HPV+31, HPV+32
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, PAPHPV+1~, PAPHPV+5, PAPHPV+6, PAPHPV+15, PAPHPV+16, PAPHPV+17, PAPHPV+18, PAPHPV+20 , PAPHPV+25, PAPHPV+26, PAPHPV+32, HPV+8, HPV+9, HPV+10, HPV+12, HPV+17, HPV+18, HPV+24
Y	II+18!, V2ASTH+13, V2ASTH+19~, SEV+1~, SEV+7, SEV+11, SEVS+1, SEVS+2, LAST+2, LAST+3 , ANCONT+1~, ANCONT+2, ANNECONT+1~, ANNECONT+2, MMRCONT+1~, MMRCONT+2, ANIMCONT+1~, ANIMCONT+2, ANEGCONT+1~, ANEGCONT+2*
YEARS	PAPHPV~, PAPHPV+6, PAPHPV+10, HPV+3
Z	II+16, II+17, II+18!, PAPHPV+17

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP8D31

Call Graph Total: 12

Caller Graph Total: 18