Routine: CIMGAGP

Package	Total	Call Graph
IHS VA Utilities	5	^XBDBQUE ^XBFMK ^XBGSAVE EN^XBNEW EN^XBVK
Kernel	3	HOME^%ZIS ^%ZISC $$FMTE^XLFDT
VA Fileman	2	^DIC ^DIR
Aberdeen GPRA Report	1	(SU,SU1)^CIMGAGP0
IHS Patient	1	KILL^AUPNPAT

Entry Points

Name	Comments	DBIA/ICR reference
GS	;EP called from xbnew
DATES	;
EXIT1	;
ZIS	;call to XBDBQUE
LOC()	;EP - Return location name from file 4 based on DUZ(2).
CTR(X,Y)	;EP - Center X in a field Y wide.
EOP	;EP - End of page.
USR()	;EP - Return name of current user from ^VA(200.
LISTS	;any lists with indicators?
INDSL	;;
Q	;which quarter
SET6	;
INTRO	;
EXIT	;
Y	;fiscal year
HOME	;
GETTAX	;

External References

Name	Field # of Occurrence
HOME^%ZIS	EXIT+7
^%ZISC	EXIT1+1
KILL^AUPNPAT	EXIT+5
SU^CIMGAGP0	INTRO+4
SU1^CIMGAGP0	GETTAX+7
^DIC	HOME+1, ZIS+3, GETTAX+4
^DIR	DATES+6, LISTS+4, LISTS+8, Q+1, Y+7, EOP+5
^XBDBQUE	ZIS+13
^XBFMK	ZIS+9, EXIT+6, GETTAX+3
^XBGSAVE	GS+16
EN^XBNEW	EXIT1+3
EN^XBVK	EXIT+1
$$FMTE^XLFDT	DATES+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$$CTR("Aberdeen Area GPRA Report",80) Line Location: CIMGAGP+5
Function Call: WRITE	Prompt: !!,"Cannot find community taxonomy" Line Location: INTRO+5
Function Call: WRITE	Prompt: !,"No HOME Location entered!!! PHN Visits counts to Home will be calculated",!,"using clinic 11 only!!" Line Location: HOME+2
Function Call: WRITE	Prompt: !! Line Location: LISTS+1
Function Call: WRITE	Prompt: !,J,")",?5,X Line Location: LISTS+3
Function Call: WRITE	Prompt: !!,"UNABLE TO CREATE REPORT FILE ENTRY - NOTIFY SITE MANAGER!" Line Location: ZIS+3
Function Call: WRITE	Prompt: !!,"A file will be created called G",$P(^AUTTLOC(DUZ(2),0),U,10)_"."_CIMRPT,".",!,"It will reside in the public/export directory.",!,"This file should be sent to your Area Office.",!! Line Location: ZIS+11
Function Call: WRITE	Prompt: ! Line Location: Y+1
Function Call: WRITE	Prompt: !,"Enter the FY of interest. Use a 4 digit year, e.g. 1999, 2000" Line Location: Y+3
Function Call: WRITE	Prompt: !!,"Please enter a year only!",! Line Location: Y+11
Routine Call	%ZIS Line Location: EXIT+7
Routine Call	DIC Line Location: HOME+1 ZIS+3 GETTAX+4
Routine Call	DIR Line Location: DATES+6 LISTS+4 LISTS+8 Q+1 Y+7 EOP+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ATXAX - [#9002226]	Classic Fileman Calls
^AUTTLOC - [#9999999.06]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTTAREA - [#9999999.21]	INTRO+3
^AUTTLOC - [#9999999.06]	INTRO+3, INTRO+7, ZIS+11, GS+14
^CIMAGP(	ZIS+6!, ZIS+7, ZIS+8, SET6+1, SET6+2, GS+1, GS+2, GS+3, GS+4, GS+5 , GS+6, GS+7, GS+8, GS+9, GS+10, GS+11, GS+12
^CIMGDATA	GS+1!, GS+17!, SET6+1, SET6+2, GS+2, GS+4, GS+6, GS+8, GS+10, GS+11
^DIC(4 - [#4]	LOC+1
^TMP($J	GS+17!
^VA(200 - [#200]	GS+15, USR+1

Label References

Name	Line Occurrences
$$CTR	CIMGAGP+5
DATES	DATES+9, LISTS+5
EXIT	INTRO+1, INTRO+6, DATES+4, DATES+7, ZIS+3, ZIS+14
GETTAX	INTRO+6
LISTS	HOME+2, LISTS+9
Q	DATES+9
SET6	GS+12
Y	DATES+3, Y+11
ZIS	LISTS+6

Naked Globals

Name	Field # of Occurrence
^(0	USR+1, LOC+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	EXIT+3!
B	EXIT+3!
C	ZIS+7, ZIS+8, EXIT+3!, SET6+1, SET6+2, GS+1, GS+2, GS+4, GS+6, GS+8* , GS+10*, GS+11
>> CIMAREA	INTRO+3*
>> CIMASUF	INTRO+7*, INTRO+8, ZIS+2
CIMBD	DATES+1!, ZIS+2, Q+4, Q+5, Q+6, Q+7, Y+12*
CIMED	DATES+1!, ZIS+2, Q+4, Q+5, Q+6, Q+7, Y+12*
>> CIMHOME	HOME+2, HOME+3
CIMLIST	LISTS+2*!, LISTS+7!
CIMLIST(	LISTS+10*
CIMPER	DATES+1!, DATES+6, ZIS+2, Q+4, Q+5, Q+6, Q+7, Y+12*
>> CIMQTR	DATES+2, ZIS+2, Q+3
>> CIMQUIT	INTRO+5, DATES+4, DATES+9, ZIS+3, Q+2, Y+9*
>> CIMQY	DATES+5, DATES+8, DATES+9
>> CIMRPT	ZIS+4*, ZIS+6, ZIS+7, ZIS+8, ZIS+11, SET6+1, SET6+2, GS+1, GS+2, GS+3 , GS+4, GS+5, GS+6, GS+7, GS+8, GS+9, GS+10, GS+11, GS+12, GS+14
>> CIMSUC	INTRO+8*, ZIS+2
CIMTAX	GETTAX+1!, GETTAX+2*
CIMTAX(	ZIS+7
CIMTAX(""	INTRO+6
>> CIMVDT	Y+2, Y+10, Y+12
>> CIMX	GETTAX+6*
D	EXIT+3!
DA	DATES+6!, LISTS+4!, LISTS+8!, ZIS+3!, ZIS+10!, Q+1!
DD	ZIS+10!
DFOUT	EOP+4!
DIADD	ZIS+2*, ZIS+3!, ZIS+10!
DIC	HOME+1!, ZIS+2!, ZIS+3!, ZIS+10!, GETTAX+4*, Y+8!
DIC("A"	HOME+1, GETTAX+4
DIC("DR"	ZIS+2*
DIC("S"	GETTAX+4*
DIC(0	HOME+1, ZIS+2, GETTAX+4*
DINUM	ZIS+10!
DIR	DATES+6!, LISTS+4!, LISTS+8!, Q+1!, EOP+3~
DIR("?"	Y+6*
DIR("A"	DATES+6, LISTS+4, LISTS+8, Q+1, Y+5*
DIR("B"	DATES+6, LISTS+4
DIR(0	DATES+6, LISTS+4, LISTS+8, Q+1, Y+4, EOP+5
DIRUT	DATES+7, LISTS+5, LISTS+9, Q+2, Y+9*, EOP+4!
DLAYGO	ZIS+2*, ZIS+3!, ZIS+10!
DLOUT	EOP+4!
DR	ZIS+3!, ZIS+10!
DTOUT	EOP+4!
DUOUT	Y+9, EOP+4!
DUZ	GS+15, USR+1
DUZ(2	INTRO+3, INTRO+7, ZIS+11, GS+14, LOC+1
E	EXIT+3!
F	EXIT+3!, GS+14*, GS+15
G	EXIT+3!
H	EXIT+3!
I	EXIT+3!
IO("S"	EOP+2
IOF	CIMGAGP+4
IOM	CTR+1
IOPAR	EXIT1+2!
IOST	EOP+1
>> IOT	EOP+2
J	LISTS+3*, EXIT+3!
K	EXIT+3!
L	EXIT+3!
M	EXIT+3!
N	EXIT+3!, EXIT+4!
N1	EXIT+4!
N2	EXIT+4!
N3	EXIT+4!
N4	EXIT+4!
N5	EXIT+4!
N6	EXIT+4!
O	EXIT+3!
P	EXIT+3!
Q	EXIT+3!
R	EXIT+3!
S	EXIT+3!
T	LISTS+3*, EXIT+3!
U	INTRO+3, INTRO+7, ZIS+11, GS+14, GS+15, USR+1, LOC+1
V	EXIT+3!
W	EXIT+3!
X	LISTS+3, LISTS+10, ZIS+2, ZIS+7, ZIS+10!, EXIT+2!, EXIT+3!, SET6+1, SET6+2, GS+1* , GS+2, GS+3, GS+4, GS+5, GS+6, GS+7, GS+8, GS+9, GS+10, GS+11 , GS+12, CTR~, CTR+1
X1	EXIT+2!
X2	EXIT+2!, SET6+1, SET6+2, GS+3*, GS+4, GS+5, GS+6, GS+7, GS+8, GS+9 , GS+10, GS+11, GS+12
X3	EXIT+2!, SET6+1, SET6+2, GS+5*, GS+6, GS+7, GS+8, GS+9, GS+10, GS+11 , GS+12
X4	EXIT+2!, SET6+1, SET6+2, GS+7*, GS+8, GS+9, GS+10, GS+11, GS+12
X5	EXIT+2!, SET6+1, SET6+2, GS+9*, GS+10, GS+11, GS+12
X6	EXIT+2!, SET6+1, SET6+2, GS+12*
>> XBF	GS+15*
>> XBFLT	GS+15*
>> XBFN	GS+15*
>> XBGL	GS+13*
>> XBMED	GS+15*
>> XBNS	ZIS+12*
>> XBRC	ZIS+12*
>> XBRP	ZIS+12*
>> XBRX	ZIS+12*
>> XBTLE	GS+15*
Y	DATES+8, HOME+2, HOME+3, LISTS+5, LISTS+6, LISTS+10, ZIS+3, ZIS+4, ZIS+10!, EXIT+3! , GETTAX+5, GETTAX+6, Q+2, Q+3, Q+4, Q+5, Q+6, Q+7, Y+10, Y+11 , CTR~, CTR+1
Z	LISTS+10*, EXIT+3!
>> ZTQUEUED	EOP+2

Marked Items

Customize PDF page

Package: Aberdeen GPRA Report

Routine: CIMGAGP

Information

Source Information

Call Graph

Call Graph Total: 12

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items