BGP3PDM2 ; IHS/CMI/LAB - print ind 1 ;
Source file <BGP3PDM2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
BL | ;
|
|
S(Y,F,P) | ;set up array
|
|
I1AGE | ; special age tallies
|
|
PR | ;
|
|
IE1 | ;EP
|
|
SETN | ;set numerator fields
|
|
IE2 | ;EP
|
|
NEXT | ;get numerator value of indicator and calc %
|
|
I1AGE2 | ;
|
|
I1AGE1 | ;
|
|
PI | ;EP
|
|
VA | ;
|
|
II | ;EP
|
|
C(X,X2,X3) | ;
|
|
I1AGEP | ;
|
|
ID | ;EP
|
|
IG | ;EP
|
|
V(T,R,N,P) | ;EP
|
|
J4 | ;EP
|
|
J5 | ;EP
|
|
J6 | ;EP
|
|
H1 | ;EP
|
|
J1 | ;EP
|
|
J2 | ;EP
|
|
J3 | ;EP
|
|
H2 | ;
|
|
CALC(N,O) | ;
|
|
H3 | ;EP
|
|
SB(X) | ;EP - Strip leading and trailing blanks from X.
|
Name | Field # of Occurrence |
---|---|
COMMA^%DTC | C+1 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^BGPGPDB - [#90243.02] | V+5, VA+4 |
^BGPGPDC - [#90243] | V+3, VA+2 |
^BGPGPDP - [#90243.01] | V+4, VA+3 |
^BGPIND - [#90242.01] | I1AGE+2, I1AGE+6, I1AGE+10 |
^BGPINDC - [#90242] | PI+2, PI+3, PI+4, PI+5, PI+6, PI+15, PI+16, PI+17, NEXT+2, NEXT+3 , NEXT+9, NEXT+13, NEXT+14, NEXT+15, I1AGE1+4, I1AGE1+10, I1AGE2+4 |
^BGPINDC("AA" | PI+1, NEXT+1 |
^BGPINDC("C" | I1AGE1+3, I1AGE2+2 |
^DD("FUNC" - [#.5] | SB+1 |
^DD(90243 | PI+8, NEXT+5, NEXT+10, I1AGE1+5, I1AGE1+11, I1AGE2+5 |
^TMP($J | S+2*, S+3*, S+4* |
Name | Line Occurrences |
---|---|
$$CALC | H2+1, H2+2 |
$$SB | I1AGEP+8, I1AGEP+12, PR+8, PR+12, PR+16, PR+18, BL+8, BL+12, BL+16, BL+18 , H2+1, H2+2 |
$$V | PI+9, PI+10, PI+11, NEXT+6, NEXT+7, NEXT+8, I1AGE1+6, I1AGE1+7, I1AGE1+8, I1AGE1+12 , I1AGE1+13, I1AGE1+14, I1AGE2+6, I1AGE2+7, I1AGE2+8, SETN+1, SETN+2, SETN+3 |
H1 | ID+1, IE1+1, IE2+1, IG+1, II+1, J1+1, J2+1, J3+1, J4+1, J5+1 , J6+1 |
H2 | NEXT+16 |
H3 | I1AGE+2, I1AGE+6, I1AGE+10 |
I1AGE1 | I1AGE+3, I1AGE+7, I1AGE+11 |
I1AGE2 | I1AGE+3, I1AGE+7, I1AGE+11 |
I1AGEP | I1AGE+4, I1AGE+8, I1AGE+12 |
NEXT | PI+14 |
PI | ID+2, IE1+2, IE2+2, IG+2, II+2, J1+2, J2+2, J3+2, J4+2, J5+2 , J6+2 |
S | PI+13, PI+15, PI+16, PI+17, PI+18, NEXT+13, NEXT+14, NEXT+15, I1AGE+2, I1AGE+6 , I1AGE+10, I1AGEP+1, I1AGEP+2, I1AGEP+3, I1AGEP+4, I1AGEP+5, I1AGEP+6, I1AGEP+7, I1AGEP+8, I1AGEP+9 , I1AGEP+10, I1AGEP+11, I1AGEP+12, PR+2, PR+3, PR+4, PR+5, PR+6, PR+7, PR+8 , PR+9, PR+10, PR+11, PR+12, PR+14, PR+15, PR+16, PR+17, PR+18, BL+2 , BL+3, BL+4, BL+5, BL+6, BL+7, BL+8, BL+9, BL+10, BL+11, BL+12 , BL+14, BL+15, BL+16, BL+17, BL+18, H3+1, H3+2, H3+3, H3+4, H3+5 , H3+6, H3+7, H3+8, H3+9, H3+10, H2+3, H1+1, H1+2, H1+3, H1+4 , H1+5, H1+6, H1+7, H1+8, H1+9, H1+10, H1+11, H1+12, H1+13 |
SETN | NEXT+11 |
VA | V+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | S+2*, S+3, S+4 |
>> BGPAREAA | V+1 |
>> BGPBLD | PI+11*, PI+18, NEXT+8*, SETN+6 |
>> BGPBLN | SETN+3*, SETN+6, H2+1 |
>> BGPBLP | SETN+6*, H2+1, H2+2 |
>> BGPCYD | PI+9*, PI+18, NEXT+6*, SETN+4 |
>> BGPCYN | SETN+1*, SETN+4, H2+1 |
>> BGPCYP | SETN+4*, H2+1, H2+2 |
BGPDAB | I1AGE+3!, I1AGE+7!, I1AGE+11! |
BGPDAB( | I1AGE1+8*, I1AGE1+14*, I1AGE2+8*, BL+4, BL+6, BL+8, BL+10, BL+12, BL+16, BL+18 |
BGPDAC | I1AGE+3!, I1AGE+7!, I1AGE+11! |
BGPDAC( | I1AGE1+6*, I1AGE1+12*, I1AGE2+6*, I1AGEP+4, I1AGEP+6, I1AGEP+8, I1AGEP+10, I1AGEP+12, PR+16, PR+18 , BL+16, BL+18 |
BGPDAP | I1AGE+3!, I1AGE+7!, I1AGE+11! |
BGPDAP( | I1AGE1+7*, I1AGE1+13*, I1AGE2+7*, PR+4, PR+6, PR+8, PR+10, PR+12, PR+16, PR+18 |
>> BGPDF | PI+6*, PI+8, NEXT+3*, NEXT+5, I1AGE1+4*, I1AGE1+5 |
>> BGPF | I1AGE1+3*, I1AGE2+2* |
>> BGPHD1 | I1AGE+1*, I1AGE+5*, I1AGE+9*, H3+1 |
>> BGPHD2 | I1AGE+1*, I1AGE+5*, I1AGE+9*, I1AGEP+3, PR+3, BL+3 |
>> BGPIC | I1AGE+2, I1AGE+6, I1AGE+10 |
>> BGPINDT | PI+2, PI+3, PI+4, PI+5 |
>> BGPNF | NEXT+9*, NEXT+10, I1AGE1+10*, I1AGE1+11, I1AGE2+4*, I1AGE2+5 |
>> BGPNP | PI+8*, NEXT+5*, NEXT+10*, I1AGE1+5*, I1AGE1+11*, I1AGE2+5* |
>> BGPPC | PI+1*, PI+2, PI+3, PI+4, PI+5, PI+6, PI+15, PI+16, PI+17, I1AGE1+3* , I1AGE1+4, I1AGE1+10, I1AGE2+2*, I1AGE2+4 |
>> BGPPC1 | ID+2*, IE1+2*, IE2+2*, IG+2*, II+2*, J1+2*, J2+2*, J3+2*, J4+2*, J5+2* , J6+2*, PI+1, PI+14, NEXT+1 |
>> BGPPC2 | NEXT+1*, NEXT+2, NEXT+3, NEXT+9, NEXT+13, NEXT+14, NEXT+15 |
>> BGPPRD | PI+10*, PI+18, NEXT+7*, SETN+5 |
>> BGPPRN | SETN+2*, SETN+5, H2+1 |
>> BGPPRP | SETN+5*, H2+1 |
>> BGPRPT | PI+9, PI+10, PI+11, NEXT+6, NEXT+7, NEXT+8, I1AGE1+6, I1AGE1+7, I1AGE1+8, I1AGE1+12 , I1AGE1+13, I1AGE1+14, I1AGE2+6, I1AGE2+7, I1AGE2+8, SETN+1, SETN+2, SETN+3 |
>> BGPRTYPE | PI+2, PI+3, PI+15, PI+16, PI+17 |
>> BGPSUL( | VA+1 |
>> BGPX | I1AGE+3*, I1AGE+7*, I1AGE+11*, I1AGE1+3, I1AGE2+2, H2+1*, H2+2*, H2+3 |
C | I1AGE+3*, I1AGE+7*, I1AGE+11*, I1AGE1+2*, I1AGE1+6, I1AGE1+7, I1AGE1+8, I1AGE1+12, I1AGE1+13, I1AGE1+14 , VA+1~*, VA+2*, VA+3*, VA+4*, VA+6 |
>> D | I1AGE+3*, I1AGE+7*, I1AGE+11*, I1AGE2+1*, I1AGE2+6, I1AGE2+7, I1AGE2+8 |
F | S~, S+1*, S+2 |
N | PI+8*, PI+9, PI+10, PI+11, NEXT+5*, NEXT+6, NEXT+7, NEXT+8, NEXT+10*, I1AGE1+5* , I1AGE1+6, I1AGE1+7, I1AGE1+8, I1AGE1+11*, I1AGE1+12, I1AGE1+13, I1AGE1+14, I1AGE2+5*, I1AGE2+6, I1AGE2+7 , I1AGE2+8, PR+16*, PR+18*, BL+16*, BL+18*, SETN+1, SETN+2, SETN+3, V~, V+3 , V+4, V+5, VA+2, VA+3, VA+4, CALC~, CALC+8 |
O | PR+16*, PR+18*, BL+16*, BL+18*, CALC~, CALC+8 |
P | PI+8*, PI+9, PI+10, PI+11, NEXT+5*, NEXT+6, NEXT+7, NEXT+8, NEXT+10*, I1AGE1+5* , I1AGE1+6, I1AGE1+7, I1AGE1+8, I1AGE1+11*, I1AGE1+12, I1AGE1+13, I1AGE1+14, I1AGE2+5*, I1AGE2+6, I1AGE2+7 , I1AGE2+8, SETN+1, SETN+2, SETN+3, V~, V+3, V+4, V+5, VA+2, VA+3 , VA+4, S~, S+4 |
R | V~, V+3, V+4, V+5 |
T | V~, V+3, V+4, V+5, VA+2, VA+3, VA+4 |
U | PI+2, PI+3, PI+4, PI+5, PI+6, PI+8, PI+15, PI+16, PI+17, NEXT+2 , NEXT+3, NEXT+5, NEXT+9, NEXT+10, NEXT+13, NEXT+14, NEXT+15, 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, I1AGEP+4, I1AGEP+6, I1AGEP+8, I1AGEP+10, I1AGEP+12, PR+4, PR+6, PR+8 , PR+10, PR+12, PR+16, PR+18, BL+4, BL+6, BL+8, BL+10, BL+12, BL+16 , BL+18, V+3, V+4, V+5, VA+2, VA+3, VA+4, S+2, S+4, H2+1 , H2+2 |
V | I1AGEP+4*, I1AGEP+6*, I1AGEP+8*, I1AGEP+10*, I1AGEP+12*, PR+4*, PR+6*, PR+8*, PR+10*, PR+12* , BL+4*, BL+6*, BL+8*, BL+10*, BL+12*, VA+1~ |
X | I1AGE+2*, I1AGE+6*, I1AGE+10*, I1AGEP+1*, I1AGEP+2*, I1AGEP+3*, I1AGEP+4*, I1AGEP+5*, I1AGEP+6*, I1AGEP+7* , I1AGEP+8*, I1AGEP+9*, I1AGEP+10*, I1AGEP+11*, I1AGEP+12*, PR+2*, PR+3*, PR+4*, PR+5*, PR+6* , PR+7*, PR+8*, PR+9*, PR+10*, PR+11*, PR+12*, PR+14*, PR+15*, PR+16*, PR+17* , PR+18*, BL+2*, BL+3*, BL+4*, BL+5*, BL+6*, BL+7*, BL+8*, BL+9*, BL+10* , BL+11*, BL+12*, BL+14*, BL+15*, BL+16*, BL+17*, BL+18*, V+2~, V+3*, V+4* , V+5*, VA+1~*, VA+2, VA+3, VA+4, C~, C+2, H3+1*, H3+2*, SB~ , SB+2 |
X2 | C~ |
X3 | C~ |
Y | PI+13*, PI+15*, PI+16*, PI+17*, PI+18*, NEXT+13*, NEXT+14*, NEXT+15*, I1AGEP+4*, I1AGEP+6* , I1AGEP+8*, I1AGEP+10*, I1AGEP+12*, PR+4*, PR+6*, PR+8*, PR+10*, PR+12*, PR+16*, PR+18* , BL+4*, BL+6*, BL+8*, BL+10*, BL+12*, BL+16*, BL+18*, S~, S+4, H3+1* , H3+3*, H3+4*, H3+5*, H3+6*, H3+7*, H3+8*, H3+9*, H3+10*, H1+1*, H1+2* , H1+3*, H1+4*, H1+5*, H1+6*, H1+7*, H1+8*, H1+9*, H1+10*, H1+11*, H1+12* , H1+13* |
Z | CALC+1~, CALC+8*, CALC+9 |