Routine: BGP4GELD

Information

BGP4GELD ; IHS/CMI/LAB - GUI COM REPORT ;

Source Information

Source file <BGP4GELD.m>

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
IHS GPRA Information System	4	^BGP4D1 (GS,REPORT)^BGP4EUTL $$GETDIR^BGP4UTL2 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	BGP4GR1

Entry Points

Name	Comments	DBIA/ICR reference
ENDLOG	;-- UPDATE LOG AT END
EP1	;
XIT	;
EP(BGPRET,BGPUSER,BGPDUZ2,BGPOPTN,BGPTAXI,BGPZZ,BGPIND,BGPQTR,BGPPER,BGPVDT,BGPBEN,BGPLSTT,BGPLIST,BGPLPRV,BGPLPROV,BGPEXPT,BGPROT,BGPRTIME,BGPMFITI,BGPFILE,BGPDNT)	;EP - called from GUI to produce COM REPORT CI05-RPT-LOC-COM ; SEE ROUTINE BGP4DEL if you have questions about any of these variables ; TAXONOMY CHECK IS IN ^BGP4XTEL ; BGPUSER - DUZ ; BGPDUZ2 - DUZ(2) ; BGPOPTN - OPTION NAME ; BGPTAXI - IEN OF COMMUNITY TAXONOMY NAME ; BGPZZ - $E (1st character) of the answer to the following DIR call: ; A = All Measures ; S = Selected Measures
TSKMN	;
OTHELD	;
BY	;get baseline year
TESTELD	;

External References

Name	Field # of Occurrence
^%ZTLOAD	TSKMN+3
KILL^AUPNPAT	XIT+5, XIT+10
^BGP4D1	OTHELD+1
GS^BGP4EUTL	OTHELD+15
REPORT^BGP4EUTL	BY+12
$$GETDIR^BGP4UTL2	BY+16
GUIR^BGPXBLM	OTHELD+4
FILE^DICN	BY+27
^DIE	ENDLOG+2
^XBFMK	BY+22, XIT+11
^XBKVAR	EP1+25
EN^XBVK	XIT+2
$$DT^XLFDT	EP1+24
$$FMADD^XLFDT	EP1+33
$$NOW^XLFDT	TESTELD+4, BY+26, TSKMN+3, ENDLOG+1

Interaction Calls

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

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BGPGUIJ - [#90552.19]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	EP1+6, BY+9, BY+10
^AUTTLOC - [#9999999.06]	BY+20
^BGPDATA	XIT+12
^BGPELIJ - [#90553.06]	EP1+11
^BGPGUIJ - [#90552.19]	OTHELD+11, OTHELD+12
^BGPSITE - [#90241.02]	BY+7
^TMP($J	OTHELD+2!, OTHELD+6, OTHELD+9, XIT+1!

Label References

Name	Line Occurrences
ENDLOG	OTHELD+16
EP	TESTELD+4
EP1	EP+73
TSKMN	BY+31
XIT	OTHELD+17

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+29, EP1+30, EP1+31, EP1+32, EP1+33*, BY+3, BY+5
>> BGPBED	BY+4*
BGPBEN	EP~, EP1+16
BGPDATA	OTHELD+8~, OTHELD+9, OTHELD+10, OTHELD+11
>> BGPDELT	BY+15*
BGPDNT	EP~
BGPDUZ2	EP~, EP1+3, EP1+23
>> BGPED	EP1+29, EP1+30, EP1+31, EP1+32, EP1+33*, BY+4, BY+6
BGPEXPT	EP~, EP1+12*, BY+20, BY+33, OTHELD+15
BGPFILE	EP~, BY+23
>> BGPFILEN	BY+19, BY+20, BY+26, BY+33
>> BGPGFNM	BY+25*
>> BGPGIEN	BY+29*, BY+32, OTHELD+11, OTHELD+12, ENDLOG+1
>> BGPGUI	EP1+26*
>> BGPHOME	BY+7*
BGPIND	EP~, EP1+9
BGPIND(	EP1+11*
BGPIND(0	EP1+10
>> BGPIOSL	EP1+27*
BGPLIST	TESTELD+4, EP~, EP1+20*, EP1+21
BGPLIST(3	TESTELD+3*
BGPLPROV	EP~
BGPLPRV	EP~, EP1+21
BGPLSTT	EP~, EP1+18, EP1+20
BGPMFITI	EP~
>> BGPND	TESTELD+4
>> BGPND(3	TESTELD+2*
>> BGPND(4	TESTELD+2*
BGPOPTN	EP~, EP1+4, BY+26
>> BGPPBD	BY+5*
>> BGPPED	BY+6*
BGPPER	EP~, EP1+13, EP1+29, EP1+30, EP1+31, EP1+32, EP1+33*, BY+1
BGPQTR	EP~, EP1+14, EP1+29, EP1+30, EP1+31, EP1+32, EP1+33
>> BGPQUIT	BY+13
BGPRET	EP~, EP+74, EP+76, EP1+2, EP1+3, EP1+4, EP1+5, EP1+6, EP1+7, EP1+8 , EP1+9, EP1+10, EP1+13, EP1+14, EP1+15, EP1+16, EP1+17, EP1+18, EP1+21, BY+13 , BY+14, BY+28, BY+32, BY+33
BGPROT	EP~, EP1+17, BY+26
>> BGPRPT	BY+14, BY+20
BGPRTIME	EP~, EP1+19*, BY+26, TSKMN+3
>> BGPRTYPE	EP1+28*
BGPTAX	BY+8!
BGPTAX(	BY+10*
BGPTAXI	EP~, EP1+5, EP1+6, BY+9, BY+10
>> BGPUF	BY+16*, BY+20
BGPUSER	EP~, EP1+2, BY+26
BGPVDT	EP~, EP1+15, BY+1
>> BGPYRPTH	EP1+28*
BGPZZ	EP~, EP1+7, EP1+8, EP1+9, EP1+10, EP1+11, EP1+12
C	OTHELD+6, OTHELD+7, OTHELD+11, OTHELD+12, XIT+7!
D	XIT+7!
D0	BY+27!
DA	ENDLOG+1*, ENDLOG+3!
DD	BY+27!
DIADD	BY+26*, BY+27!, XIT+4!
>> DIC	BY+26*
>> DIC("DR"	BY+26*
>> DIC(0	BY+26*
DIE	ENDLOG+1*, ENDLOG+3!
DIR	XIT+3!
DIRUT	XIT+3!
DLAYGO	BY+26*, BY+27!, XIT+4!
DO	BY+27!
DOD	XIT+3!
DR	ENDLOG+1*, ENDLOG+3!
DT	EP1+24*, OTHELD+12
DUOUT	XIT+3!
DUZ(2	EP1+23*, BY+7, BY+20
E	XIT+7!
ED	XIT+9!
>> ERR	TESTELD+1*, TESTELD+4, TESTELD+5
F	XIT+7!
G	XIT+7!
H	XIT+7!
I	XIT+7!
>> IOCPU	TSKMN+3
IOM	EP1+27*
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*, BY+7, BY+10, BY+20
V	XIT+7!
W	XIT+7!
X	EP1+11, BY+1, BY+2, BY+3, BY+4, BY+8, BY+9, BY+10, BY+23, BY+25 , OTHELD+6*, OTHELD+9, XIT+6!, XIT+7!
X1	XIT+6!
X2	XIT+6!
X3	XIT+6!
X4	XIT+6!
X5	XIT+6!
X6	XIT+6!
Y	EP+74*, EP+76, BY+28, BY+29, 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*

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP4GELD

Call Graph Total: 12

Caller Graph Total: 1