Routine: BGP6GPP

Information

BGP6GPP ; IHS/CMI/LAB - GUI PP REPORT ;

Source Information

Source file <BGP6GPP.m>

Call Graph

Call Graph Total: 13

Package	Total	Call Graph
IHS GPRA Information System	5	^BGP6D10 (AI,II,PI)^BGP6DL UPLOG^BGP6GUA REPORT^BGP6UTL GUIR^BGPXBLM
IHS VA Utilities	3	^XBFMK ^XBKVAR EN^XBVK
Kernel	2	^%ZTLOAD ($$DT,$$FMADD,$$NOW)^XLFDT
VA Fileman	2	FILE^DICN ^DIE
IHS Patient	1	KILL^AUPNPAT

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
IHS GPRA Information System	1	BGP6GR

Entry Points

Name	Comments	DBIA/ICR reference
CI	;
EI	;
TESTNTL	;
DI	;
ENDLOG	;-- UPDATE LOG AT END
EP(BGPRET,BGPUSER,BGPDUZ2,BGPOPTN,BGPINDM,BGPIND,BGPQTR,BGPPER,BGPVDT,BGPSEAT,BGPLSTT,BGPLIST,BGPLPRV,BGPLPROV,BGPROT,BGPRTIME,BGPFILE,BGPDNT)	;EP - called from GUI to produce PP REPORT CI05-RPT-LOC-PP ; SEE ROUTINE BGP6DL if you have questions about any of these variables ; BGPUSER - DUZ ; BGPDUZ2 - DUZ(2) ; BGPOPTN - OPTION NAME ; BGPTAXI - IEN OF COMMUNITY TAXONOMY NAME ; BGPINDM - $E (1st character) of the answer to the following DIR call: ; value will be a D, C, W, E or S ; Select one of the following:
EP1	;
XIT	;
WI	;
TSKMN	;
LOCPP	;
BY	;get baseline year

External References

Name	Field # of Occurrence
^%ZTLOAD	TSKMN+3
KILL^AUPNPAT	XIT+5, XIT+10
^BGP6D10	LOCPP+1
AI^BGP6DL	EP1+34
II^BGP6DL	EP1+32
PI^BGP6DL	EP1+33
UPLOG^BGP6GUA	TSKMN+4
REPORT^BGP6UTL	BY+9
GUIR^BGPXBLM	LOCPP+4
FILE^DICN	BY+19
^DIE	ENDLOG+2
^XBFMK	BY+14, XIT+11
^XBKVAR	EP1+24
EN^XBVK	XIT+2
$$DT^XLFDT	EP1+23
$$FMADD^XLFDT	EP1+39
$$NOW^XLFDT	TESTNTL+4, BY+18, TSKMN+3, ENDLOG+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,ERR Line Location: TESTNTL+5
Routine Call	DIE Line Location: ENDLOG+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BGPGUIM - [#90556.19]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BGPDATA	XIT+12
^BGPGUIM - [#90556.19]	LOCPP+11, LOCPP+12
^BGPINDMC - [#90556.02]	DI+1, CI+1, WI+1, EI+1
^BGPINDMC("ACARD"	CI+1
^BGPINDMC("ADM"	DI+1
^BGPINDMC("AEL"	EI+1
^BGPINDMC("AWH"	WI+1
^BGPSITE - [#90241.02]	BY+7
^TMP($J	LOCPP+2!, LOCPP+6, LOCPP+9, LOCPP+13!, XIT+1!
^VA(200 - [#200]	EP1+17

Label References

Name	Line Occurrences
CI	EP1+29
DI	EP1+28
EI	EP1+31
ENDLOG	LOCPP+15
EP	TESTNTL+4
EP1	EP+74
TSKMN	BY+23
WI	EP1+30
XIT	LOCPP+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	XIT+7!
B	XIT+7!
BD	XIT+9!
>> BGPBBD	BY+3*
>> BGPBD	EP1+35, EP1+36, EP1+37, EP1+38, EP1+39*, BY+3, BY+5
>> BGPBED	BY+4*
>> BGPBEN	BY+8*
BGPDATA	LOCPP+8~, LOCPP+9, LOCPP+10, LOCPP+11
>> BGPDELT	BY+12*
BGPDNT	EP~
BGPDUZ2	EP~, EP1+3, EP1+22
>> BGPED	EP1+35, EP1+36, EP1+37, EP1+38, EP1+39*, BY+4, BY+6
BGPFILE	EP~, BY+15
>> BGPGFNM	BY+17*
>> BGPGIEN	BY+21*, BY+24, TSKMN+4, LOCPP+11, LOCPP+12, ENDLOG+1
>> BGPGUI	EP1+25*
>> BGPHOME	BY+7*
BGPIND	EP~, EP1+9, EP1+28!, EP1+29!, EP1+30!, EP1+31!, EP1+32!, EP1+33!, EP1+34!
BGPIND(	DI+1, CI+1, WI+1, EI+1
BGPIND(0	EP1+10
BGPINDM	EP~, EP1+7, EP1+8, EP1+9, EP1+10, EP1+28, EP1+29, EP1+30, EP1+31, EP1+32 , EP1+33, EP1+34
>> BGPIOSL	EP1+26, LOCPP+3
BGPLIST	TESTNTL+4, EP~, EP1+16, EP1+20*
BGPLIST(3	TESTNTL+3*
BGPLPROV	EP~, EP1+17*
BGPLPRV	EP~, EP1+16, EP1+17
BGPLSTT	EP~, EP1+15, EP1+20
>> BGPND	TESTNTL+4
>> BGPND(3	TESTNTL+2*
>> BGPND(4	TESTNTL+2*
BGPOPTN	EP~, EP1+4, BY+18
>> BGPPBD	BY+5*
>> BGPPED	BY+6*
BGPPER	EP~, EP1+11, EP1+35, EP1+36, EP1+37, EP1+38, EP1+39*, BY+1
BGPQTR	EP~, EP1+12, EP1+35, EP1+36, EP1+37, EP1+38, EP1+39
>> BGPQUIT	BY+10
BGPRET	EP~, EP+75, EP+77, EP1+2, EP1+3, EP1+4, EP1+7, EP1+8, EP1+9, EP1+10 , EP1+11, EP1+12, EP1+13, EP1+14, EP1+15, EP1+16, EP1+18, BY+10, BY+11, BY+20 , BY+24*
BGPROT	EP~, EP1+14, BY+18
>> BGPRPT	BY+11
BGPRTIME	EP~, EP1+19*, BY+18, TSKMN+3
>> BGPRTYPE	EP1+27*
BGPSEAT	EP~, EP1+18
BGPUSER	EP~, EP1+2, BY+18
BGPVDT	EP~, EP1+13, BY+1
>> BGPYRPTH	EP1+27*
C	LOCPP+6, LOCPP+7, LOCPP+11, LOCPP+12, XIT+7!
D	XIT+7!
D0	BY+19!
DA	ENDLOG+1*, ENDLOG+3!
DD	BY+19!
DIADD	BY+18*, BY+19!, XIT+4!
>> DIC	BY+18*
>> DIC("DR"	BY+18*
>> DIC(0	BY+18*
DIE	ENDLOG+1*, ENDLOG+3!
DIR	XIT+3!
DIRUT	XIT+3!
DLAYGO	BY+18*, BY+19!, XIT+4!
DO	BY+19!
DOD	XIT+3!
DR	ENDLOG+1*, ENDLOG+3!
DT	EP1+23*, LOCPP+12
DUOUT	XIT+3!
DUZ(2	EP1+22*, BY+7
E	XIT+7!
ED	XIT+9!
>> ERR	TESTNTL+1*, TESTNTL+4, TESTNTL+5
F	XIT+7!
G	XIT+7!
H	XIT+7!
I	XIT+7!
>> IOCPU	TSKMN+3
IOM	EP1+26, LOCPP+3
J	XIT+7!
K	XIT+7!
L	XIT+7!
M	XIT+7!
N	XIT+7!, XIT+8!
N1	XIT+8!
N2	XIT+8!
N3	XIT+8!
N4	XIT+8!
N5	XIT+8!
N6	XIT+8!
O	XIT+7!
P	XIT+7!
Q	XIT+7!
R	XIT+7!
S	XIT+7!
T	XIT+7!
U	EP1+1*, EP1+17, BY+7, DI+1, CI+1, WI+1, EI+1
V	XIT+7!
W	XIT+7!
X	BY+1, BY+2, BY+3, BY+4, BY+15, BY+17, LOCPP+6, LOCPP+9, XIT+6!, XIT+7! , DI+1, CI+1, WI+1, EI+1
X1	XIT+6!
X2	XIT+6!
X3	XIT+6!
X4	XIT+6!
X5	XIT+6!
X6	XIT+6!
Y	EP+75*, EP+77, BY+20, BY+21, XIT+7!
Z	XIT+7!
>> ZTCPU	TSKMN+3*
>> ZTDESC	TSKMN+3*
>> ZTDTH	TSKMN+3*
>> ZTIO	TSKMN+1*
>> ZTQUEUED	XIT+2
>> ZTREQ	XIT+2*
>> ZTRTN	TSKMN+3*
ZTSAVE	TSKMN+2!
ZTSAVE("*"	TSKMN+2*
>> ZTSK	TSKMN+4

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP6GPP

Call Graph Total: 13

Caller Graph Total: 1