Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: BGP0D85

Package: IHS GPRA Information System

Routine: BGP0D85


Information

BGP0D85 ; IHS/CMI/LAB - measure C ; 09 Jun 2010 5:18 PM

Source Information

Source file <BGP0D85.m>

Call Graph

Call Graph Total: 10

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*

Marked Items

Name Field # of Occurrence
$T(@Y MMR+9, MMR+11
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All