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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BGP9D71

Package: IHS GPRA Information System

Routine: BGP9D71


Information

BGP9D71 ; IHS/CMI/LAB - measure C ;

Source Information

Source file <BGP9D71.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
IHS GPRA Information System 6 ($$BMI,$$OB,$$OW)^BGP9D6  ($$CPTSM,$$DX,$$LASTHF,$$TOBACCO)^BGP9D7  ($$MEDNUTR,$$OTHREL,$$PED,$$SPECEX,$$SPECNUTR)^BGP9D711  ($$CPT,$$CPTI)^BGP9DU  $$DATE^BGP9UTL  ($$LASTDX,$$LASTDXI)^BGP9UTL1  
DRG Grouper 2 $$ICDDX^ICDCODE  $$CODEN^ICPTCOD  
Patient Care Component Reports 2 $$START1^APCLDF  $$PRIMPOV^APCLV  
IHS Patient 1 $$DOB^AUPNPAT  
Kernel 1 ($$FMADD,$$FMTE)^XLFDT  
Taxonomy 1 $$ICD^ATXCHK  

Entry Points

Name Comments DBIA/ICR reference
NXT ;
GETALLHF ;
I19 ;EP
DNKA(V) ;EP - is this a DNKA visit?
KVARS ;
TOMREF ;
SET ;
NEWSTUFF ;new stuff
QUIT(P,BD,ED) ;
IC1 ;EP
TOMPED(P,BDATE,EDATE) ;EP

External References

Name Field # of Occurrence
$$START1^APCLDF TOMPED+4
$$PRIMPOV^APCLV DNKA+2, DNKA+4
$$ICD^ATXCHK NEWSTUFF+39
$$DOB^AUPNPAT I19+7, I19+8, I19+10, NEWSTUFF+18
$$BMI^BGP9D6 IC1+6
$$OB^BGP9D6 IC1+8
$$OW^BGP9D6 IC1+7
$$CPTSM^BGP9D7 I19+10
$$DX^BGP9D7 I19+8, I19+36
$$LASTHF^BGP9D7 QUIT+15
$$TOBACCO^BGP9D7 I19+7, I19+34
$$MEDNUTR^BGP9D711 IC1+19
$$OTHREL^BGP9D711 IC1+22
$$PED^BGP9D711 I19+30, SET+9
$$SPECEX^BGP9D711 IC1+21
$$SPECNUTR^BGP9D711 IC1+20
$$CPT^BGP9DU NEWSTUFF+23
$$CPTI^BGP9DU NEWSTUFF+13, NEWSTUFF+15, NEWSTUFF+44, NEWSTUFF+46
$$DATE^BGP9UTL IC1+23, IC1+24, IC1+25, IC1+26, NXT+3, NXT+4, NXT+5, QUIT+3, QUIT+5, QUIT+13
, SET+18, SET+20
$$LASTDX^BGP9UTL1 NEWSTUFF+21
$$LASTDXI^BGP9UTL1 QUIT+2, QUIT+4, NEWSTUFF+28, NEWSTUFF+30
$$ICDDX^ICDCODE QUIT+11
$$CODEN^ICPTCOD NEWSTUFF+13, NEWSTUFF+15, NEWSTUFF+44, NEWSTUFF+46
$$FMADD^XLFDT I19+7, I19+8, I19+10, GETALLHF+4, NEWSTUFF+7, NEWSTUFF+13, NEWSTUFF+15, NEWSTUFF+21, NEWSTUFF+23, NEWSTUFF+28
, NEWSTUFF+30, NEWSTUFF+32, NEWSTUFF+44, NEWSTUFF+46, SET+9, SET+12
$$FMTE^XLFDT TOMPED+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ATXAX("B" NEWSTUFF+23, NEWSTUFF+33
^AUPNPREF - [#9000022] TOMREF+5
^AUPNPREF("AA" TOMREF+2, TOMREF+3, TOMREF+4
^AUPNPROB - [#9000011] QUIT+7, QUIT+8, QUIT+9, QUIT+10, QUIT+13, NEWSTUFF+35, NEWSTUFF+36, NEWSTUFF+37, NEWSTUFF+38
^AUPNPROB("AC" QUIT+6, NEWSTUFF+34
^AUPNVHF("AA" GETALLHF+7, GETALLHF+8, GETALLHF+13
^AUPNVPED - [#9000010.16] TOMPED+7
^AUTTEDT - [#9999999.09] TOMPED+9, TOMPED+10, TOMREF+9
^AUTTHF - [#9999999.64] GETALLHF+12, GETALLHF+13
^AUTTHF("AC" GETALLHF+6
^AUTTHF("B" GETALLHF+1
^ICD9 - [#80] QUIT+13
^TMP($J IC1+31!

Label References

Name Line Occurrences
$$QUIT SET+12
$$TOMPED I19+40
GETALLHF NEWSTUFF+7, NEWSTUFF+18
KVARS SET+1
NEWSTUFF I19+6
SET NEWSTUFF+8, NEWSTUFF+20, NEWSTUFF+26, NEWSTUFF+45

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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