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

Package: IHS GPRA Information System

Routine: BGP1EL19


Information

BGP1EL19 ; IHS/CMI/LAB - print ind 1 ;

Source Information

Source file <BGP1EL19.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
IHS GPRA Information System 1 HEADER^BGP1DPH  
VA Fileman 1 COMMA^%DTC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS GPRA Information System 1 BGP1ELP1  

Entry Points

Name Comments DBIA/ICR reference
PR ;
VA ;
V(T,R,N,P) ;EP
BL ;
CTR(X,Y) ;EP - Center X in a field Y wide.
SETN ;set numerator fields
H3 ;EP
I1AGE ;EP special age tallies
I1AGE3 ;
I1AGE2 ;
I1AGE1 ;
I1AGEP ;
C(X,X2,X3) ;

External References

Name Field # of Occurrence
COMMA^%DTC C+2
HEADER^BGP1DPH I1AGE+2, PR+1, BL+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,^BGPELIB(BGPIC,53,1,0)
  • Line Location: I1AGE+2
Function Call: WRITE
  • Prompt: !,"CURRENT REPORT PERIOD"
  • Line Location: I1AGEP+1
Function Call: WRITE
  • Prompt: !,BGPHD2
  • Line Location: I1AGEP+2
Function Call: WRITE
  • Prompt: ?T,$$C(V,0,6)
  • Line Location: I1AGEP+3
Function Call: WRITE
  • Prompt: !!,"Total # w/Flu vaccine/contra/",!?2,"NMI Refusal (GPRA)"
  • Line Location: I1AGEP+4
Function Call: WRITE
  • Prompt: ?T,$$C(V,0,6)
  • Line Location: I1AGEP+5
Function Call: WRITE
  • Prompt: !,"% Total # w/Flu vaccine/contra/",!?2,"NMI Refusal (GPRA)"
  • Line Location: I1AGEP+6
Function Call: WRITE
  • Prompt: ?T,$J(V,6,1)
  • Line Location: I1AGEP+7
Function Call: WRITE
  • Prompt: !!,"A. # w/ Contraind/ NMI Ref",!?2,"w/ % of Total # IZ"
  • Line Location: I1AGEP+8
Function Call: WRITE
  • Prompt: ?T,$$C(V,0,6)
  • Line Location: I1AGEP+9
Function Call: WRITE
  • Prompt: !,"A. % w/ Contraind/ NMI Ref",!?2,"w/ % of Total # IZ"
  • Line Location: I1AGEP+10
Function Call: WRITE
  • Prompt: ?T,$J(V,6,1)
  • Line Location: I1AGEP+11
Function Call: WRITE
  • Prompt: !!,"# w/ Influenza Refusal"
  • Line Location: I1AGEP+12
Function Call: WRITE
  • Prompt: ?T,$$C(V,0,6)
  • Line Location: I1AGEP+13
Function Call: WRITE
  • Prompt: !,"% w/ Influenza Refusal"
  • Line Location: I1AGEP+14
Function Call: WRITE
  • Prompt: ?T,$J(V,6,1)
  • Line Location: I1AGEP+15
Function Call: WRITE
  • Prompt: !,^BGPELIB(BGPIC,53,1,0)
  • Line Location: PR+1
Function Call: WRITE
  • Prompt: !!,"PREVIOUS YEAR PERIOD"
  • Line Location: PR+2
Function Call: WRITE
  • Prompt: !,BGPHD2
  • Line Location: PR+3
Function Call: WRITE
  • Prompt: ?T,$$C(V,0,6)
  • Line Location: PR+4
Function Call: WRITE
  • Prompt: !!,"Total # w/Flu vaccine/contra/",!?2,"NMI Refusal (GPRA)"
  • Line Location: PR+5
Function Call: WRITE
  • Prompt: ?T,$$C(V,0,6)
  • Line Location: PR+6
Function Call: WRITE
  • Prompt: !,"% Total # w/Flu vaccine/contra/",!?2,"NMI Refusal (GPRA)"
  • Line Location: PR+7
Function Call: WRITE
  • Prompt: ?T,$J(V,6,1)
  • Line Location: PR+8
Function Call: WRITE
  • Prompt: !!,"A. # w/ Contraind/ NMI Ref",!?2,"w/ % of Total # IZ"
  • Line Location: PR+9
Function Call: WRITE
  • Prompt: ?T,$$C(V,0,6)
  • Line Location: PR+10
Function Call: WRITE
  • Prompt: !,"A. % w/ Contraind/ NMI Ref",!?2,"w/ % of Total # IZ"
  • Line Location: PR+11
Function Call: WRITE
  • Prompt: ?T,$J(V,6,1)
  • Line Location: PR+12
Function Call: WRITE
  • Prompt: !!,"# w/ Influenza Refusal"
  • Line Location: PR+13
Function Call: WRITE
  • Prompt: ?T,$$C(V,0,6)
  • Line Location: PR+14
Function Call: WRITE
  • Prompt: !,"% w/ Influenza Refusal"
  • Line Location: PR+15
Function Call: WRITE
  • Prompt: ?T,$J(V,6,1)
  • Line Location: PR+16
Function Call: WRITE
  • Prompt: !!,"CHANGE FROM PREV YR %"
  • Line Location: PR+18
Function Call: WRITE
  • Prompt: !,"Total # w/Flu vaccine/contra/",!?2,"NMI Refusal (GPRA)"
  • Line Location: PR+19
Function Call: WRITE
  • Prompt: ?T,$J($FN((N-O),"+,",1),6)
  • Line Location: PR+20
Function Call: WRITE
  • Prompt: !,"A. # w/ Contraind/ NMI Ref",!?2,"w/ % of Total # IZ"
  • Line Location: PR+21
Function Call: WRITE
  • Prompt: ?T,$J($FN((N-O),"+,",1),6)
  • Line Location: PR+22
Function Call: WRITE
  • Prompt: !,"# w/ Influenza Refusal"
  • Line Location: PR+23
Function Call: WRITE
  • Prompt: ?T,$J($FN((N-O),"+,",1),6)
  • Line Location: PR+24
Function Call: WRITE
  • Prompt: !,^BGPELIB(BGPIC,53,1,0)
  • Line Location: BL+1
Function Call: WRITE
  • Prompt: !!,"BASELINE REPORT PERIOD"
  • Line Location: BL+2
Function Call: WRITE
  • Prompt: !,BGPHD2
  • Line Location: BL+3
Function Call: WRITE
  • Prompt: ?T,$$C(V,0,6)
  • Line Location: BL+4
Function Call: WRITE
  • Prompt: !!,"Total # w/Flu vaccine/contra/",!?2,"NMI Refusal (GPRA)"
  • Line Location: BL+5
Function Call: WRITE
  • Prompt: ?T,$$C(V,0,6)
  • Line Location: BL+6
Function Call: WRITE
  • Prompt: !,"% Total # w/Flu vaccine/contra/",!?2,"NMI Refusal (GPRA)"
  • Line Location: BL+7
Function Call: WRITE
  • Prompt: ?T,$J(V,6,1)
  • Line Location: BL+8
Function Call: WRITE
  • Prompt: !!,"A. # w/ Contraind/ NMI Ref",!?2,"w/ % of Total # IZ"
  • Line Location: BL+9
Function Call: WRITE
  • Prompt: ?T,$$C(V,0,6)
  • Line Location: BL+10
Function Call: WRITE
  • Prompt: !,"A. % w/ Contraind/ NMI Ref",!?2,"w/ % of Total # IZ"
  • Line Location: BL+11
Function Call: WRITE
  • Prompt: ?T,$J(V,6,1)
  • Line Location: BL+12
Function Call: WRITE
  • Prompt: !!,"# w/ Influenza Refusal"
  • Line Location: BL+13
Function Call: WRITE
  • Prompt: ?T,$$C(V,0,6)
  • Line Location: BL+14
Function Call: WRITE
  • Prompt: !,"% w/ Influenza Refusal"
  • Line Location: BL+15
Function Call: WRITE
  • Prompt: ?T,$J(V,6,1)
  • Line Location: BL+16
Function Call: WRITE
  • Prompt: !!,"CHANGE FROM BASE YR %"
  • Line Location: BL+18
Function Call: WRITE
  • Prompt: !,"Total # w/Flu vaccine/contra/",!?2,"NMI Refusal (GPRA)"
  • Line Location: BL+19
Function Call: WRITE
  • Prompt: ?T,$J($FN((N-O),"+,",1),6)
  • Line Location: BL+20
Function Call: WRITE
  • Prompt: !,"A. # w/ Contraind/ NMI Ref",!?2,"w/ % of Total # IZ"
  • Line Location: BL+21
Function Call: WRITE
  • Prompt: ?T,$J($FN((N-O),"+,",1),6)
  • Line Location: BL+22
Function Call: WRITE
  • Prompt: !,"# w/ Influenza Refusal"
  • Line Location: BL+23
Function Call: WRITE
  • Prompt: ?T,$J($FN((N-O),"+,",1),6)
  • Line Location: BL+24
Function Call: WRITE
  • Prompt: !!,$$CTR(BGPHD1,80)
  • Line Location: H3+1
Function Call: WRITE
  • Prompt: !?40,"Age Distribution"
  • Line Location: H3+2
Function Call: WRITE
  • Prompt: !?30,"55-64",?42,"65-74",?54,"75-84",?65,">84 yrs",!
  • Line Location: H3+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BGPELDBB - [#90547.05] V+4, VA+4
^BGPELDCB - [#90547.03] V+2, VA+2
^BGPELDPB - [#90547.04] V+3, VA+3
^BGPELIB - [#90547.06] I1AGE+2, PR+1, BL+1
^BGPELIIB - [#90547.02] I1AGE1+4, I1AGE1+10, I1AGE2+4, I1AGE3+4
^BGPELIIB("C" I1AGE1+3, I1AGE2+2, I1AGE3+2
^DD(90547.03 I1AGE1+5, I1AGE1+11, I1AGE2+5, I1AGE3+5

Label References

Name Line Occurrences
$$C I1AGEP+3, I1AGEP+5, I1AGEP+9, I1AGEP+13, PR+4, PR+6, PR+10, PR+14, BL+4, BL+6
, BL+10, BL+14
$$CTR H3+1
$$V I1AGE1+6, I1AGE1+7, I1AGE1+8, I1AGE1+12, I1AGE1+13, I1AGE1+14, I1AGE2+6, I1AGE2+7, I1AGE2+8, I1AGE3+6
, I1AGE3+7, I1AGE3+8, SETN+1, SETN+2, SETN+3
H3 I1AGE+2, PR+1, BL+1
I1AGE1 I1AGE+3
I1AGE2 I1AGE+3
I1AGE3 I1AGE+3
I1AGEP I1AGE+4
VA V+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A C+1~
B C+1~
>> BGPAREAA V+1
>> BGPBLD SETN+6
>> BGPBLN SETN+3*, SETN+6
>> BGPBLP SETN+6*
>> BGPCYD SETN+4
>> BGPCYN SETN+1*, SETN+4
>> BGPCYP SETN+4*
BGPDAB I1AGE+3!
BGPDAB( I1AGE1+8*, I1AGE1+14*, I1AGE2+8*, I1AGE3+8*, BL+4, BL+6, BL+8, BL+10, BL+12, BL+14
, BL+16, BL+20, BL+22, BL+24
BGPDAC I1AGE+3!
BGPDAC( I1AGE1+6*, I1AGE1+12*, I1AGE2+6*, I1AGE3+6*, I1AGEP+3, I1AGEP+5, I1AGEP+7, I1AGEP+9, I1AGEP+11, I1AGEP+13
, I1AGEP+15, PR+20, PR+22, PR+24, BL+20, BL+22, BL+24
BGPDAP I1AGE+3!
BGPDAP( I1AGE1+7*, I1AGE1+13*, I1AGE2+7*, I1AGE3+7*, PR+4, PR+6, PR+8, PR+10, PR+12, PR+14
, PR+16, PR+20, PR+22, PR+24
>> BGPDF I1AGE1+4*, I1AGE1+5
>> BGPF I1AGE1+3*, I1AGE2+2*, I1AGE3+2*
>> BGPHD1 I1AGE+1*, H3+1
>> BGPHD2 I1AGE+1*, I1AGEP+2, PR+3, BL+3
>> BGPIC I1AGE+2, PR+1, BL+1
>> BGPIOSL PR+1, BL+1
>> BGPNF I1AGE1+10*, I1AGE1+11, I1AGE2+4*, I1AGE2+5, I1AGE3+4*, I1AGE3+5
>> BGPNP I1AGE1+5*, I1AGE1+11*, I1AGE2+5*, I1AGE3+5*
>> BGPPC I1AGE1+3*, I1AGE1+4, I1AGE1+10, I1AGE2+2*, I1AGE2+4, I1AGE3+2*, I1AGE3+4
>> BGPPRD SETN+5
>> BGPPRN SETN+2*, SETN+5
>> BGPPRP SETN+5*
>> BGPQUIT I1AGE+2, PR+1, BL+1
>> BGPRPT I1AGE1+6, I1AGE1+7, I1AGE1+8, I1AGE1+12, I1AGE1+13, I1AGE1+14, I1AGE2+6, I1AGE2+7, I1AGE2+8, I1AGE3+6
, I1AGE3+7, I1AGE3+8, SETN+1, SETN+2, SETN+3
>> BGPSUL( VA+1
>> BGPX I1AGE+3*, I1AGE1+3, I1AGE2+2, I1AGE3+2
C I1AGE+3*, I1AGE1+2*, I1AGE1+6, I1AGE1+7, I1AGE1+8, I1AGE1+12, I1AGE1+13, I1AGE1+14, VA+1~*, VA+2*
, VA+3*, VA+4*, VA+6, C+1~
D I1AGE+3*, I1AGE2+1*, I1AGE2+6, I1AGE2+7, I1AGE2+8, C+1~
E I1AGE+3*, I1AGE3+1*, I1AGE3+6, I1AGE3+7, I1AGE3+8, C+1~
F I1AGE+3*, C+1~
G I1AGE+3*, C+1~
H I1AGE+3*, C+1~
I I1AGE+3*, C+1~
IOM CTR+1
J I1AGE+3*, C+1~
K I1AGE+3*, C+1~
N I1AGE1+5*, I1AGE1+6, I1AGE1+7, I1AGE1+8, I1AGE1+11*, I1AGE1+12, I1AGE1+13, I1AGE1+14, I1AGE2+5*, I1AGE2+6
, I1AGE2+7, I1AGE2+8, I1AGE3+5*, I1AGE3+6, I1AGE3+7, I1AGE3+8, PR+20*, PR+22*, PR+24*, BL+20*
, BL+22*, BL+24*, SETN+1, SETN+2, SETN+3, V~, V+2, V+3, V+4, VA+2
, VA+3, VA+4
>> O PR+20*, PR+22*, PR+24*, BL+20*, BL+22*, BL+24*
P I1AGE1+5*, I1AGE1+6, I1AGE1+7, I1AGE1+8, I1AGE1+11*, I1AGE1+12, I1AGE1+13, I1AGE1+14, I1AGE2+5*, I1AGE2+6
, I1AGE2+7, I1AGE2+8, I1AGE3+5*, I1AGE3+6, I1AGE3+7, I1AGE3+8, SETN+1, SETN+2, SETN+3, V~
, V+2, V+3, V+4, VA+2, VA+3, VA+4
R V~, V+2, V+3, V+4
T I1AGEP+3*, I1AGEP+5*, I1AGEP+7*, I1AGEP+9*, I1AGEP+11*, I1AGEP+13*, I1AGEP+15*, PR+4*, PR+6*, PR+8*
, PR+10*, PR+12*, PR+14*, PR+16*, PR+20*, PR+22*, PR+24*, BL+4*, BL+6*, BL+8*
, BL+10*, BL+12*, BL+14*, BL+16*, BL+20*, BL+22*, BL+24*, V~, V+2, V+3
, V+4, VA+2, VA+3, VA+4
U I1AGE1+4, I1AGE1+5, I1AGE1+6, I1AGE1+7, I1AGE1+8, I1AGE1+10, I1AGE1+11, I1AGE1+12, I1AGE1+13, I1AGE1+14
, I1AGE2+4, I1AGE2+5, I1AGE2+6, I1AGE2+7, I1AGE2+8, I1AGE3+4, I1AGE3+5, I1AGE3+6, I1AGE3+7, I1AGE3+8
, I1AGEP+3, I1AGEP+5, I1AGEP+7, I1AGEP+9, I1AGEP+11, I1AGEP+13, I1AGEP+15, PR+4, PR+6, PR+8
, PR+10, PR+12, PR+14, PR+16, PR+20, PR+22, PR+24, BL+4, BL+6, BL+8
, BL+10, BL+12, BL+14, BL+16, BL+20, BL+22, BL+24, V+2, V+3, V+4
, VA+2, VA+3, VA+4
V I1AGEP+3*, I1AGEP+5*, I1AGEP+7*, I1AGEP+9*, I1AGEP+11*, I1AGEP+13*, I1AGEP+15*, PR+4*, PR+6*, PR+8*
, PR+10*, PR+12*, PR+14*, PR+16*, BL+4*, BL+6*, BL+8*, BL+10*, BL+12*, BL+14*
, BL+16*, VA+1~
X I1AGEP+3*, I1AGEP+5*, I1AGEP+7*, I1AGEP+9*, I1AGEP+11*, I1AGEP+13*, I1AGEP+15*, PR+4*, PR+6*, PR+8*
, PR+10*, PR+12*, PR+14*, PR+16*, PR+20*, PR+22*, PR+24*, BL+4*, BL+6*, BL+8*
, BL+10*, BL+12*, BL+14*, BL+16*, BL+20*, BL+22*, BL+24*, CTR~, CTR+1, VA+1~*
, VA+2, VA+3, VA+4, C~, C+3
X2 C~
X3 C~
Y CTR~, CTR+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All