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: BGP7D3B

Package: IHS GPRA Information System

Routine: BGP7D3B


Information

BGP7D3B ; IHS/CMI/LAB - PNEUMO REMINDER 27 Feb 2015 7:52 AM ;

Source Information

Source file <BGP7D3B.m>

Call Graph

Call Graph Total: 15

Package Total Call Graph
IHS GPRA Information System 10 OPTOM^BGP7D213  $$FLU^BGP7D3  ($$ANCONT,$$ANIMCONT,$$BI,$$PNEU)^BGP7D31  ($$DTAP,$$DTAPTD,$$HIGHRP)^BGP7D3A  ($$FIRSTPDX,$$LASTVD)^BGP7D3C  $$PREG^BGP7D7  ($$CPT,$$CPTI,$$TRAN)^BGP7DU  $$DATE^BGP7UTL  
($$CPTREFT,$$LASTDX,$$NMIREF)^BGP7UTL1  $$EDD^BGP7UTL2  
Patient Care Component Reports 2 $$START1^APCLDF  $$VD^APCLV  
DRG Grouper 1 $$CODEN^ICPTCOD  
IHS Patient 1 $$DOB^AUPNPAT  
Kernel 1 ($$FMADD,$$FMTE)^XLFDT  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS GPRA Information System 2 BGP7D3  BGP7EL3  

Entry Points

Name Comments DBIA/ICR reference
PNEUCONJ(P,BDATE,EDATE,FORE) ;EP
I13 ;EP - PN
N ;
PREG(P,BDATE,EDATE) ;
IZOSTER(P,BDATE,EDATE,FORE) ;EP
TDE
OPTOM ;EP
TD ;new tdap and td stuff for v11.1
UNK
PN ;EP - called from elder
UNK1
LASTTDAP(P,BDATE,EDATE) ;EP
PNEUD(P,BDATE,EDATE,FORE) ;EP

External References

Name Field # of Occurrence
$$START1^APCLDF IZOSTER+7, PNEUD+7, PNEUD+9, PNEUD+11, PNEUCONJ+7, PNEUCONJ+9, PNEUCONJ+11
$$VD^APCLV LASTTDAP+8
$$DOB^AUPNPAT PN+1, PN+8, PN+18, PN+22, TD+1, TD+16, IZOSTER+18, IZOSTER+20, PNEUD+22, PNEUD+24
, PNEUD+26, PNEUCONJ+22, PNEUCONJ+24, PNEUCONJ+26, PNEUCONJ+28, LASTTDAP+22, LASTTDAP+30
OPTOM^BGP7D213 OPTOM+1
$$FLU^BGP7D3 TD+9
$$ANCONT^BGP7D31 PNEUD+19, PNEUCONJ+19, LASTTDAP+19
$$ANIMCONT^BGP7D31 IZOSTER+15
$$BI^BGP7D31 PNEUD+7
$$PNEU^BGP7D31 PN+1, PN+4, PN+10
$$DTAP^BGP7D3A TD+1
$$DTAPTD^BGP7D3A TD+4
$$HIGHRP^BGP7D3A I13+7, I13+8
$$FIRSTPDX^BGP7D3C TD+33
$$LASTVD^BGP7D3C TD+53
$$PREG^BGP7D7 PREG+1
$$CPT^BGP7DU IZOSTER+9, PNEUD+13, PNEUCONJ+13
$$CPTI^BGP7DU LASTTDAP+15
$$TRAN^BGP7DU IZOSTER+11, PNEUD+15, PNEUCONJ+15
$$DATE^BGP7UTL PN+41, PN+50, PN+52, LASTTDAP+11, LASTTDAP+16, LASTTDAP+20, LASTTDAP+28, LASTTDAP+31
$$CPTREFT^BGP7UTL1 IZOSTER+20, PNEUD+26, PNEUCONJ+28
$$LASTDX^BGP7UTL1 UNK+4, UNK+8, UNK+10, UNK+12
$$NMIREF^BGP7UTL1 IZOSTER+18, PNEUD+22, PNEUD+24, PNEUCONJ+22, PNEUCONJ+24, PNEUCONJ+26, LASTTDAP+30
$$EDD^BGP7UTL2 TD+35
$$CODEN^ICPTCOD LASTTDAP+14, LASTTDAP+29
$$FMADD^XLFDT PN+4, PN+25, TD+4, TD+33, TD+51, TD+54, TD+55, TD+56, TD+57, UNK+8
, UNK+10, UNK+12, PREG+1
$$FMTE^XLFDT IZOSTER+5, IZOSTER+6, PNEUD+5, PNEUD+6, PNEUCONJ+5, PNEUCONJ+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ATXAX("B" IZOSTER+9, IZOSTER+11, IZOSTER+20, PNEUD+13, PNEUD+15, PNEUD+26, PNEUCONJ+13, PNEUCONJ+15, PNEUCONJ+28
^AUPNPREF - [#9000022] LASTTDAP+25, LASTTDAP+26
^AUPNPREF("AA" LASTTDAP+25
^AUPNREP - [#9000017] TD+33
^AUPNVIMM - [#9000010.11] LASTTDAP+6, LASTTDAP+7, LASTTDAP+8
^AUPNVIMM("AA" LASTTDAP+4, LASTTDAP+5
^AUTTIMM("C" IZOSTER+18, PNEUD+22, PNEUD+24, PNEUCONJ+22, PNEUCONJ+24, PNEUCONJ+26, LASTTDAP+3, LASTTDAP+24

Label References

Name Line Occurrences
$$IZOSTER TD+16
$$LASTTDAP TD+39
$$PNEUCONJ PN+35
$$PNEUD PN+22, PN+25, PN+28
$$PREG I13+17
TDE TD+7
UNK TD+60
UNK1 UNK+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% IZOSTER+1~, IZOSTER+9*, IZOSTER+10, IZOSTER+11*, IZOSTER+12, PNEUD+11*, PNEUD+13*, PNEUD+14, PNEUD+15*, PNEUD+16
, PNEUCONJ+13*, PNEUCONJ+14, PNEUCONJ+15*, PNEUCONJ+16
B PN+8*, PN+9, PN+18*, PN+19, LASTTDAP+1~, LASTTDAP+22*, LASTTDAP+25, LASTTDAP+29*, LASTTDAP+30
BD IZOSTER+1~, IZOSTER+3*, IZOSTER+9, IZOSTER+11, PNEUD+3*, PNEUD+13, PNEUD+15, PNEUCONJ+3*, PNEUCONJ+13, PNEUCONJ+15
BDATE IZOSTER~, IZOSTER+3, IZOSTER+6*, IZOSTER+7, PNEUD~, PNEUD+3, PNEUD+6*, PNEUD+7, PNEUD+9, PNEUD+11
, PNEUCONJ~, PNEUCONJ+3, PNEUCONJ+6*, PNEUCONJ+7, PNEUCONJ+9, PNEUCONJ+11, LASTTDAP~, LASTTDAP+9, LASTTDAP+15, PREG~
, PREG+1
BGPA65 PN+10*, PN+28*, TDE!
>> BGPA65BD PN+9*, PN+10, PN+19*, PN+28
>> BGPACTCL I13+6, I13+7, I13+9, I13+11, I13+13, I13+15, I13+18
>> BGPACTUP I13+4, I13+8, I13+10, I13+12, I13+14, I13+16
>> BGPAGEB I13+4, I13+6, I13+7, I13+8, I13+9, I13+10, I13+11, I13+12, I13+13, I13+14
, I13+15, I13+16, I13+18, PN+10, PN+11, PN+14, PN+15, PN+28, PN+29, PN+32
, PN+33
>> BGPBDATE I13+17, PN+35, TD+35, UNK+4
>> BGPD1 I13+6*, I13+19, PN+39, PN+45, N+5
>> BGPD10 I13+13*, I13+19, N+3
>> BGPD11 I13+19
>> BGPD12 I13+15*, I13+19, N+4
>> BGPD13 I13+16*, I13+19
>> BGPD14 I13+17*, I13+19, TD+31
>> BGPD15 I13+18*
>> BGPD16 TD+53*, UNK+4*, UNK+9*, N+2
>> BGPD2 I13+5*, I13+19, PN+40, PN+47, PN+48
>> BGPD3 I13+4*, I13+19
>> BGPD4 I13+7*, I13+19, PN+46, PN+48
>> BGPD5 I13+8*, I13+19, PN+46
>> BGPD6 I13+9*, I13+19, PN+45, PN+48
>> BGPD7 I13+10*, I13+19
>> BGPD8 I13+11*, I13+19, PN+45, PN+48
>> BGPD9 I13+12*, I13+19
>> BGPDMD2 I13+5
BGPDTAPP I13+1~, I13+20*, N+10
>> BGPDV PN+37*, PN+38*, PN+39*, PN+40*, PN+41, PN+42, PN+44*, PN+45*, PN+46*, PN+47*
, PN+48*, PN+50
>> BGPEDATE I13+7, I13+8, I13+17, PN+1, PN+4, PN+10, PN+22, PN+25, PN+28, PN+35
, TD+1, TD+4, TD+9, TD+16, TD+33, TD+35, TD+37, TD+38, UNK+4
>> BGPEDD TD+35*, TD+38, TD+44, TD+51, TD+52, TD+54, TD+56, UNK+1
BGPFLU I13+1~, TD+9*, TD+10, TD+11, N+8, N+12, TDE!
>> BGPFPRDX TD+33*, TD+39
BGPG IZOSTER+1~, PNEUD+1!, PNEUD+11!, PNEUCONJ+1!
BGPG(1 IZOSTER+8, PNEUD+8, PNEUD+10, PNEUD+12, PNEUCONJ+8, PNEUCONJ+10, PNEUCONJ+12
>> BGPIMM LASTTDAP+23*, LASTTDAP+24
BGPLPNU TDE!, IZOSTER+1~, IZOSTER+2*, IZOSTER+8*, IZOSTER+10*, IZOSTER+12*, IZOSTER+13, PNEUD+2*, PNEUD+8*, PNEUD+10*
, PNEUD+12*, PNEUD+14*, PNEUD+16*, PNEUD+17, PNEUCONJ+2*, PNEUCONJ+8*, PNEUCONJ+10*, PNEUCONJ+12*, PNEUCONJ+14*, PNEUCONJ+16*
, PNEUCONJ+17
>> BGPN1 PN+2*, PN+11, PN+14, PN+15, PN+41
>> BGPN10 TD+5*, TD+12, TD+13, TD+19, TD+20, TD+23, TD+24, TD+27, TD+28
>> BGPN11 TD+6*, TD+14, TD+15, TD+21, TD+22, TD+25, TD+26
>> BGPN12 TD+3*, TD+14, TD+15, TD+21, TD+22, TD+25, TD+26
>> BGPN13 TD+10*, TD+12, TD+19, TD+23, TD+27
>> BGPN14 TD+11*, TD+14, TD+21, TD+25
>> BGPN15 TD+12*
>> BGPN16 TD+14*
>> BGPN17 TD+17*, TD+19, TD+20, TD+23, TD+24, TD+27, TD+28
>> BGPN18 TD+18*, TD+21, TD+22, TD+25, TD+26
>> BGPN19 TD+19*
>> BGPN20 TD+21*
>> BGPN21 TD+23*
>> BGPN22 TD+25*
>> BGPN23 PN+23*, PN+29, PN+32, PN+33
>> BGPN24 PN+24*
>> BGPN25 PN+26*, PN+28*, PN+29*, PN+33
>> BGPN26 PN+27*
>> BGPN27 PN+28*, PN+33
>> BGPN28 PN+31*, PN+32*, PN+33*, PN+34, PN+52, PN+53
>> BGPN29 TD+27*
>> BGPN3 PN+3*, TD+25, TD+26
>> BGPN30 TD+13*, N+3
>> BGPN31 TD+15*
>> BGPN32 TD+20*, N+4
>> BGPN33 TD+22*
>> BGPN34 TD+24*
>> BGPN35 TD+26*
>> BGPN36 PN+35*, PN+54
>> BGPN37 PN+26*, PN+28*, PN+29*, PN+34*, PN+35*, PN+52, TD+27, TD+28
>> BGPN38 TD+28*, N+5
>> BGPN39 TD+40*
>> BGPN4 PN+5*, PN+10*, PN+11*, PN+15
>> BGPN40 TD+41*
>> BGPN41 TD+66*, UNK+16*
>> BGPN42 TD+65*, UNK+15*
>> BGPN43 TD+64*, UNK+14*
>> BGPN44 UNK*, UNK1*
>> BGPN45 N+3*, N+4*, N+5*
>> BGPN6 PN+6*
>> BGPN7 PN+10*, PN+15
>> BGPN8 PN+13*, PN+14*, PN+15*, PN+41, PN+50, TD+23, TD+24
>> BGPN9 TD+2*, TD+12, TD+13, TD+19, TD+20, TD+23, TD+24, TD+27, TD+28
>> BGPND11 I13+14*
>> BGPNMI LASTTDAP+22*
>> BGPPLPNU I13+20*, PN+22*, PN+35*, PN+36*, PN+52
>> BGPPNA65 PN+19*
BGPPNCON TDE!
BGPPNEU I13+1~, PN+22*, PN+23, PN+24, PN+36
BGPPNEUD I13+1~, PN+25*, PN+26, PN+27
>> BGPRTYPE PN+38, PN+43, PN+48, PN+50, TD+7
>> BGPSEX I13+17
>> BGPSTOP I13+19*
BGPTD I13+1~, TD+4*, TD+5, TD+6, N+7, N+11, TDE!
BGPTDAP I13+1~, I13+20*, TD+1*, TD+2, TD+3, N+6, N+10, TDE!
BGPTDAPP TD+36!, TD+39*, TD+40, TD+41, TD+58, TD+60, UNK+5, UNK+7, TDE!
>> BGPTRIM TD+30*, TD+64*, TD+65*, TD+66*, UNK*, UNK+14*, UNK+15*, UNK+16*, UNK1*, N+10
BGPVAL PN+4*, PN+5, PN+6, TDE!
BGPVALH PN+41*, PN+50*, TDE!
>> BGPVALUD I13+20*, PN+51*, PN+52*, PN+53*, PN+54*, TD+32*, N+2*, N+10*, N+11*, N+12*
, N+13*
>> BGPVALUE I13+20*, PN+1*, PN+2, PN+3, PN+41*, PN+42*, PN+50*, N+6*, N+7*, N+8*
, N+9*
BGPX LASTTDAP+1~, LASTTDAP+2*, LASTTDAP+4, LASTTDAP+11*, LASTTDAP+16*, LASTTDAP+17, LASTTDAP+20*, LASTTDAP+28*, LASTTDAP+31*
BGPZ IZOSTER+15*, PNEUD+19*, PNEUCONJ+19*, LASTTDAP+1~, LASTTDAP+19*
BGPZOST I13+1~, TD+16*, TD+17, TD+18, N+9, N+13
C LASTTDAP+1~, LASTTDAP+3*, LASTTDAP+4, LASTTDAP+5, LASTTDAP+14*, LASTTDAP+15
D TD+37*, TD+38*, TD+39, LASTTDAP+1~, LASTTDAP+4*, LASTTDAP+5, LASTTDAP+15*, LASTTDAP+16, LASTTDAP+25*, LASTTDAP+27
>> DFN I13+7, I13+8, I13+17, PN+1, PN+4, PN+8, PN+10, PN+18, PN+22, PN+25
, PN+28, PN+35, TD+1, TD+4, TD+9, TD+16, TD+33, TD+35, TD+39, TD+53
, UNK+4, UNK+8, UNK+10, UNK+12, PREG+1
E IZOSTER+1~, IZOSTER+7*, PNEUD+7*, PNEUD+9*, PNEUD+11*, PNEUCONJ+7*, PNEUCONJ+9*, PNEUCONJ+11*, LASTTDAP+22*, LASTTDAP+25
ED IZOSTER+1~, IZOSTER+4*, IZOSTER+9, IZOSTER+11, IZOSTER+15, IZOSTER+18, IZOSTER+20, PNEUD+4*, PNEUD+13, PNEUD+15
, PNEUD+19, PNEUD+22, PNEUD+24, PNEUD+26, PNEUCONJ+4*, PNEUCONJ+13, PNEUCONJ+15, PNEUCONJ+19, PNEUCONJ+22, PNEUCONJ+24
, PNEUCONJ+26, PNEUCONJ+28
EDATE IZOSTER~, IZOSTER+4, IZOSTER+5*, IZOSTER+7, PNEUD~, PNEUD+4, PNEUD+5*, PNEUD+7, PNEUD+9, PNEUD+11
, PNEUCONJ~, PNEUCONJ+4, PNEUCONJ+5*, PNEUCONJ+7, PNEUCONJ+9, PNEUCONJ+11, LASTTDAP~, LASTTDAP+10, LASTTDAP+15, LASTTDAP+19
, LASTTDAP+22, LASTTDAP+30, PREG~, PREG+1
FB TD+47~, TD+56*, TD+63
FE TD+47~, TD+57*
FORE IZOSTER~, PNEUD~, PNEUCONJ~
G TD+49*, TD+61*, TD+62*, TD+63*, TD+64, TD+65, TD+66, UNK, UNK+3*, UNK+9*
, UNK+11*, UNK+13*, UNK+14, UNK+15, UNK+16, UNK1, IZOSTER+1~, IZOSTER+18*, IZOSTER+19, PNEUD+22*
, PNEUD+23, PNEUD+24*, PNEUD+25, PNEUCONJ+22*, PNEUCONJ+23, PNEUCONJ+24*, PNEUCONJ+25, PNEUCONJ+26*, PNEUCONJ+27, LASTTDAP+1~
, LASTTDAP+30*, LASTTDAP+31
>> I LASTTDAP+24*, LASTTDAP+25
ID LASTTDAP+1~, LASTTDAP+6*, LASTTDAP+7, LASTTDAP+8*, LASTTDAP+9, LASTTDAP+10, LASTTDAP+11
P IZOSTER~, IZOSTER+7, IZOSTER+9, IZOSTER+11, IZOSTER+15, IZOSTER+18, IZOSTER+20, PNEUD~, PNEUD+7, PNEUD+9
, PNEUD+11, PNEUD+13, PNEUD+15, PNEUD+19, PNEUD+22, PNEUD+24, PNEUD+26, PNEUCONJ~, PNEUCONJ+7, PNEUCONJ+9
, PNEUCONJ+11, PNEUCONJ+13, PNEUCONJ+15, PNEUCONJ+19, PNEUCONJ+22, PNEUCONJ+24, PNEUCONJ+26, PNEUCONJ+28, LASTTDAP~, LASTTDAP+4
, LASTTDAP+5, LASTTDAP+15, LASTTDAP+19, LASTTDAP+22, LASTTDAP+25, LASTTDAP+30, PREG~
R IZOSTER+1~, IZOSTER+20*, IZOSTER+21, PNEUD+26*, PNEUD+27, PNEUCONJ+28*, PNEUCONJ+29, LASTTDAP+1~, LASTTDAP+22*, LASTTDAP+27*
, LASTTDAP+28, LASTTDAP+29*
SB TD+47~, TD+54*, TD+57, TD+62
SE TD+47~, TD+55*, TD+62
TB TD+47~, TD+51*, TD+53, TD+55, TD+61
TE TD+47~, TD+52*, TD+53, TD+61
U PN+2, PN+3, PN+5, PN+6, PN+10, PN+23, PN+24, PN+26, PN+27, PN+28
, PN+35, PN+41, PN+50, PN+52, TD+3, TD+6, TD+10, TD+11, TD+17, TD+18
, TD+33, TD+58, UNK+5, N+6, N+7, N+8, N+9, N+10, N+11, N+12
, N+13, IZOSTER+8, IZOSTER+10, IZOSTER+12, IZOSTER+13, IZOSTER+16, IZOSTER+19, IZOSTER+21, PNEUD+8, PNEUD+10
, PNEUD+12, PNEUD+14, PNEUD+16, PNEUD+17, PNEUD+20, PNEUD+23, PNEUD+25, PNEUD+27, PNEUCONJ+8, PNEUCONJ+10
, PNEUCONJ+12, PNEUCONJ+14, PNEUCONJ+16, PNEUCONJ+17, PNEUCONJ+20, PNEUCONJ+23, PNEUCONJ+25, PNEUCONJ+27, PNEUCONJ+29, LASTTDAP+6
, LASTTDAP+7, LASTTDAP+8, LASTTDAP+11, LASTTDAP+16, LASTTDAP+17, LASTTDAP+20, LASTTDAP+25, LASTTDAP+26, LASTTDAP+28, LASTTDAP+31
X I13+2*, I13+3*, I13+17*, TD+58*, TD+59, TD+61, TD+62, TD+63, UNK+5*, UNK+6
, UNK+8, UNK+10, UNK+12, IZOSTER+1~, IZOSTER+7*, IZOSTER+15*, IZOSTER+16, PNEUD+7*, PNEUD+9*, PNEUD+19*
, PNEUD+20, PNEUCONJ+7*, PNEUCONJ+9*, PNEUCONJ+11*, PNEUCONJ+19*, PNEUCONJ+20, LASTTDAP+1~, LASTTDAP+5*, LASTTDAP+6, LASTTDAP+7
, LASTTDAP+8, LASTTDAP+19*, LASTTDAP+20, LASTTDAP+25*
Y I13+2*, I13+3*, UNK+8*, UNK+9, UNK+10*, UNK+11, UNK+12*, UNK+13, LASTTDAP+1~, LASTTDAP+25*
, LASTTDAP+26
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All