Routine: BGP1PDL4

Package	Total	Call Graph
IHS GPRA Information System	2	$$V^BGP1DP1C (H1,PI,PI1)^BGP1PDL1
VA Fileman	1	COMMA^%DTC

Name	Comments	DBIA/ICR reference
PR	;
I031	;EP
CALC(N,O)	;
H1	;EP
BL	;
H3	;EP
FEM	;
SB(X)	;EP - Strip leading and trailing blanks from X.
S(Y,F,P)	;set up array
I1AGE	;EP
PB	;
H2	;
I1AGE5	;
I1AGE4	;
I1AGE3	;
I1AGE2	;
I1AGE1	;
I1AGEP	;
BP	;
C(X,X2,X3)	;

Name	Field # of Occurrence
COMMA^%DTC	C+1
$$V^BGP1DP1C	I1AGE1+5, I1AGE1+6, I1AGE1+7, I1AGE1+10, I1AGE1+11, I1AGE1+12, I1AGE2+6, I1AGE2+7, I1AGE2+8, I1AGE3+4 , I1AGE3+5, I1AGE3+6, I1AGE4+4, I1AGE4+5, I1AGE4+6, I1AGE5+4, I1AGE5+5, I1AGE5+6
H1^BGP1PDL1	I031+2
PI^BGP1PDL1	I031+19, I031+20
PI1^BGP1PDL1	I031+4, I031+5, I031+6, I031+7, I031+8, I031+9, I031+10, I031+11, I031+12, I031+13 , I031+14, I031+15, I031+16, I031+17, I031+18

Name	Line Occurrences (* Changed, ! Killed)
^BGPINDB - [#90545.01]	I031+1, I1AGE+4
^BGPINDBC - [#90545.02]	I1AGE1+3, I1AGE1+8, I1AGE2+4, I1AGE3+2, I1AGE4+2, I1AGE5+2
^BGPINDBC("C"	I1AGE1+2, I1AGE2+2, I1AGE3+1, I1AGE4+1, I1AGE5+1
^BGPINDBC("OR"	I031+4, I031+5, I031+6, I031+7, I031+8, I031+9, I031+10, I031+11, I031+12, I031+13 , I031+14, I031+15, I031+16, I031+17, I031+18
^DD("FUNC" - [#.5]	SB+1
^DD(90545.03	I1AGE1+4, I1AGE1+9, I1AGE2+5, I1AGE3+3, I1AGE4+3, I1AGE5+3
^TMP($J	S+2, S+3, S+4*

Label References

Name	Line Occurrences
$$CALC	H2+1, H2+2
$$SB	I1AGEP+7, I1AGEP+12, I1AGEP+17, I1AGEP+22, I1AGEP+28, PR+8, PR+12, PR+16, PR+20, PR+26 , PB+4, PB+6, PB+8, PB+10, PB+13, BL+8, BL+12, BL+16, BL+20, BL+26 , BP+3, BP+5, BP+7, BP+9, BP+12, H2+1, H2+2
FEM	I1AGE+2
H3	I1AGE+4
I1AGE	I031+21
I1AGE1	I1AGE+5, I1AGE+10, FEM+3
I1AGE2	I1AGE+5, I1AGE+10, FEM+3
I1AGEP	I1AGE+6, I1AGE+11, FEM+4
S	I1AGE+4, I1AGEP+1, I1AGEP+2, I1AGEP+3, I1AGEP+4, I1AGEP+5, I1AGEP+6, I1AGEP+7, I1AGEP+8, I1AGEP+9 , I1AGEP+10, I1AGEP+11, I1AGEP+12, I1AGEP+13, I1AGEP+14, I1AGEP+15, I1AGEP+16, I1AGEP+17, I1AGEP+18, I1AGEP+19 , I1AGEP+20, I1AGEP+21, I1AGEP+22, I1AGEP+24, I1AGEP+25, I1AGEP+26, I1AGEP+27, I1AGEP+28, PR+2, PR+3 , PR+4, PR+5, PR+6, PR+7, PR+8, PR+9, PR+10, PR+11, PR+12, PR+13 , PR+14, PR+15, PR+16, PR+17, PR+18, PR+19, PR+20, PR+22, PR+23, PR+24 , PR+25, PR+26, PB+2, PB+3, PB+4, PB+5, PB+6, PB+7, PB+8, PB+9 , PB+10, PB+12, PB+13, BL+2, BL+3, BL+4, BL+5, BL+6, BL+7, BL+8 , BL+9, BL+10, BL+11, BL+12, BL+13, BL+14, BL+15, BL+16, BL+17, BL+18 , BL+19, BL+20, BL+22, BL+23, BL+24, BL+25, BL+26, BP+1, BP+2, BP+3 , BP+4, BP+5, BP+6, BP+7, BP+8, BP+9, BP+11, BP+12, 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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	S+2*, S+3, S+4
>> BGPBLN	H2+1
>> BGPBLP	H2+1, H2+2
>> BGPCYN	H2+1
>> BGPCYP	H2+1, H2+2
BGPDAB	I1AGE+5!, I1AGE+10!, FEM+3!
BGPDAB(	I1AGE1+7, I1AGE1+12, I1AGE2+8, I1AGE3+6, I1AGE4+6, I1AGE5+6, BL+4, BL+6, BL+8, BL+10 , BL+12, BL+14, BL+16, BL+18, BL+20, BL+24, BL+26, BP+3, BP+5, BP+7 , BP+9, BP+12
BGPDAC	I1AGE+5!, I1AGE+10!, FEM+3!
BGPDAC(	I1AGE1+5, I1AGE1+10, I1AGE2+6, I1AGE3+4, I1AGE4+4, I1AGE5+4, I1AGEP+3, I1AGEP+5, I1AGEP+7, I1AGEP+10 , I1AGEP+12, I1AGEP+15, I1AGEP+17, I1AGEP+20, I1AGEP+22, I1AGEP+26, I1AGEP+28, PB+4, PB+6, PB+8 , PB+10, PB+13, BP+3, BP+5, BP+7, BP+9, BP+12
BGPDAP	I1AGE+5!, I1AGE+10!, FEM+3!
BGPDAP(	I1AGE1+6, I1AGE1+11, I1AGE2+7, I1AGE3+5, I1AGE4+5, I1AGE5+5, PR+4, PR+6, PR+8, PR+10 , PR+12, PR+14, PR+16, PR+18, PR+20, PR+24, PR+26, PB+4, PB+6, PB+8 , PB+10, PB+13
>> BGPDENP	I031+4, I031+5, I031+6, I031+7, I031+8, I031+9, I031+10, I031+11, I031+12, I031+13 , I031+14, I031+15, I031+16, I031+17, I031+18*
>> BGPDF	I1AGE1+3*, I1AGE1+4
>> BGPF	I1AGE1+2, I1AGE2+2, I1AGE3+1, I1AGE4+1, I1AGE5+1*
>> BGPHD1	I1AGE+3, I1AGE+8, FEM+1*
>> BGPHD2	I1AGE+3, I1AGE+8, FEM+1*, I1AGEP+2, PR+3, BL+3
>> BGPIC	I031+1, I1AGE+4
>> BGPINDB	I031+3, I1AGE+2
>> BGPNF	I1AGE1+8, I1AGE1+9, I1AGE2+4, I1AGE2+5, I1AGE3+2, I1AGE3+3, I1AGE4+2, I1AGE4+3, I1AGE5+2*, I1AGE5+3
>> BGPNP	I1AGE1+4, I1AGE1+9, I1AGE2+5, I1AGE3+3, I1AGE4+3, I1AGE5+3
>> BGPORXX	I031+1*, I031+4, I031+5, I031+6, I031+7, I031+8, I031+9, I031+10, I031+11, I031+12 , I031+13, I031+14, I031+15, I031+16, I031+17, I031+18, I031+19, I031+20
>> BGPPC	I031+4, I031+5, I031+6, I031+7, I031+8, I031+9, I031+10, I031+11, I031+12, I031+13 , I031+14, I031+15, I031+16, I031+17, I031+18, I1AGE1+2, I1AGE1+3, I1AGE1+8, I1AGE2+2, I1AGE2+4 , I1AGE3+1, I1AGE3+2, I1AGE4+1, I1AGE4+2, I1AGE5+1, I1AGE5+2
>> BGPPC1	I031+19, I031+20
>> BGPPRN	H2+1
>> BGPPRP	H2+1
>> BGPRPT	I1AGE1+5, I1AGE1+6, I1AGE1+7, I1AGE1+10, I1AGE1+11, I1AGE1+12, I1AGE2+6, I1AGE2+7, I1AGE2+8, I1AGE3+4 , I1AGE3+5, I1AGE3+6, I1AGE4+4, I1AGE4+5, I1AGE4+6, I1AGE5+4, I1AGE5+5, I1AGE5+6
>> BGPRTYPE	I031+3, I1AGE+2, I1AGEP+23, PR+21, PB+11, BL+21, BP+10
>> BGPSUMON	I031+2
>> BGPX	I1AGE+5, I1AGE+10, FEM+3, I1AGE1+2, I1AGE2+2, I1AGE3+1, I1AGE4+1, I1AGE5+1, H2+1, H2+2* , H2+3
>> C	I1AGE+5, I1AGE+10, FEM+3, I1AGE1+1, I1AGE1+5, I1AGE1+6, I1AGE1+7, I1AGE1+10, I1AGE1+11, I1AGE1+12
>> D	I1AGE+5, I1AGE+10, FEM+3, I1AGE2+1, I1AGE2+6, I1AGE2+7, I1AGE2+8, I1AGE3+4, I1AGE3+5, I1AGE3+6 , I1AGE4+4, I1AGE4+5, I1AGE4+6, I1AGE5+4, I1AGE5+5, I1AGE5+6
F	S~, S+1*, S+2
N	I1AGE1+4, I1AGE1+5, I1AGE1+6, I1AGE1+7, I1AGE1+9, I1AGE1+10, I1AGE1+11, I1AGE1+12, I1AGE2+5, I1AGE2+6 , I1AGE2+7, I1AGE2+8, I1AGE3+3, I1AGE3+4, I1AGE3+5, I1AGE3+6, I1AGE4+3, I1AGE4+4, I1AGE4+5, I1AGE4+6 , I1AGE5+3, I1AGE5+4, I1AGE5+5, I1AGE5+6, PB+4, PB+6, PB+8, PB+10, PB+13, BP+3 , BP+5, BP+7, BP+9, BP+12, CALC~, CALC+8
O	PB+4, PB+6, PB+8, PB+10, PB+13, BP+3, BP+5, BP+7, BP+9, BP+12 , CALC~, CALC+8
P	I1AGE1+4, I1AGE1+5, I1AGE1+6, I1AGE1+7, I1AGE1+9, I1AGE1+10, I1AGE1+11, I1AGE1+12, I1AGE2+5, I1AGE2+6 , I1AGE2+7, I1AGE2+8, I1AGE3+3, I1AGE3+4, I1AGE3+5, I1AGE3+6, I1AGE4+3, I1AGE4+4, I1AGE4+5, I1AGE4+6 , I1AGE5+3, I1AGE5+4, I1AGE5+5, I1AGE5+6, S~, S+4
U	I031+1, I1AGE1+3, I1AGE1+4, I1AGE1+5, I1AGE1+6, I1AGE1+7, I1AGE1+8, I1AGE1+9, I1AGE1+10, I1AGE1+11 , I1AGE1+12, I1AGE2+4, I1AGE2+5, I1AGE2+6, I1AGE2+7, I1AGE2+8, I1AGE3+2, I1AGE3+3, I1AGE3+4, I1AGE3+5 , I1AGE3+6, I1AGE4+2, I1AGE4+3, I1AGE4+4, I1AGE4+5, I1AGE4+6, I1AGE5+2, I1AGE5+3, I1AGE5+4, I1AGE5+5 , I1AGE5+6, I1AGEP+3, I1AGEP+5, I1AGEP+7, I1AGEP+10, I1AGEP+12, I1AGEP+15, I1AGEP+17, I1AGEP+20, I1AGEP+22 , I1AGEP+26, I1AGEP+28, PR+4, PR+6, PR+8, PR+10, PR+12, PR+14, PR+16, PR+18 , PR+20, PR+24, PR+26, PB+4, PB+6, PB+8, PB+10, PB+13, BL+4, BL+6 , BL+8, BL+10, BL+12, BL+14, BL+16, BL+18, BL+20, BL+24, BL+26, BP+3 , BP+5, BP+7, BP+9, BP+12, S+2, S+4, H2+1, H2+2
>> V	I1AGEP+3, I1AGEP+5, I1AGEP+7, I1AGEP+10, I1AGEP+12, I1AGEP+15, I1AGEP+17, I1AGEP+20, I1AGEP+22, I1AGEP+26 , I1AGEP+28, PR+4, PR+6, PR+8, PR+10, PR+12, PR+14, PR+16, PR+18, PR+20 , PR+24, PR+26, BL+4, BL+6, BL+8, BL+10, BL+12, BL+14, BL+16, BL+18 , BL+20, BL+24, BL+26*
X	I1AGE+4, I1AGEP+1, I1AGEP+2, I1AGEP+3, I1AGEP+4, I1AGEP+5, I1AGEP+6, I1AGEP+7, I1AGEP+8, I1AGEP+9 , I1AGEP+10, I1AGEP+11, I1AGEP+12, I1AGEP+13, I1AGEP+14, I1AGEP+15, I1AGEP+16, I1AGEP+17, I1AGEP+18, I1AGEP+19 , I1AGEP+20, I1AGEP+21, I1AGEP+22, I1AGEP+24, I1AGEP+25, I1AGEP+26, I1AGEP+27, I1AGEP+28, PR+2, PR+3 , PR+4, PR+5, PR+6, PR+7, PR+8, PR+9, PR+10, PR+11, PR+12, PR+13 , PR+14, PR+15, PR+16, PR+17, PR+18, PR+19, PR+20, PR+22, PR+23, PR+24 , PR+25, PR+26, PB+2, PB+3, PB+4, PB+5, PB+6, PB+7, PB+8, PB+9 , PB+10, PB+12, PB+13, BL+2, BL+3, BL+4, BL+5, BL+6, BL+7, BL+8 , BL+9, BL+10, BL+11, BL+12, BL+13, BL+14, BL+15, BL+16, BL+17, BL+18 , BL+19, BL+20, BL+22, BL+23, BL+24, BL+25, BL+26, BP+1, BP+2, BP+3 , BP+4, BP+5, BP+6, BP+7, BP+8, BP+9, BP+11, BP+12, C~, C+2 , H3+2*, SB~, SB+2
X2	C~
X3	C~
Y	I1AGEP+3, I1AGEP+5, I1AGEP+7, I1AGEP+10, I1AGEP+12, I1AGEP+15, I1AGEP+17, I1AGEP+20, I1AGEP+22, I1AGEP+26 , I1AGEP+28, PR+4, PR+6, PR+8, PR+10, PR+12, PR+14, PR+16, PR+18, PR+20 , PR+24, PR+26, PB+4, PB+6, PB+8, PB+10, PB+13, BL+4, BL+6, BL+8 , BL+10, BL+12, BL+14, BL+16, BL+18, BL+20, BL+24, BL+26, BP+3, BP+5 , BP+7, BP+9, BP+12, S~, S+4, 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

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP1PDL4

Information

Source Information

Call Graph

Call Graph Total: 3

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: