Routine: BGP5C3

Package	Total	Call Graph
IHS GPRA Information System	3	GETMEDS^BGP5C1 EN^BGP5C12 $$DATE^BGP5UTL
DRG Grouper	2	($$ICDDX,$$ICDOP)^ICDCODE $$CPT^ICPTCOD
Kernel	2	($$FMADD,$$FMTE)^XLFDT $$UP^XLFSTR
Patient Care Component Reports	2	$$START1^APCLDF $$PRIMPOV^APCLV
IHS Patient	1	($$AGE,$$HRN)^AUPNPAT
IHS VA Utilities	1	$$VAL^XBDIQ1
Taxonomy	1	$$ICD^ATXCHK

Name	Comments	DBIA/ICR reference
SET	;
PNEUDX(V)	;
ABGPO1(P,BGPA,BGPY)	;
ABRX1(P,BGPA,BGPD,BGPY)	;EP
PNEU	;
TRANSIN(H)	;
PNEUVAX	;
AMA(H)	;
DSCH(H)	;
ABIRX	;
TRANS(H)	;
EXPIRED(H)	;
ABGPO	;
PNEUVAX1(P,BGPY)	;

Name	Field # of Occurrence
$$START1^APCLDF	ABGPO1+3, ABGPO1+17, PNEUVAX1+3, PNEUVAX1+13, PNEUVAX1+23, PNEUVAX1+33, PNEUVAX1+44, PNEUVAX1+55, PNEUVAX1+66
$$PRIMPOV^APCLV	PNEU+6, PNEU+23, PNEUDX+1
$$ICD^ATXCHK	ABGPO1+13, PNEUDX+4, PNEUDX+7, PNEUDX+13
$$AGE^AUPNPAT	PNEU+4, PNEU+8, PNEU+21
$$HRN^AUPNPAT	PNEU+4, PNEU+21
GETMEDS^BGP5C1	ABRX1+6, ABRX1+9
EN^BGP5C12	ABGPO+6
$$DATE^BGP5UTL	PNEU+5, PNEU+22, ABGPO1+6, ABGPO1+15, ABGPO1+20, SET+1, PNEUVAX1+93, PNEUVAX1+103, PNEUVAX1+111, PNEUVAX1+119
$$ICDDX^ICDCODE	PNEU+33, PNEUVAX1+50, PNEUVAX1+52, PNEUVAX1+61, PNEUVAX1+63, PNEUVAX1+72, PNEUVAX1+74
$$ICDOP^ICDCODE	PNEUVAX1+39, PNEUVAX1+41
$$CPT^ICPTCOD	ABGPO1+15
$$VAL^XBDIQ1	PNEU+9, PNEU+12, PNEU+24, PNEU+25, PNEU+34, ABGPO1+20, PNEUVAX1+80, PNEUVAX1+82, PNEUVAX1+93
$$FMADD^XLFDT	ABRX1+4, ABRX1+5, ABRX1+8
$$FMTE^XLFDT	ABGPO1+3, ABGPO1+17
$$UP^XLFSTR	PNEU+34

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX("B"	ABGPO1+9, PNEUDX+3, PNEUDX+6, PNEUDX+8
^AUPNPREF - [#9000022]	PNEUVAX1+93
^AUPNPREF("AA"	PNEUVAX1+89, PNEUVAX1+91
^AUPNVCPT - [#9000010.18]	ABGPO1+11, ABGPO1+12, ABGPO1+14, PNEUVAX1+79, PNEUVAX1+83
^AUPNVCPT("AC"	ABGPO1+10, PNEUVAX1+78
^AUPNVIMM - [#9000010.11]	PNEUVAX1+5, PNEUVAX1+6, PNEUVAX1+15, PNEUVAX1+16, PNEUVAX1+25, PNEUVAX1+26
^AUPNVINP - [#9000010.02]	AMA+1, EXPIRED+1, DSCH+1, TRANSIN+1, TRANS+1
^AUPNVLAB - [#9000010.09]	ABGPO1+19
^AUPNVMSR - [#9000010.01]	ABGPO1+5
^AUPNVPOV - [#9000010.07]	PNEU+31, PNEU+32, PNEU+33, PNEUVAX1+46, PNEUVAX1+47, PNEUVAX1+57, PNEUVAX1+58, PNEUVAX1+68, PNEUVAX1+69, PNEUDX+10 , PNEUDX+11, PNEUDX+12
^AUPNVPOV("AD"	PNEU+30, PNEUDX+9
^AUPNVPRC - [#9000010.08]	PNEUVAX1+35, PNEUVAX1+36
^AUPNVSIT - [#9000010]	ABGPO1+14, PNEUVAX1+84
^AUTTIMM - [#9999999.14]	PNEUVAX1+8, PNEUVAX1+10, PNEUVAX1+18, PNEUVAX1+20, PNEUVAX1+28, PNEUVAX1+30
^AUTTIMM("C"	PNEUVAX1+88, PNEUVAX1+96, PNEUVAX1+104, PNEUVAX1+112
^BICONT - [#9002084.81]	PNEUVAX1+99, PNEUVAX1+100, PNEUVAX1+107, PNEUVAX1+108, PNEUVAX1+115, PNEUVAX1+116
^BIPC - [#9002084.11]	PNEUVAX1+97, PNEUVAX1+101, PNEUVAX1+105, PNEUVAX1+109, PNEUVAX1+113, PNEUVAX1+117
^BIPC("AC"	PNEUVAX1+96, PNEUVAX1+104, PNEUVAX1+112
^DG(405.1 - [#405.1]	AMA+3, EXPIRED+3, TRANSIN+3, TRANS+3
^DPT - [#2]	PNEU+4, PNEU+14, PNEU+15, PNEU+17, PNEU+21, PNEU+26, PNEU+29, PNEU+36, ABIRX+1, ABIRX+5 , PNEUVAX+1, PNEUVAX+5, ABGPO+1, ABGPO+5
^XTMP("BGP5C1"	PNEU+14, PNEU+15, PNEU+17, PNEU+26, PNEU+29, PNEU+36, ABIRX+1, ABIRX+5, PNEUVAX+1, PNEUVAX+5* , ABGPO+1, ABGPO+5

Name	Line Occurrences
$$DSCH	PNEU+5, PNEU+22, ABIRX+3
$$PNEUDX	PNEU+2
$$TRANSIN	PNEU+11
ABGPO1	ABGPO+3
ABRX1	ABIRX+3
PNEUVAX1	PNEUVAX+3
SET	PNEUVAX1+11, PNEUVAX1+21, PNEUVAX1+31, PNEUVAX1+42, PNEUVAX1+53, PNEUVAX1+64, PNEUVAX1+75, PNEUVAX1+85

Name	Field # of Occurrence
^(	PNEU+36*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	PNEUVAX1+33, PNEUVAX1+44, PNEUVAX1+55, PNEUVAX1+66
BD	ABRX1+2~, ABRX1+5, ABRX1+6, ABRX1+7, ABRX1+9
BGPA	ABGPO1~, ABGPO1+3, ABGPO1+17, ABRX1~, ABRX1+4, ABRX1+5, ABRX1+7
BGPC	ABGPO1+2, ABGPO1+6, ABGPO1+15, ABGPO1+20, ABRX1+2~, ABRX1+3, PNEUVAX1+2, PNEUVAX1+120*, PNEUVAX1+121!
>> BGPCOUNT("L1"	PNEU+18*
>> BGPCOUNT("L2"	PNEU+27*
BGPD	ABRX1~, ABRX1+8
BGPDATA	ABIRX+2!, ABIRX+3, PNEUVAX+2!, PNEUVAX+3, ABGPO+2!, ABGPO+3
BGPDATA(	ABIRX+4, ABIRX+5, PNEUVAX+4, PNEUVAX+5, ABGPO+4, ABGPO+5
BGPG	ABGPO1+3!, ABGPO1+17!, ABRX1+2~, PNEUVAX1+1!, PNEUVAX1+13!, PNEUVAX1+23!, PNEUVAX1+33!, PNEUVAX1+44!, PNEUVAX1+55!, PNEUVAX1+66!
BGPG(	ABGPO1+4, ABGPO1+6, ABGPO1+18, ABGPO1+20, PNEUVAX1+4, PNEUVAX1+10, PNEUVAX1+14, PNEUVAX1+20, PNEUVAX1+24, PNEUVAX1+30 , PNEUVAX1+34, PNEUVAX1+38, PNEUVAX1+45, PNEUVAX1+49, PNEUVAX1+56, PNEUVAX1+60, PNEUVAX1+67, PNEUVAX1+71
>> BGPH	PNEU+14, PNEU+15, PNEU+17, PNEU+26, PNEU+29, PNEU+36, ABIRX+1, ABIRX+5, PNEUVAX+1, PNEUVAX+5 , ABGPO+1, ABGPO+5
BGPI	PNEUVAX1+88!, PNEUVAX1+121!
BGPI(	PNEUVAX1+88*, PNEUVAX1+90
>> BGPIND	PNEU+14, PNEU+15, PNEU+17, PNEU+18, PNEU+26, PNEU+27, PNEU+29, PNEU+36, ABIRX+1, ABIRX+5 , PNEUVAX+1, PNEUVAX+5, ABGPO+1, ABGPO+5
>> BGPJ	PNEU+14, PNEU+15, PNEU+17, PNEU+26, PNEU+29, PNEU+36, ABIRX+1, ABIRX+5, PNEUVAX+1, PNEUVAX+5 , ABGPO+1, ABGPO+5
>> BGPORDER	PNEU+14, PNEU+15, PNEU+17, PNEU+26, PNEU+29, PNEU+36, ABIRX+1, ABIRX+5, PNEUVAX+1, PNEUVAX+5 , ABGPO+1, ABGPO+5
>> BGPSKIP	PNEU+7, PNEU+8, PNEU+11*, PNEU+20
>> BGPVINP	PNEU+5, PNEU+9, PNEU+11, PNEU+12, PNEU+22, PNEU+24, PNEU+25, ABIRX+3
>> BGPVSIT	PNEU+2, PNEU+6, PNEU+14, PNEU+15, PNEU+17, PNEU+23, PNEU+26, PNEU+29, PNEU+30, PNEU+36 , ABIRX+1, ABIRX+5, PNEUVAX+1, PNEUVAX+5, ABGPO+1, ABGPO+5
>> BGPVSIT0	PNEU+4, PNEU+5, PNEU+8, PNEU+21, PNEU+22, ABIRX+3, ABGPO+3
BGPX	PNEU+4, PNEU+5, PNEU+6, PNEU+8, PNEU+10, PNEU+11, PNEU+13, PNEU+15, PNEU+21, PNEU+22* , PNEU+23, PNEU+24, PNEU+25*, PNEU+26, PNEUVAX1+1!, PNEUVAX1+121!
BGPX(	SET+1, PNEUVAX1+93, PNEUVAX1+103, PNEUVAX1+111, PNEUVAX1+119*, PNEUVAX1+120
BGPY	ABGPO1~, ABRX1~, PNEUVAX1~
BGPY(	ABGPO1+6, ABGPO1+15, ABGPO1+20, PNEUVAX1+120
BGPZ	PNEU+7!, PNEU+16
BGPZ(	PNEU+16
BGPZ(1	PNEU+8*
BGPZ(2	PNEU+11*
BGPZ1	PNEU+16!, PNEU+17
>> C	PNEU+30, PNEU+35, PNEU+36, ABGPO1+12, ABGPO1+13, ABGPO1+15, SET+1, PNEUVAX1+8, PNEUVAX1+9, PNEUVAX1+18* , PNEUVAX1+19, PNEUVAX1+28, PNEUVAX1+29, PNEUVAX1+39, PNEUVAX1+40, PNEUVAX1+50, PNEUVAX1+51, PNEUVAX1+61, PNEUVAX1+62, PNEUVAX1+72* , PNEUVAX1+73, PNEUVAX1+82, PNEUDX+1, PNEUDX+2, PNEUDX+4, PNEUDX+7
>> C1	SET+1, PNEUVAX1+10, PNEUVAX1+20, PNEUVAX1+30, PNEUVAX1+41, PNEUVAX1+52, PNEUVAX1+63, PNEUVAX1+74, PNEUVAX1+80, PNEUVAX1+81
D	ABGPO1+14, ABGPO1+15, SET+1, PNEUVAX1+10, PNEUVAX1+20, PNEUVAX1+30, PNEUVAX1+38, PNEUVAX1+39, PNEUVAX1+41, PNEUVAX1+49 , PNEUVAX1+50, PNEUVAX1+52, PNEUVAX1+60, PNEUVAX1+61, PNEUVAX1+63, PNEUVAX1+71, PNEUVAX1+72, PNEUVAX1+74, PNEUVAX1+83, PNEUVAX1+84 , PNEUVAX1+91, PNEUVAX1+92, PNEUVAX1+101, PNEUVAX1+102, PNEUVAX1+103, PNEUVAX1+109, PNEUVAX1+110, PNEUVAX1+111, PNEUVAX1+117, PNEUVAX1+118 , PNEUVAX1+119, PNEUVAX1+120*, PNEUVAX1+121!
>> DFN	PNEU+4, PNEU+8, PNEU+14, PNEU+15, PNEU+17, PNEU+21, PNEU+26, PNEU+29, PNEU+36, ABIRX+1 , ABIRX+3, ABIRX+5, PNEUVAX+1, PNEUVAX+3, PNEUVAX+5, ABGPO+1, ABGPO+3, ABGPO+5
DT	ABGPO1+3, ABGPO1+17
DUZ(2	PNEU+4, PNEU+21
E	ABGPO1+3, ABGPO1+17, ABRX1+2~, PNEUVAX1+3, PNEUVAX1+13, PNEUVAX1+23, PNEUVAX1+33, PNEUVAX1+44, PNEUVAX1+55, PNEUVAX1+66*
ED	ABRX1+2~, ABRX1+4, ABRX1+6, ABRX1+8, ABRX1+9
>> G	PNEUVAX1+96, PNEUVAX1+104, PNEUVAX1+112, PNEUDX+9, PNEUDX+14*, PNEUDX+16
H	AMA~, AMA+1, EXPIRED~, EXPIRED+1, DSCH~, DSCH+1, TRANSIN~, TRANSIN+1, TRANS~, TRANS+1
>> I	PNEU+33, PNEU+36, PNEUDX+12, PNEUDX+13
>> N	PNEU+34, PNEU+36, ABGPO1+5, ABGPO1+6, ABGPO1+19*, ABGPO1+20, PNEUVAX1+93
P	ABGPO1~, ABGPO1+3, ABGPO1+10, ABGPO1+17, ABRX1~, ABRX1+6, ABRX1+9, PNEUVAX1~, PNEUVAX1+3, PNEUVAX1+13 , PNEUVAX1+23, PNEUVAX1+33, PNEUVAX1+44, PNEUVAX1+55, PNEUVAX1+66, PNEUVAX1+78, PNEUVAX1+89, PNEUVAX1+91, PNEUVAX1+96, PNEUVAX1+104 , PNEUVAX1+112
>> R	PNEUVAX1+97, PNEUVAX1+98, PNEUVAX1+99, PNEUVAX1+100, PNEUVAX1+105, PNEUVAX1+106, PNEUVAX1+107, PNEUVAX1+108, PNEUVAX1+113*, PNEUVAX1+114 , PNEUVAX1+115, PNEUVAX1+116
>> T	ABGPO1+9, ABGPO1+13, PNEUDX+3, PNEUDX+4, PNEUDX+6, PNEUDX+7, PNEUDX+8, PNEUDX+13
U	PNEU+4, PNEU+5, PNEU+6, PNEU+8, PNEU+10, PNEU+13, PNEU+14, PNEU+15, PNEU+17, PNEU+21 , PNEU+22, PNEU+23, PNEU+24, PNEU+25, PNEU+26, PNEU+29, PNEU+32, PNEU+33, PNEU+36, ABIRX+1 , ABIRX+3, ABIRX+5, PNEUVAX+1, PNEUVAX+5, ABGPO+1, ABGPO+3, ABGPO+5, ABGPO1+4, ABGPO1+5, ABGPO1+6 , ABGPO1+12, ABGPO1+14, ABGPO1+15, ABGPO1+18, ABGPO1+19, ABGPO1+20, PNEUVAX1+4, PNEUVAX1+6, PNEUVAX1+8, PNEUVAX1+10 , PNEUVAX1+14, PNEUVAX1+16, PNEUVAX1+18, PNEUVAX1+20, PNEUVAX1+24, PNEUVAX1+26, PNEUVAX1+28, PNEUVAX1+30, PNEUVAX1+34, PNEUVAX1+36 , PNEUVAX1+38, PNEUVAX1+39, PNEUVAX1+41, PNEUVAX1+45, PNEUVAX1+47, PNEUVAX1+49, PNEUVAX1+50, PNEUVAX1+52, PNEUVAX1+56, PNEUVAX1+58 , PNEUVAX1+60, PNEUVAX1+61, PNEUVAX1+63, PNEUVAX1+67, PNEUVAX1+69, PNEUVAX1+71, PNEUVAX1+72, PNEUVAX1+74, PNEUVAX1+83, PNEUVAX1+84 , PNEUVAX1+93, PNEUVAX1+97, PNEUVAX1+100, PNEUVAX1+101, PNEUVAX1+105, PNEUVAX1+108, PNEUVAX1+109, PNEUVAX1+113, PNEUVAX1+116, PNEUVAX1+117 , AMA+1, AMA+3, PNEUDX+11, PNEUDX+12, EXPIRED+1, EXPIRED+3, DSCH+1, TRANSIN+1, TRANSIN+3, TRANS+1 , TRANS+3
V	PNEUDX~, PNEUDX+1, PNEUDX+9
X	PNEU+16, PNEU+30, PNEU+31, PNEU+32, PNEU+33, PNEU+34, ABIRX+4, ABIRX+5, PNEUVAX+4, PNEUVAX+5 , ABGPO+4, ABGPO+5, ABGPO1+3, ABGPO1+4, ABGPO1+6, ABGPO1+10, ABGPO1+11, ABGPO1+12, ABGPO1+14, ABGPO1+17* , ABGPO1+18, ABGPO1+20, ABRX1+2~, PNEUVAX1+3, PNEUVAX1+4, PNEUVAX1+10, PNEUVAX1+13, PNEUVAX1+14, PNEUVAX1+20, PNEUVAX1+23 , PNEUVAX1+24, PNEUVAX1+30, PNEUVAX1+34, PNEUVAX1+38, PNEUVAX1+45, PNEUVAX1+49, PNEUVAX1+56, PNEUVAX1+60, PNEUVAX1+67, PNEUVAX1+71 , PNEUVAX1+78, PNEUVAX1+79, PNEUVAX1+80, PNEUVAX1+82, PNEUVAX1+83, PNEUVAX1+88, PNEUVAX1+89, PNEUVAX1+90, PNEUVAX1+91, PNEUVAX1+93 , PNEUVAX1+96, PNEUVAX1+97, PNEUVAX1+101, PNEUVAX1+104, PNEUVAX1+105, PNEUVAX1+109, PNEUVAX1+112, PNEUVAX1+113, PNEUVAX1+117, PNEUVAX1+121! , AMA+1, AMA+2, AMA+3, AMA+4, PNEUDX+9, PNEUDX+10, PNEUDX+11, PNEUDX+12, EXPIRED+1, EXPIRED+2 , EXPIRED+3, EXPIRED+4, TRANSIN+1, TRANSIN+2, TRANSIN+3, TRANSIN+4, TRANS+1, TRANS+2, TRANS+3, TRANS+4
Y	ABGPO1+3, ABGPO1+4, ABGPO1+5, ABGPO1+17, ABGPO1+18, ABGPO1+19, ABGPO1+20, ABRX1+2~, PNEUVAX1+4, PNEUVAX1+5 , PNEUVAX1+6, PNEUVAX1+7, PNEUVAX1+8, PNEUVAX1+10, PNEUVAX1+14, PNEUVAX1+15, PNEUVAX1+16, PNEUVAX1+17, PNEUVAX1+18, PNEUVAX1+20 , PNEUVAX1+24, PNEUVAX1+25, PNEUVAX1+26, PNEUVAX1+27, PNEUVAX1+28, PNEUVAX1+30, PNEUVAX1+34, PNEUVAX1+35, PNEUVAX1+36, PNEUVAX1+37 , PNEUVAX1+39, PNEUVAX1+41, PNEUVAX1+45, PNEUVAX1+46, PNEUVAX1+47, PNEUVAX1+48, PNEUVAX1+50, PNEUVAX1+52, PNEUVAX1+56, PNEUVAX1+57 , PNEUVAX1+58, PNEUVAX1+59, PNEUVAX1+61, PNEUVAX1+63, PNEUVAX1+67, PNEUVAX1+68, PNEUVAX1+69, PNEUVAX1+70, PNEUVAX1+72, PNEUVAX1+74 , PNEUVAX1+88, PNEUVAX1+92, PNEUVAX1+93, PNEUVAX1+96, PNEUVAX1+104, PNEUVAX1+112*, PNEUVAX1+121!
Z	PNEU+9, PNEU+10, PNEU+12, PNEU+13, ABRX1+2~

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP5C3

Information

Source Information

Call Graph

Call Graph Total: 12

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: