Routine: CIMGAGPL

Package	Total	Call Graph
VA Fileman	2	COMMA^%DTC ^DIR
Aberdeen GPRA Report	1	^CIMGAGPM
Kernel	1	$$FMTE^XLFDT

Package	Total	Caller Graph
Aberdeen GPRA Report	1	CIMGAGPK

Name	Comments	DBIA/ICR reference
IND77	;
IND1213	;
IND122	;
B	;
IND66	;
IND88	;
CTR(X,Y)	;EP - Center X in a field Y wide.
C	;
V(R,N,P)	;
C(X,X2,X3)	;
HEADER	;EP
IND1112	;
A	;
LOCW	;
CALC(N,O)	;ENTRY POINT
IND1820	;
HEADER1	;
IND55	;
IND44	;
IND2023	;

Name	Field # of Occurrence
COMMA^%DTC	CALC+4, CALC+5, C+1
^CIMGAGPM	C+11
^DIR	HEADER+2
$$FMTE^XLFDT	HEADER1+2, HEADER1+5, HEADER1+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"4/4 Diabetes",!,"Increase the proportion of I/T/U clients with diagnosed",!,"diabetes who have been assessed for dyslipidemia by 3% over BASELINE level.",! Line Location: IND44+2
Function Call: WRITE	Prompt: !,"Assessed for Dyslipidemia" Line Location: IND44+3
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: IND44+4
Function Call: WRITE	Prompt: !,"5/5 Diabetes",!,"Increase the proportion of I/T/U clients with diagnosed",!,"diabetes who have been assessed for nephropathy by 3% over BASELINE level.",! Line Location: IND55+3
Function Call: WRITE	Prompt: !,"Assessed for Nephropathy" Line Location: IND55+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: IND55+5
Function Call: WRITE	Prompt: !,"6/6 Women's Health",!,"Increase the proportion of AI/AN women who have annual pap screening to 55%.",! Line Location: IND66+3
Function Call: WRITE	Prompt: !,"Pap Screening" Line Location: IND66+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: IND66+5
Function Call: WRITE	Prompt: !,"7/7 Women's Health",!,"Increase the proportion of AI/AN female population 40-69 years of age who",!,"had annual screening mammography.",! Line Location: IND77+3
Function Call: WRITE	Prompt: !,"Mammography Screening" Line Location: IND77+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: IND77+5
Function Call: WRITE	Prompt: !,"8/8 Child Health",!,"Determine the proportion of AI/AN children served by",!,"IHS receiving a minimum of four Well Child visits by 27 months of age.",! Line Location: IND88+3
Function Call: WRITE	Prompt: !,"Well Child Visits by Age 27 Months" Line Location: IND88+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: IND88+5
Function Call: WRITE	Prompt: !,"11/12 Dental Health",!,"Assure that at least 21% of the AI/AN population obtain",!,"access to dental services.",! Line Location: IND1112+3
Function Call: WRITE	Prompt: !,"Dental Visit 0000" Line Location: IND1112+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: IND1112+5
Function Call: WRITE	Prompt: !,"12/13 Dental Health",!,"Assure that the percentage of AI/AN children 6-8 and 14-15",!,"who have received protective dental sealants on permanent molar teeth is ",!,"restored to 90% of the FY 1991 IHS Oral Health Survey level",! Line Location: IND1213+3
Function Call: WRITE	Prompt: !,"Dental Visit 1351 - Children ages 6-8" Line Location: IND1213+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: IND1213+5
Function Call: WRITE	Prompt: !,"12/13 Dental Health",!,"Assure that the percentage of AI/AN children 6-8 and 14-15",!,"who have received protective dental sealants on permanent molar teeth is ",!,"restored to 90% of the FY 1991 IHS Oral Health Survey level",! Line Location: IND122+3
Function Call: WRITE	Prompt: !,"Dental Visit 1351 - Children ages 14-15" Line Location: IND122+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: IND122+5
Function Call: WRITE	Prompt: !,"18/20 Child Health",!,"Immunization Increase by 3% the proportion of AI/AN",!,"children who have completed all recommended immunizations by the age of two.",! Line Location: IND1820+3
Function Call: WRITE	Prompt: !,"Immunizations Up to date - Children Age 2" Line Location: IND1820+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: IND1820+5
Function Call: WRITE	Prompt: ?44,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND1820+11
Function Call: WRITE	Prompt: !,"18/20 Child Health",!,"Immunization Increase by 3% the proportion of AI/AN",!,"children who have completed all recommended immunizations by the age of two.",! Line Location: IND1820+14
Function Call: WRITE	Prompt: !,"Immunizations Up to date - Children Age 27 Months" Line Location: IND1820+15
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: IND1820+16
Function Call: WRITE	Prompt: !,"20/23 Child Obesity",!,"Identify the Area specific prevalance of obesity in AI/AN",!,"Head Start population (3-5 yr olds) and in third grade children (8-10 year olds)",! Line Location: IND2023+3
Function Call: WRITE	Prompt: !,"Child Obesity - Children ages 3-5" Line Location: IND2023+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: IND2023+5
Function Call: WRITE	Prompt: !,"20/23 Child Obesity",!,"Identify the Area specific prevalance of obesity in AI/AN",!,"Head Start population (3-5 yr olds) and in third grade children (8-10 year olds)",! Line Location: A+3
Function Call: WRITE	Prompt: !,"Children Overweight - Children ages 3-5" Line Location: A+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: A+5
Function Call: WRITE	Prompt: !,"20/23 Child Obesity",!,"Identify the Area specific prevalance of obesity in AI/AN",!,"Head Start population (3-5 yr olds) and in third grade children (8-10 year olds)",! Line Location: B+3
Function Call: WRITE	Prompt: !,"Child Obesity - Children ages 8-10" Line Location: B+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: B+5
Function Call: WRITE	Prompt: ?44,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: B+10
Function Call: WRITE	Prompt: !,"20/23 Child Obesity",!,"Identify the Area specific prevalance of obesity in AI/AN",!,"Head Start population (3-5 yr olds) and in third grade children (8-10 year olds)",! Line Location: C+3
Function Call: WRITE	Prompt: !,"Children Overweight - Children ages 8-10" Line Location: C+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: C+5
Function Call: WRITE	Prompt: ?44,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: C+10
Function Call: WRITE	Prompt: !?3,$P(^CIMAGP(CIMDO,0),U,5) Line Location: LOCW+2
Function Call: WRITE	Prompt: ?11,"?????" Line Location: LOCW+4
Function Call: WRITE	Prompt: ?11,"?????" Line Location: LOCW+6
Function Call: WRITE	Prompt: ?11,$E($P(^DIC(4,X,0),U),1,20) Line Location: LOCW+7
Function Call: WRITE	Prompt: ! Line Location: HEADER+2
Function Call: WRITE	Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",CIMGPG,! Line Location: HEADER1+2
Function Call: WRITE	Prompt: !,$$CTR("* ABERDEEN AREA GPRA INDICATORS *",80),! Line Location: HEADER1+3
Function Call: WRITE	Prompt: $S(CIMSUCNT=1:$$CTR(CIMSUNM),1:$$CTR("AREA AGGREGATE")),! Line Location: HEADER1+4
Function Call: WRITE	Prompt: $$CTR(X,80),! Line Location: HEADER1+5
Function Call: WRITE	Prompt: $$CTR(X,80),! Line Location: HEADER1+6
Function Call: WRITE	Prompt: !,$TR($J("",80)," ","-") Line Location: HEADER1+7
Routine Call	DIR Line Location: HEADER+2

Name	Line Occurrences (* Changed, ! Killed)
^AUTTLOC("C"	LOCW+5
^CIMAGP(	LOCW+2, LOCW+3, V+1
^DIC(4 - [#4]	LOCW+7
^VA(200 - [#200]	HEADER1+2

Name	Line Occurrences
$$CALC	IND44+10, IND55+11, IND66+11, IND77+11, IND88+11, IND1112+11, IND1213+12, IND122+12, IND1820+11, IND1820+22 , IND2023+11, A+11, B+10, C+10
$$CTR	HEADER1+3, HEADER1+4, HEADER1+5, HEADER1+6
$$V	IND44+6, IND44+7, IND55+7, IND55+8, IND66+7, IND66+8, IND77+7, IND77+8, IND88+7, IND88+8 , IND1112+7, IND1112+8, IND1213+7, IND1213+8, IND122+7, IND122+8, IND1820+7, IND1820+8, IND1820+18, IND1820+19 , IND2023+7, IND2023+8, A+7, A+8, B+7, B+8, C+7, C+8
HEADER	IND44+1, IND55+2, IND66+2, IND77+2, IND88+2, IND1112+2, IND1213+2, IND122+2, IND1820+2, IND1820+13 , IND2023+2, A+2, B+2, C+2, LOCW+1
HEADER1	HEADER+1
LOCW	IND44+9, IND55+10, IND66+10, IND77+10, IND88+10, IND1112+10, IND1213+11, IND122+11, IND1820+10, IND1820+21 , IND2023+10, A+10, B+10, C+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CIM98B	HEADER1+6
>> CIM98E	HEADER1+6
>> CIMBD	HEADER1+5
>> CIMDO	IND44+5, IND44+6, IND44+7, IND55+6, IND55+7, IND55+8, IND66+6, IND66+7, IND66+8, IND77+6 , IND77+7, IND77+8, IND88+6, IND88+7, IND88+8, IND1112+6, IND1112+7, IND1112+8, IND1213+6, IND1213+7 , IND1213+8, IND122+6, IND122+7, IND122+8, IND1820+6, IND1820+7, IND1820+8, IND1820+17, IND1820+18, IND1820+19 , IND2023+6, IND2023+7, IND2023+8, A+6, A+7, A+8, B+6, B+7, B+8, C+6 , C+7, C+8, LOCW+2, LOCW+3
>> CIMED	HEADER1+5
>> CIMG1	IND44+7, IND44+8, IND55+8, IND55+9, IND66+8, IND66+9, IND77+8, IND77+9, IND88+8, IND88+9 , IND1112+8, IND1112+9, IND1213+8, IND1213+9, IND1213+10, IND122+8, IND122+9, IND122+10, IND1820+8, IND1820+9 , IND1820+19, IND1820+20, IND2023+8, IND2023+9, A+8, A+9, B+8, B+9, C+8, C+9
>> CIMG1B	IND44+7, IND44+8, IND55+8, IND55+9, IND66+8, IND66+9, IND77+8, IND77+9, IND88+8, IND88+9 , IND1112+8, IND1112+9, IND1213+8, IND1213+9, IND1213+10, IND122+8, IND122+9, IND122+10, IND1820+8, IND1820+9 , IND1820+19, IND1820+20, IND2023+8, IND2023+9, A+8, A+9, B+8, B+9, C+8, C+9
>> CIMG1BP	IND44+8, IND44+10, IND55+9, IND55+11, IND66+9, IND66+11, IND77+9, IND77+11, IND88+9, IND88+11 , IND1112+9, IND1112+11, IND1213+9, IND1213+10, IND1213+12, IND122+9, IND122+10, IND122+12, IND1820+9, IND1820+11 , IND1820+20, IND1820+22, IND2023+9, IND2023+11, A+9, A+11, B+9, B+10, C+9, C+10
>> CIMG1P	IND44+8, IND44+10, IND55+9, IND55+11, IND66+9, IND66+11, IND77+9, IND77+11, IND88+9, IND88+11 , IND1112+9, IND1112+11, IND1213+9, IND1213+10, IND1213+12, IND122+9, IND122+10, IND122+12, IND1820+9, IND1820+11 , IND1820+20, IND1820+22, IND2023+9, IND2023+11, A+9, A+11, B+9, B+10, C+9, C+10
>> CIMGPG	HEADER+1, HEADER1+1*, HEADER1+2
>> CIMGX	IND44+6, IND44+8, IND55+7, IND55+9, IND66+7, IND66+9, IND77+7, IND77+9, IND88+7, IND88+9 , IND1112+7, IND1112+9, IND1213+7, IND1213+9, IND1213+10, IND122+7, IND122+9, IND122+10, IND1820+7, IND1820+9 , IND1820+18, IND1820+20, IND2023+7, IND2023+9, A+7, A+9, B+7, B+9, C+7, C+9
>> CIMGY	IND44+6, IND44+8, IND55+7, IND55+9, IND66+7, IND66+9, IND77+7, IND77+9, IND88+7, IND88+9 , IND1112+7, IND1112+9, IND1213+7, IND1213+9, IND1213+10, IND122+7, IND122+9, IND122+10, IND1820+7, IND1820+9 , IND1820+18, IND1820+20, IND2023+7, IND2023+9, A+7, A+9, B+7, B+9, C+7, C+9
>> CIMPER	IND1213+8, IND1213+9, IND1213+10, IND122+8, IND122+9, IND122+10
>> CIMQUIT	IND44+1, IND44+5, IND44+9, IND55+1, IND55+2, IND55+6, IND55+10, IND66+1, IND66+2, IND66+6 , IND66+10, IND77+1, IND77+2, IND77+6, IND77+10, IND88+1, IND88+2, IND88+6, IND88+10, IND1112+1 , IND1112+2, IND1112+6, IND1112+10, IND1213+1, IND1213+2, IND1213+6, IND1213+11, IND122+1, IND122+2, IND122+6 , IND122+11, IND1820+1, IND1820+2, IND1820+6, IND1820+10, IND1820+12, IND1820+13, IND1820+17, IND1820+21, IND2023+1 , IND2023+2, IND2023+6, IND2023+10, A+1, A+2, A+6, A+10, B+1, B+2, B+6 , B+10, C+1, C+2, C+6, C+10, LOCW+1, HEADER+2*
>> CIMSUCNT	HEADER1+4
>> CIMSUL(	IND44+5, IND55+6, IND66+6, IND77+6, IND88+6, IND1112+6, IND1213+6, IND122+6, IND1820+6, IND1820+17 , IND2023+6, A+6, B+6, C+6
>> CIMSUNM	HEADER1+4
DIR	HEADER+2!
DIR(0	HEADER+2*
DT	HEADER1+2
>> DTOUT	HEADER+2
DUZ	HEADER1+2
IO	HEADER+2
IO(0	HEADER+2
IOF	HEADER1+1
IOM	CTR+1
IOSL	LOCW+1
IOST	HEADER+2
N	CALC~, CALC+2, CALC+4*, CALC+7, V~, V+1
O	CALC~, CALC+2, CALC+5*, CALC+6, CALC+7
P	V~, V+1
R	V~, V+1
U	LOCW+2, LOCW+3, LOCW+7, V+1, HEADER1+2
X	CALC+3~, CALC+4, CALC+5, LOCW+3, LOCW+4, LOCW+5, LOCW+6, LOCW+7, C~, C+2 , HEADER1+5, HEADER1+6, CTR~, CTR+1
X2	CALC+3~, CALC+4, CALC+5, C~
X3	CALC+3~, CALC+4, CALC+5, C~
Y	HEADER+2, CTR~, CTR+1
Z	CALC+1~, CALC+7*, CALC+8
>> ZTQUEUED	HEADER+2

Customize PDF page

Package: Aberdeen GPRA Report

Routine: CIMGAGPL

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: