Routine: BGP0D85

Package	Total	Call Graph
IHS GPRA Information System	6	$$MMRCONT^BGP0D31 ($$IMMREF,GETIMMS)^BGP0D32 ($$HEP,$$VAR)^BGP0D35 ($$HPV,$$MEN)^BGP0D36 $$TDAP^BGP0D86 $$PLTAX^BGP0DU
DRG Grouper	1	$$CPT^ICPTCOD
IHS Patient	1	($$AGE,$$DOB)^AUPNPAT
Kernel	1	$$FMDIFF^XLFDT
Patient Care Component Reports	1	$$START1^APCLDF

Entry Points

Name	Comments	DBIA/ICR reference
I28	;EP
MMRC
MUX	;
IMMREF(P,IMM,BD,ED)	;EP
REF	;
PVS	;
REFMR	;
MEPV	;
90707	;;
90706	;;
90705	;;
90704	;;
RM	;
90709	;;
90708	;;
MUPV	;
RUBPV	;
RUBX	;
MMR(P,EDATE)	;EP
ME
REFRM
RUB
MU
MR	;see if one M/R, Mumps or R/M
90710	;;
MEX	;

External References

Name	Field # of Occurrence
$$START1^APCLDF	PVS+1, PVS+10, MEPV+1, MEPV+9, MUPV+1, MUPV+9, RUBPV+1, RUBPV+9, MMRC, MEX+1 , MUX+1, RUBX+1
$$AGE^AUPNPAT	I28+9, I28+10, I28+11
$$DOB^AUPNPAT	MMR+4, PVS+1, PVS+10, MEPV+1, MEPV+9, MUPV+1, MUPV+9, RUBPV+1, RUBPV+9, REF+2 , REF+8, MMRC, REFMR+2, REFMR+7, REFRM+1, REFRM+5, MEX+1, MEX+4, MEX+8, MUX+1 , MUX+4, MUX+9, RUBX+1, RUBX+4, RUBX+8
$$MMRCONT^BGP0D31	MMRC+3
$$IMMREF^BGP0D32	REF+8, REFMR+7, REFRM+5, MEX+8, MUX+9, RUBX+8
GETIMMS^BGP0D32	MMR+15, MR+3, RM+2, ME+1, MU+1, RUB+1
$$HEP^BGP0D35	I28+20
$$VAR^BGP0D35	I28+25
$$HPV^BGP0D36	I28+42
$$MEN^BGP0D36	I28+37
$$TDAP^BGP0D86	I28+30
$$PLTAX^BGP0DU	MMRC+2, MEX+2, MUX+2, RUBX+2
$$CPT^ICPTCOD	MMR+9, MMR+11
$$FMDIFF^XLFDT	MMR+22, MR+10, RM+9, ME+8, MU+8, RUB+8, PVS+5, PVS+14, MEPV+5, MEPV+13 , MUPV+5, MUPV+13, RUBPV+5, RUBPV+13

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,DFN," ",BGPN10," ",BGPN6," ",BGPVAL Line Location: I28+35
Function Call: READ	Timeout: 4,1:3)_U_$S(BGPNMI:"NMI Variable: Q $S(BGPNMI Line Location: REF+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPREF - [#9000022]	REF+5, REFMR+5, REFRM+4, MEX+7, MUX+7, RUBX+7
^AUPNPREF("AA"	REF+5, REFMR+5, REFRM+4, MEX+7, MUX+7, RUBX+7
^AUPNVCPT - [#9000010.18]	MMR+9
^AUPNVCPT("AD"	MMR+8
^AUPNVSIT - [#9000010]	MMR+7
^AUPNVSIT("AA"	MMR+5, MMR+6
^AUPNVTC - [#9000010.33]	MMR+11
^AUPNVTC("AD"	MMR+10
^AUTTIMM("C"	IMMREF+3, REF+4, REFMR+4, REFRM+3, MEX+6, MUX+6, RUBX+6
^BICONT - [#9002084.81]	IMMREF+8, IMMREF+9
^BIPC - [#9002084.11]	IMMREF+6, IMMREF+10, IMMREF+12, IMMREF+13
^BIPC("AC"	IMMREF+5
^TMP($J	I28+14!, MMR+2!, MMR+9, MMR+11, MMR+17, MR+5, RM+4, ME+3, MU+3, RUB+3

Label References

Name	Line Occurrences
$$MMR	I28+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	PVS+1, PVS+10, MEPV+1, MEPV+9, MUPV+1, MUPV+9, RUBPV+1, RUBPV+9, MMRC, MEX+1 , MUX+1, RUBX+1
>> B	REF+2, REF+5, REFMR+2, REFMR+5, REFRM+1, REFRM+4, MEX+4, MEX+7, MUX+4, MUX+7 , RUBX+4, RUBX+7
BD	IMMREF~, IMMREF+12, MMR+4*, MMR+5
>> BGPACTCL	I28+8
>> BGPACTUP	I28+7
>> BGPBDATE	I28+9, I28+10, I28+11
BGPC	MMR+1!
BGPD	I28+6!
>> BGPD1	I28+2, I28+11
>> BGPD2	I28+2, I28+12
>> BGPD3	I28+2, I28+11
>> BGPD4	I28+2, I28+13
>> BGPD5	I28+2*
>> BGPD6	I28+2*
>> BGPD7	I28+2*
>> BGPD8	I28+2*
>> BGPD9	I28+2*
BGPDIP	I28+60!
BGPDT	I28+60!
BGPDTAP	I28+6!, I28+60!
>> BGPEDATE	I28+15, I28+20, I28+25, I28+30, I28+37, I28+42
BGPG	MMR+1!, PVS+1!, PVS+10!, MEPV+1!, MEPV+9!, MUPV+1!, MUPV+9!, RUBPV+1!, RUBPV+9!, MMRC! , MEX+1!, MUX+1!, RUBX+1!
BGPG(	PVS+2, PVS+11, MEPV+2, MEPV+10, MUPV+2, MUPV+10, RUBPV+2, RUBPV+10
BGPG(1	MMRC+1, MEX+1, MUX+1, RUBX+1
BGPHEB	I28+60!
BGPHEP	I28+6!
BGPHIB	I28+6!, I28+60!
BGPI1	I28+4*, I28+60!
BGPI2	I28+4*, I28+60!
BGPI3	I28+4*, I28+60!
BGPI4	I28+4*, I28+60!
BGPI5	I28+4*, I28+60!
BGPI6	I28+4*, I28+60!
>> BGPIMM	REF+3, REF+4, REF+8, REFMR+3, REFMR+4, REFMR+7, REFRM+2, REFRM+3, REFRM+5, MEX+5* , MEX+6, MEX+8, MUX+5, MUX+6, MUX+9, RUBX+5, RUBX+6, RUBX+8*
BGPM	I28+6!
BGPME	I28+6!, I28+60!, MR+1, ME+11, RUB+13, RUB+14, MEPV+8, MEPV+16, RUBPV+19, RUBPV+20 , MEX+1, MEX+2, MEX+3, MEX+7, MEX+8, RUBX+10, RUBX+11
BGPME(	ME+2, ME+4, ME+6, ME+8!, ME+11, MEPV+2, MEPV+3, MEPV+5!, MEPV+8, MEPV+10 , MEPV+11, MEPV+13!, MEPV+16
BGPMMR	I28+6!, I28+60!, MMR+1!, MMR+12, MMR+15, MMR+25, MMR+26, PVS+8, PVS+9, PVS+17 , PVS+18, REF+2*
BGPMMR(	MMR+16, MMR+18, MMR+20, MMR+22!, MMR+25, PVS+2, PVS+3, PVS+5!, PVS+8, PVS+11 , PVS+12, PVS+14!, PVS+17
BGPMR	I28+60!, MR+1, MR+13, RUB+12, RUBPV+18, REFMR+1, REFMR+5, REFMR+7, RUBX+9
BGPMR(	MR+4, MR+6, MR+8, MR+10!, MR+13
BGPMU	I28+6!, I28+60!, MR+1, MU+11, RUB+12, RUB+14, MUPV+8, MUPV+16, RUBPV+18, RUBPV+20 , MUX+1, MUX+2, MUX+3, MUX+7, MUX+9, RUBX+8*, RUBX+9, RUBX+11
BGPMU(	MU+2, MU+4, MU+6, MU+8!, MU+11, MUPV+2, MUPV+3, MUPV+5!, MUPV+8, MUPV+10 , MUPV+11, MUPV+13!, MUPV+16
>> BGPN1	I28+2, I28+38
>> BGPN10	I28+2, I28+31, I28+50
>> BGPN11	I28+2, I28+32, I28+51
>> BGPN12	I28+2, I28+33, I28+52
>> BGPN13	I28+2, I28+21, I28+47, I28+50, I28+55
>> BGPN14	I28+2, I28+22, I28+48, I28+51
>> BGPN15	I28+2, I28+23, I28+49, I28+52
>> BGPN16	I28+2, I28+26, I28+47, I28+50, I28+56
>> BGPN17	I28+2, I28+27, I28+48, I28+51
>> BGPN18	I28+2, I28+28, I28+49, I28+52
>> BGPN19	I28+2, I28+47, I28+53
>> BGPN2	I28+2, I28+39
>> BGPN20	I28+2*
>> BGPN21	I28+3*
>> BGPN22	I28+3, I28+48
>> BGPN23	I28+3, I28+49
>> BGPN24	I28+3, I28+50
>> BGPN25	I28+3, I28+51
>> BGPN26	I28+3, I28+52
>> BGPN27	I28+3, I28+45
>> BGPN3	I28+2, I28+40
>> BGPN4	I28+2, I28+43
>> BGPN5	I28+2, I28+44
>> BGPN6	I28+2, I28+34
>> BGPN7	I28+2, I28+16, I28+47, I28+50, I28+54
>> BGPN8	I28+2, I28+17, I28+48, I28+51
>> BGPN9	I28+2, I28+18, I28+49, I28+52
>> BGPNMI	REF+2, REF+5, REF+6, REFMR+2*
BGPOPV	I28+6!, I28+60!
BGPPER	I28+6!, I28+60!
BGPRM	I28+60!, MR+1, RM+12, RUB+13, RUBPV+19, REFRM, REFRM+4, REFRM+5, RUBX+10
BGPRM(	RM+3, RM+5, RM+7, RM+9!, RM+12
>> BGPRTYPE	I28+53
BGPRUB	I28+60!, MR+1, RUB+11, RUB+14, RUBPV+8, RUBPV+16, RUBPV+20, RUBX+1, RUBX+2, RUBX+3 , RUBX+7*, RUBX+11
BGPRUB(	RUB+2, RUB+4, RUB+6, RUB+8!, RUB+11, RUBPV+2, RUBPV+3, RUBPV+5!, RUBPV+8, RUBPV+10 , RUBPV+11, RUBPV+13!, RUBPV+16
>> BGPSEX	I28+11, I28+13
>> BGPSTOP	I28+7, I28+8, I28+9, I28+10
BGPT	I28+6!
BGPTD	I28+60!
BGPTET	I28+6!, I28+60!
BGPVAL	I28+15, I28+16, I28+17, I28+18, I28+19, I28+20, I28+21, I28+22, I28+23, I28+24 , I28+25, I28+26, I28+27, I28+28, I28+29, I28+30, I28+31, I28+32, I28+33, I28+34 , I28+36, I28+37, I28+38, I28+39, I28+40, I28+41, I28+42, I28+43, I28+44, I28+45 , I28+46, I28+60!
>> BGPVALUE	I28+5, I28+19, I28+24, I28+29, I28+36, I28+41, I28+46, I28+53, I28+54, I28+55 , I28+56, I28+59
BGPVAR	I28+6!, I28+60!
BGPX	MMR+1!, MMR+15!, MR+3!, RM+2!, ME+1!, MU+1!, RUB+1!
BGPX(	MMR+16, MR+4, RM+3, ME+2, MU+2, RUB+2
>> BGPZ	MMRC+3*
>> C	MMR+14, MMR+15, MMR+20, MMR+21, MR+2, MR+3, MR+8, MR+9, RM+1, RM+2 , RM+7, RM+8, ME, ME+1, ME+6, ME+7, MU, MU+1, MU+6, MU+7 , RUB, RUB+1, RUB+6, RUB+7, PVS+3, PVS+4, PVS+12, PVS+13, MEPV+3, MEPV+4 , MEPV+11, MEPV+12, MUPV+3, MUPV+4, MUPV+11, MUPV+12, RUBPV+3, RUBPV+4, RUBPV+11, RUBPV+12
D	I28+57, I28+58, I28+59, IMMREF+1~, IMMREF+10, IMMREF+11, MMR+17, MMR+18, MR+5, MR+6 , RM+4, RM+5, ME+3, ME+4, MU+3, MU+4, RUB+3, RUB+4, REF+5, REFMR+5* , REFRM+4, MEX+7, MUX+7, RUBX+7
>> DFN	I28+9, I28+10, I28+11, I28+15, I28+20, I28+25, I28+30, I28+37, I28+42
>> E	PVS+1, PVS+10, MEPV+1, MEPV+9, MUPV+1, MUPV+9, RUBPV+1, RUBPV+9, REF+2, REF+5 , MMRC, REFMR+2, REFMR+5, REFRM+1, REFRM+4, MEX+1, MEX+4, MEX+7, MUX+1, MUX+4 , MUX+7, RUBX+1, RUBX+4, RUBX+7
ED	IMMREF~, IMMREF+13, MMR+4, MMR+5, MMR+6, MMR+9, MMR+11
EDATE	MMR~, MMR+4, MMR+15, MR+3, RM+2, ME+1, MU+1, RUB+1, PVS+1, PVS+10 , MEPV+1, MEPV+9, MUPV+1, MUPV+9, RUBPV+1, RUBPV+9, REF+2, REF+8, MMRC, MMRC+3 , REFMR+2, REFMR+7, REFRM+1, REFRM+5, MEX+1, MEX+4, MEX+8, MUX+1, MUX+4, MUX+9 , RUBX+1, RUBX+4, RUBX+8
G	IMMREF+1~, IMMREF+3, IMMREF+14, IMMREF+15, MMR+4*
>> I	REF+4, REF+5, REFMR+4, REFMR+5, REFRM+3, REFRM+4, MEX+6, MEX+7, MUX+6, MUX+7 , RUBX+6, RUBX+7
IMM	IMMREF~, IMMREF+2, IMMREF+3
P	IMMREF~, IMMREF+5, MMR~, MMR+4, MMR+5, MMR+6, MMR+15, MR+3, RM+2, ME+1 , MU+1, RUB+1, PVS+1, PVS+10, MEPV+1, MEPV+9, MUPV+1, MUPV+9, RUBPV+1, RUBPV+9 , REF+2, REF+5, REF+8, MMRC, MMRC+2, MMRC+3, REFMR+2, REFMR+5, REFMR+7, REFRM+1 , REFRM+4, REFRM+5, MEX+1, MEX+2, MEX+4, MEX+7, MEX+8, MUX+1, MUX+2, MUX+4 , MUX+7, MUX+9, RUBX+1, RUBX+2, RUBX+4, RUBX+7, RUBX+8
R	IMMREF+1~, IMMREF+6, IMMREF+7, IMMREF+8, IMMREF+9, REF+2, REF+5, REF+6, REF+8, REF+9
U	I28+16, I28+17, I28+18, I28+19, I28+21, I28+22, I28+23, I28+24, I28+26, I28+27 , I28+28, I28+29, I28+31, I28+32, I28+33, I28+34, I28+36, I28+38, I28+39, I28+40 , I28+41, I28+43, I28+44, I28+45, I28+46, IMMREF+6, IMMREF+9, IMMREF+10, IMMREF+12, IMMREF+13 , MMR+9, MMR+11, MMR+26, RUB+12, RUB+13, RUB+14, PVS+2, PVS+9, PVS+11, PVS+18 , MEPV+2, MEPV+10, MUPV+2, MUPV+10, RUBPV+2, RUBPV+10, RUBPV+18, RUBPV+19, RUBPV+20, REF+5 , REF+6, REF+9, MMRC+1, MMRC+2, MMRC+4, REFMR+5, REFRM+4, MEX+7, MUX+7, RUBX+7 , RUBX+9, RUBX+10, RUBX+11
>> V	MMR+6*, MMR+7, MMR+8, MMR+10
X	IMMREF+1~, IMMREF+3, IMMREF+5, IMMREF+6, IMMREF+10, IMMREF+12, IMMREF+13, MMR+8, MMR+9, MMR+10 , MMR+11, MMR+16, MMR+20, MMR+21, MMR+22, MMR+23, MMR+25, MR+4, MR+8, MR+9 , MR+10, MR+11, MR+13, RM+3, RM+7, RM+8, RM+9, RM+10, RM+12, ME+2 , ME+6, ME+7, ME+8, ME+9, ME+11, MU+2, MU+6, MU+7, MU+8, MU+9 , MU+11, RUB+2, RUB+6, RUB+7, RUB+8, RUB+9, RUB+11, PVS+2, PVS+3, PVS+4 , PVS+5, PVS+6, PVS+8, PVS+11, PVS+12, PVS+13, PVS+14, PVS+15, PVS+17, MEPV+2* , MEPV+3, MEPV+4, MEPV+5, MEPV+6, MEPV+8, MEPV+10, MEPV+11, MEPV+12, MEPV+13, MEPV+14 , MEPV+16, MUPV+2, MUPV+3, MUPV+4, MUPV+5, MUPV+6, MUPV+8, MUPV+10, MUPV+11, MUPV+12 , MUPV+13, MUPV+14, MUPV+16, RUBPV+2, RUBPV+3, RUBPV+4, RUBPV+5, RUBPV+6, RUBPV+8, RUBPV+10* , RUBPV+11, RUBPV+12, RUBPV+13, RUBPV+14, RUBPV+16, REF+5, MMRC+3, MMRC+4, REFMR+5, REFRM+4 , MEX+7, MUX+7, RUBX+7, RUBX+9, RUBX+10, RUBX+11
Y	IMMREF+1~, IMMREF+3, IMMREF+4, IMMREF+5, MMR+9, MMR+11, MMR+17, MMR+18, MMR+20, MMR+21 , MMR+22, MMR+23, MR+5, MR+6, MR+8, MR+9, MR+10, MR+11, RM+4, RM+5 , RM+7, RM+8, RM+9, RM+10, ME+3, ME+4, ME+6, ME+7, ME+8, ME+9* , MU+3, MU+4, MU+6, MU+7, MU+8, MU+9, RUB+3, RUB+4, RUB+6, RUB+7* , RUB+8, RUB+9, PVS+3, PVS+4, PVS+5, PVS+6, PVS+12, PVS+13, PVS+14, PVS+15* , MEPV+3, MEPV+4, MEPV+5, MEPV+6, MEPV+11, MEPV+12, MEPV+13, MEPV+14, MUPV+3, MUPV+4 , MUPV+5, MUPV+6, MUPV+11, MUPV+12, MUPV+13, MUPV+14, RUBPV+3, RUBPV+4, RUBPV+5, RUBPV+6* , RUBPV+11, RUBPV+12, RUBPV+13, RUBPV+14, REF+5, REFMR+5, REFRM+4, MEX+7, MUX+7, RUBX+7*

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP0D85

Information

Source Information

Call Graph

Call Graph Total: 10

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items