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 |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BGP6D71

Package: IHS GPRA Information System

Routine: BGP6D71


Information

BGP6D71 ; IHS/CMI/LAB - measure C ;

Source Information

Source file <BGP6D71.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
IHS GPRA Information System 7 ($$BMI,$$OB,$$OW)^BGP6D6  $$LASTHF^BGP6D7  ($$MEDNUTRD,$$OTHREL,$$PED,$$SPECEX,$$SPECNUTR)^BGP6D711  ($$CPT,$$CPTI)^BGP6DU  $$DATE^BGP6UTL  $$LASTDX^BGP6UTL1  ($$ICD,$$ICDDX)^BGP6UTL2  
Patient Care Component Reports 2 $$START1^APCLDF  $$PRIMPOV^APCLV  
DRG Grouper 1 $$CODEN^ICPTCOD  
IHS Patient 1 $$DOB^AUPNPAT  
Kernel 1 ($$FMADD,$$FMTE)^XLFDT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS GPRA Information System 1 BGP6DPA2  

Entry Points

Name Comments DBIA/ICR reference
GETALLHF ;
QUIT(P,BD,ED) ;
DNKA(V) ;EP - is this a DNKA visit?
GETHF1 ;
POT ;if potential check for 2 codes
KVARS ;
TOMREF ;
SET ;
I91 ;EP
NEWSTUFF ;new stuff
IC1 ;EP
TOMPED(P,BDATE,EDATE) ;EP
GETLAST(P,BD,ED) ;

External References

Name Field # of Occurrence
$$START1^APCLDF TOMPED+4
$$PRIMPOV^APCLV DNKA+2, DNKA+4
$$DOB^AUPNPAT NEWSTUFF+34
$$BMI^BGP6D6 IC1+6
$$OB^BGP6D6 IC1+8
$$OW^BGP6D6 IC1+7
$$LASTHF^BGP6D7 QUIT+14, QUIT+16, QUIT+18, GETLAST+2, GETLAST+4
$$MEDNUTRD^BGP6D711 IC1+20
$$OTHREL^BGP6D711 IC1+23
$$PED^BGP6D711 SET+10
$$SPECEX^BGP6D711 IC1+22
$$SPECNUTR^BGP6D711 IC1+21
$$CPT^BGP6DU NEWSTUFF+21, NEWSTUFF+49
$$CPTI^BGP6DU NEWSTUFF+13, NEWSTUFF+15, NEWSTUFF+41, NEWSTUFF+43
$$DATE^BGP6UTL IC1+24, IC1+25, IC1+26, IC1+27, QUIT+3, QUIT+12, SET+21, SET+23
$$LASTDX^BGP6UTL1 QUIT+2, NEWSTUFF+19, NEWSTUFF+47, POT+2
$$ICD^BGP6UTL2 QUIT+11, NEWSTUFF+30, NEWSTUFF+58, POT+11
$$ICDDX^BGP6UTL2 QUIT+10
$$CODEN^ICPTCOD NEWSTUFF+13, NEWSTUFF+15, NEWSTUFF+41, NEWSTUFF+43
$$FMADD^XLFDT NEWSTUFF+13, NEWSTUFF+15, NEWSTUFF+34, NEWSTUFF+41, NEWSTUFF+43, POT+2, SET+13
$$FMTE^XLFDT TOMPED+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ATXAX("B" QUIT+11, NEWSTUFF+21, NEWSTUFF+24, NEWSTUFF+49, NEWSTUFF+52, POT+10
^AUPNPREF - [#9000022] TOMREF+5
^AUPNPREF("AA" TOMREF+2, TOMREF+3, TOMREF+4
^AUPNPROB - [#9000011] QUIT+5, QUIT+6, QUIT+7, QUIT+8, QUIT+9, QUIT+12, NEWSTUFF+26, NEWSTUFF+27, NEWSTUFF+28, NEWSTUFF+29
, NEWSTUFF+31, NEWSTUFF+54, NEWSTUFF+55, NEWSTUFF+56, NEWSTUFF+57, NEWSTUFF+59, POT+5, POT+6, POT+7, POT+8
, POT+9
^AUPNPROB("AC" QUIT+4, NEWSTUFF+25, NEWSTUFF+53, POT+4
^AUPNVHF("AA" GETHF1+8, GETHF1+9, GETHF1+16
^AUPNVPED - [#9000010.16] TOMPED+7
^AUTTEDT - [#9999999.09] TOMPED+9, TOMPED+10, TOMREF+9
^AUTTHF - [#9999999.64] GETHF1+13, GETHF1+14, GETHF1+15, GETHF1+16
^AUTTHF("AC" GETHF1+7
^AUTTHF("B" GETALLHF+2, GETALLHF+6, GETALLHF+10
^ICD9 - [#80] QUIT+12, NEWSTUFF+31, NEWSTUFF+59
^TMP($J IC1+34!

Label References

Name Line Occurrences
$$GETLAST NEWSTUFF+34
$$QUIT SET+15
GETALLHF NEWSTUFF+7
GETHF1 GETALLHF+3, GETALLHF+7, GETALLHF+11
KVARS SET+1
NEWSTUFF I91+5
POT NEWSTUFF+36, NEWSTUFF+46
SET NEWSTUFF+8, NEWSTUFF+18, NEWSTUFF+61, POT+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% IC1+33!, TOMPED+5*, TOMPED+12*, KVARS+2!
A IC1+33!, KVARS+2!
B IC1+33!, KVARS+2!
BD GETHF1+2~, GETHF1+5*, GETHF1+11, QUIT~, QUIT+2, QUIT+8, QUIT+14, QUIT+16, QUIT+18, GETLAST~
, GETLAST+2, GETLAST+4
BDATE IC1+33!, TOMPED~, TOMPED+4, TOMREF+7, KVARS+2!
BGP1320 I91+2!, KVARS+3!
>> BGP365 IC1+20, IC1+21, IC1+22, IC1+23
>> BGPACTCL IC1+10, IC1+12, SET+3
>> BGPACTUP IC1+5, I91+4
>> BGPAGEB IC1+10, IC1+12, IC1+13, IC1+14, IC1+15, IC1+16, IC1+17, SET+4, SET+5, SET+6
>> BGPAGEE IC1+6, IC1+7, IC1+8
BGPALLED IC1+4!, IC1+33!, TOMPED+1!, KVARS+2!
BGPALLED( TOMPED+6, TOMPED+7, TOMPED+12
BGPALLED(1 TOMPED+5
BGPALLH GETALLHF+1!
BGPALLH( GETALLHF+16, GETHF1+22*, GETHF1+26*
BGPALLH(0 GETALLHF+15
>> BGPBDATE NEWSTUFF+7, NEWSTUFF+19, NEWSTUFF+21, NEWSTUFF+34, POT+2, POT+7, SET+10, SET+14
>> BGPBDX GETHF1+5, NEWSTUFF+7*, NEWSTUFF+34*, NEWSTUFF+47, NEWSTUFF+49
BGPBMI IC1+3*, IC1+6*, IC1+7, IC1+8, IC1+33!
>> BGPD1 IC1+1*, IC1+10*, IC1+18, IC1+28, I91+1*
>> BGPD10 I91+1*, SET+6*
>> BGPD2 IC1+1*, IC1+11*, IC1+18, IC1+30, I91+1*
>> BGPD3 IC1+1*, IC1+12*, IC1+13, IC1+14, IC1+15, IC1+16, IC1+17, IC1+18, IC1+29, I91+1*
>> BGPD4 IC1+1*, IC1+13*, IC1+18, I91+1*
>> BGPD5 IC1+1*, IC1+14*, IC1+18, I91+1*
>> BGPD6 IC1+1*, IC1+15*, IC1+18, I91+1*, SET+2*, SET+3
>> BGPD7 IC1+1*, IC1+16*, IC1+18, I91+1*, SET+3*, SET+4, SET+5, SET+6, SET+21
>> BGPD8 IC1+1*, IC1+17*, IC1+18, I91+1*, SET+4*
>> BGPD9 IC1+1*, I91+1*, SET+5*
>> BGPDMD2 IC1+11
>> BGPEDATE IC1+6, IC1+20, IC1+21, IC1+22, IC1+23, NEWSTUFF+7, NEWSTUFF+13, NEWSTUFF+15, NEWSTUFF+19, NEWSTUFF+21
, NEWSTUFF+41, NEWSTUFF+43, SET+10, SET+15
>> BGPEDX GETHF1+4, NEWSTUFF+7*, NEWSTUFF+28, NEWSTUFF+34*, NEWSTUFF+47, NEWSTUFF+49, NEWSTUFF+56
>> BGPINFO KVARS+1
BGPLAST GETLAST+1~
BGPLAST( GETLAST+8
BGPLAST(0 GETLAST+6
BGPLAST(9999999 GETLAST+3*, GETLAST+5*
>> BGPLPED TOMPED+2*, TOMPED+5*, TOMPED+12, TOMPED+13
BGPMN IC1+4!, IC1+20*, IC1+24, IC1+33!
>> BGPN1 IC1+1*, IC1+20*, I91+1*
>> BGPN10 I91+1*, SET+19*
>> BGPN11 I91+1*
>> BGPN2 IC1+1*, IC1+21*, I91+1*
>> BGPN3 IC1+1*, IC1+22*, I91+1*
>> BGPN4 IC1+1*, IC1+23*, I91+1*
>> BGPN5 IC1+1*, I91+1*
>> BGPN6 IC1+1*, I91+1*, SET+11*, SET+19
>> BGPN7 I91+1*, SET+11*
>> BGPN8 I91+1*, SET+16*, SET+18, SET+19, SET+24
>> BGPN9 I91+1*, SET+18*
BGPOB IC1+3*, IC1+8*, IC1+9, IC1+12, IC1+33!
>> BGPOTH IC1+23*, IC1+27
BGPOW IC1+3*, IC1+7*, IC1+9, IC1+33!
BGPOWOB IC1+9*, IC1+10, IC1+33!
BGPQ I91+2!, I91+3*, SET+15*, SET+16, SET+24, KVARS+2!
BGPREM I91+3*, POT+4*, POT+11*, POT+14, KVARS+3!
BGPSDX I91+2!, KVARS+3!
BGPSN IC1+4!, IC1+21*, IC1+25, IC1+33!
BGPSPEX IC1+4!, IC1+22*, IC1+26, IC1+33!
>> BGPSTOP IC1+5*, I91+4*, SET+1*
BGPTC I91+2!, I91+3*, KVARS+2!
BGPTC1 I91+2!, I91+3*, SET+10*, SET+11, SET+23, KVARS+3!
BGPTOB I91+2!, KVARS+3!
BGPTOBD I91+2!, I91+3*, NEWSTUFF+9*, NEWSTUFF+10*, NEWSTUFF+14*, NEWSTUFF+16*, NEWSTUFF+20*, NEWSTUFF+22*, NEWSTUFF+31*, NEWSTUFF+37*
, NEWSTUFF+38*, NEWSTUFF+42*, NEWSTUFF+44*, NEWSTUFF+48*, NEWSTUFF+50*, NEWSTUFF+59*, POT+1, SET+13, SET+21, KVARS+3!
BGPTOBS GETALLHF+5, GETALLHF+9, GETALLHF+13, GETALLHF+16*, GETALLHF+17*, GETHF1+1*, GETHF1+3!, GETHF1+19*, GETHF1+20*, GETHF1+21
, GETHF1+22*, GETHF1+23, GETHF1+25!, GETHF1+26*, I91+2!, NEWSTUFF+6!, NEWSTUFF+8, NEWSTUFF+9, NEWSTUFF+10, NEWSTUFF+11
, NEWSTUFF+12, NEWSTUFF+18, NEWSTUFF+33*, NEWSTUFF+34*, NEWSTUFF+36, NEWSTUFF+37, NEWSTUFF+38, NEWSTUFF+39, NEWSTUFF+40, NEWSTUFF+46
, KVARS+3!
BGPTOBS( GETHF1+12, GETHF1+13, GETHF1+14, GETHF1+15, GETHF1+16*, GETHF1+21, GETHF1+22, GETHF1+24
BGPTOBS(0 GETHF1+20
>> BGPTOBX I91+3*, NEWSTUFF+9*, NEWSTUFF+10*, NEWSTUFF+14*, NEWSTUFF+16*, NEWSTUFF+20*, NEWSTUFF+22*, NEWSTUFF+31*, NEWSTUFF+37*, NEWSTUFF+38*
, NEWSTUFF+42*, NEWSTUFF+44*, NEWSTUFF+48*, NEWSTUFF+50*, NEWSTUFF+59*
BGPTOM I91+2!, KVARS+3!
BGPTQ I91+2!, KVARS+2!
BGPTU I91+3*, NEWSTUFF+8, NEWSTUFF+9*, NEWSTUFF+10*, NEWSTUFF+11, NEWSTUFF+14*, NEWSTUFF+16*, NEWSTUFF+20*, NEWSTUFF+22*, NEWSTUFF+31*
, NEWSTUFF+37*, NEWSTUFF+38*, NEWSTUFF+39, NEWSTUFF+42*, NEWSTUFF+44*, NEWSTUFF+48*, NEWSTUFF+50*, NEWSTUFF+59*, NEWSTUFF+61, POT+3*
, POT+14*, SET+1, KVARS+3!
BGPTUC I91+3*, NEWSTUFF+9*, NEWSTUFF+37*, KVARS+3!
BGPTUHF I91+3*, KVARS+3!
BGPTUQ I91+3*, NEWSTUFF+9*, NEWSTUFF+37*, SET+18, KVARS+3!
>> BGPVALUE IC1+19*, IC1+24*, IC1+25*, IC1+26*, IC1+27*, IC1+31, IC1+32*, SET+21*, SET+23*, SET+24*
C IC1+33!, GETALLHF+2*, GETALLHF+6*, GETALLHF+10*, GETHF1+1, GETHF1+7, GETLAST+1~, GETLAST+4*, GETLAST+5, KVARS+2!
D IC1+33!, DNKA+1~, DNKA+2*, DNKA+3, DNKA+5, DNKA+6, DNKA+7, TOMPED+6*, TOMREF+3*, TOMREF+4
, GETALLHF+15*, GETALLHF+16, GETHF1+6*, GETHF1+9*, GETHF1+10, GETHF1+11, GETHF1+12, GETHF1+13, GETHF1+14, GETHF1+15
, GETHF1+16, GETHF1+20*, GETHF1+24*, GETHF1+26, KVARS+2!
>> DFN IC1+6, IC1+7, IC1+8, IC1+20, IC1+21, IC1+22, IC1+23, GETHF1+8, GETHF1+9, GETHF1+16
, NEWSTUFF+13, NEWSTUFF+15, NEWSTUFF+19, NEWSTUFF+21, NEWSTUFF+25, NEWSTUFF+34, NEWSTUFF+41, NEWSTUFF+43, NEWSTUFF+47, NEWSTUFF+49
, NEWSTUFF+53, POT+2, POT+4, SET+10, SET+15
E IC1+33!, TOMPED+4*, KVARS+2!
ED GETHF1+2~, GETHF1+4*, GETHF1+10, QUIT~, QUIT+2, QUIT+7, QUIT+14, QUIT+16, QUIT+18, GETLAST~
, GETLAST+2, GETLAST+4
EDATE IC1+33!, TOMPED~, TOMPED+4, TOMREF+8, KVARS+2!
F IC1+33!, KVARS+2!
G TOMREF+2*, TOMREF+3, TOMREF+4, TOMREF+11*, TOMREF+12, QUIT+1~, QUIT+4*, QUIT+12*, QUIT+13, QUIT+14*
, QUIT+15, QUIT+16*, QUIT+17, QUIT+18*, QUIT+19, NEWSTUFF+25*, NEWSTUFF+53*, POT+4*
H IC1+33!, GETHF1+6*, GETHF1+7*, GETHF1+8, GETHF1+9, GETHF1+13, GETHF1+14, GETHF1+15, GETHF1+16, GETHF1+20*
, GETHF1+26, KVARS+2!
>> I TOMREF+4*, TOMREF+5
N DNKA+1~, DNKA+4*, DNKA+5, DNKA+6, DNKA+7
O GETHF1+6!
P IC1+33!, TOMPED~, TOMPED+4, TOMREF+2, TOMREF+3, TOMREF+4, QUIT~, QUIT+2, QUIT+4, QUIT+14
, QUIT+16, QUIT+18, GETLAST~, GETLAST+2, GETLAST+4, KVARS+2!
S IC1+33!, GETLAST+1~, GETLAST+2*, GETLAST+3, KVARS+2!
T IC1+33!, TOMPED+6*, TOMPED+7*, TOMPED+8, TOMPED+9, TOMPED+10*, TOMPED+11, TOMPED+12, QUIT+1~, QUIT+10*
, GETLAST+1~, GETLAST+6*, GETLAST+7, GETLAST+8, NEWSTUFF+24*, NEWSTUFF+30, NEWSTUFF+52*, NEWSTUFF+58, POT+10*, POT+11
, KVARS+2!
U IC1+24, IC1+25, IC1+26, IC1+27, TOMPED+7, TOMPED+10, TOMPED+12, TOMREF+5, TOMREF+9, TOMREF+11
, GETALLHF+5, GETALLHF+9, GETALLHF+13, GETHF1+12, GETHF1+13, GETHF1+14, GETHF1+15, GETHF1+16, GETHF1+22, GETHF1+24
, QUIT+3, QUIT+5, QUIT+6, QUIT+7, QUIT+8, QUIT+9, QUIT+10, QUIT+12, QUIT+15, QUIT+17
, QUIT+19, GETLAST+3, GETLAST+5, NEWSTUFF+9, NEWSTUFF+10, NEWSTUFF+11, NEWSTUFF+12, NEWSTUFF+14, NEWSTUFF+16, NEWSTUFF+20
, NEWSTUFF+22, NEWSTUFF+26, NEWSTUFF+27, NEWSTUFF+28, NEWSTUFF+29, NEWSTUFF+31, NEWSTUFF+37, NEWSTUFF+38, NEWSTUFF+39, NEWSTUFF+40
, NEWSTUFF+42, NEWSTUFF+44, NEWSTUFF+48, NEWSTUFF+50, NEWSTUFF+54, NEWSTUFF+55, NEWSTUFF+56, NEWSTUFF+57, NEWSTUFF+59, POT+5
, POT+6, POT+7, POT+8, POT+9, SET+11, SET+23, SET+24
V IC1+28*, IC1+29*, IC1+30*, IC1+31*, IC1+32, IC1+33!, DNKA~, DNKA+2, DNKA+4, KVARS+2!
X IC1+33!, TOMPED+4*, TOMPED+6*, TOMPED+7, TOMPED+12, TOMREF+2*, TOMREF+3, TOMREF+4, TOMREF+9, QUIT+1~
, QUIT+4*, QUIT+5, QUIT+6, QUIT+7, QUIT+8, QUIT+9, QUIT+12, NEWSTUFF+12*, NEWSTUFF+13, NEWSTUFF+15
, NEWSTUFF+25*, NEWSTUFF+26, NEWSTUFF+27, NEWSTUFF+28, NEWSTUFF+29, NEWSTUFF+31, NEWSTUFF+40*, NEWSTUFF+41, NEWSTUFF+43, NEWSTUFF+53*
, NEWSTUFF+54, NEWSTUFF+55, NEWSTUFF+56, NEWSTUFF+57, NEWSTUFF+59, POT+1*, POT+2, POT+4*, POT+5, POT+6
, POT+7, POT+8, POT+9, KVARS+2!
Y IC1+33!, TOMPED+3*, TOMPED+4, TOMREF+9*, TOMREF+10, TOMREF+11, GETHF1+21*, GETHF1+22, QUIT+1~, QUIT+2*
, QUIT+3, QUIT+9*, QUIT+10, QUIT+11, QUIT+12, NEWSTUFF+13*, NEWSTUFF+14, NEWSTUFF+15*, NEWSTUFF+16, NEWSTUFF+18
, NEWSTUFF+19*, NEWSTUFF+20, NEWSTUFF+21*, NEWSTUFF+22, NEWSTUFF+25*, NEWSTUFF+31*, NEWSTUFF+41*, NEWSTUFF+42, NEWSTUFF+43*, NEWSTUFF+44
, NEWSTUFF+46, NEWSTUFF+47*, NEWSTUFF+48, NEWSTUFF+49*, NEWSTUFF+50, NEWSTUFF+53*, NEWSTUFF+59*, POT+2*, POT+3, POT+9*
, POT+11, SET+13*, SET+14*, SET+15, KVARS+2!
Z IC1+33!, TOMREF+5*, TOMREF+6, TOMREF+7, TOMREF+8, TOMREF+11, NEWSTUFF+29*, NEWSTUFF+30, NEWSTUFF+31, NEWSTUFF+57*
, NEWSTUFF+58, NEWSTUFF+59, KVARS+2!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All