Routine: CIMGAGPC

Package	Total	Call Graph
Aberdeen GPRA Report	2	HEADER^CIMGAGPB ^CIMGAGPE
VA Fileman	1	COMMA^%DTC

Package	Total	Caller Graph
Aberdeen GPRA Report	1	CIMGAGPB

Name	Comments	DBIA/ICR reference
IND77	;
IND1213	;
V(N,P)	;
IND66	;
IND88	;
IND1112	;
C(X,X2,X3)	;
CALC(N,O)	;ENTRY POINT
IND1820	;
IND55	;
IND44	;
IND2023	;

Name	Field # of Occurrence
COMMA^%DTC	CALC+4, CALC+5, C+1
HEADER^CIMGAGPB	IND44+1, IND55+1, IND66+1, IND77+1, IND88+1, IND1112+1, IND1213+1, IND1820+1, IND2023+1
^CIMGAGPE	IND2023+31

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: !?38,"BASELINE",?45," %",?56,"REPORT",?64," %",?71,"% CHANGE",!?38,"PERIOD",?56,"PERIOD" Line Location: IND44+4
Function Call: WRITE	Prompt: !?3,"# diagnosed diabetes",?36,$$C(CIMGY,0,9),?54,$$C(CIMGX,0,9) Line Location: IND44+8
Function Call: WRITE	Prompt: !?3,"# assessed for dyslipidemia within",!?5,"1 year of end of time period",?36,$$C(CIMG1B,0,9),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND44+9
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+2
Function Call: WRITE	Prompt: !,"Assessed for Nephropathy" Line Location: IND55+3
Function Call: WRITE	Prompt: !?38,"BASELINE",?45," %",?56,"REPORT",?64," %",?71,"% CHANGE",!?38,"PERIOD",?56,"PERIOD" Line Location: IND55+4
Function Call: WRITE	Prompt: !?3,"# diagnosed diabetes",?36,$$C(CIMGY,0,9),?54,$$C(CIMGX,0,9) Line Location: IND55+8
Function Call: WRITE	Prompt: !?3,"# assessed for nephropathy within",!?5,"1 year of end of time period",?36,$$C(CIMG1B,0,9),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND55+9
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+2
Function Call: WRITE	Prompt: !,"Pap Screening" Line Location: IND66+3
Function Call: WRITE	Prompt: !?38,"BASELINE",?45," %",?56,"REPORT",?64," %",?71,"% CHANGE",!?38,"PERIOD",?56,"PERIOD" Line Location: IND66+4
Function Call: WRITE	Prompt: !?3,"# Women >17 years old",?36,$$C(CIMGY,0,9),?54,$$C(CIMGX,0,9) Line Location: IND66+8
Function Call: WRITE	Prompt: !?3,"# with Pap documented within",!?5,"3 years of end of time period",?36,$$C(CIMG1B,0,9),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND66+9
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+2
Function Call: WRITE	Prompt: !,"Mammography Screening" Line Location: IND77+3
Function Call: WRITE	Prompt: !?38,"BASELINE",?45," %",?56,"REPORT",?64," %",?71,"% CHANGE",!?38,"PERIOD",?56,"PERIOD" Line Location: IND77+4
Function Call: WRITE	Prompt: !?3,"# Women 40-69 years old",?36,$$C(CIMGY,0,9),?54,$$C(CIMGX,0,9) Line Location: IND77+8
Function Call: WRITE	Prompt: !?3,"# with Mammography documented within",!?5,"1 year of end of time period",?36,$$C(CIMG1B,0,9),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND77+9
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+2
Function Call: WRITE	Prompt: !,"Well Child Visits by Age 27 Months" Line Location: IND88+3
Function Call: WRITE	Prompt: !?38,"BASELINE",?45," %",?56,"REPORT",?64," %",?71,"% CHANGE",!?38,"PERIOD",?56,"PERIOD" Line Location: IND88+4
Function Call: WRITE	Prompt: !?3,"# Children turning 27 mon old",?36,$$C(CIMGY,0,9),?54,$$C(CIMGX,0,9) Line Location: IND88+8
Function Call: WRITE	Prompt: !?3,"# with at least 4 Well Child",!?5,"before age 27 months",?36,$$C(CIMG1B,0,9),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND88+9
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+2
Function Call: WRITE	Prompt: !,"Dental Visit 0000" Line Location: IND1112+3
Function Call: WRITE	Prompt: !?38,"BASELINE",?45," %",?56,"REPORT",?64," %",?71,"% CHANGE",!?38,"PERIOD",?56,"PERIOD" Line Location: IND1112+4
Function Call: WRITE	Prompt: !?3,"# active users",?36,$$C(CIMGY,0,9),?54,$$C(CIMGX,0,9) Line Location: IND1112+8
Function Call: WRITE	Prompt: !?3,"# with a dental visit 0000 within",!?5,"1 year of end of time period",?36,$$C(CIMG1B,0,9),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND1112+9
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+2
Function Call: WRITE	Prompt: !,"Dental Visit 1351" Line Location: IND1213+3
Function Call: WRITE	Prompt: !?38,"BASELINE",?45," %",?56,"REPORT",?64," %",?71,"% CHANGE",!?38,"PERIOD",?56,"PERIOD" Line Location: IND1213+4
Function Call: WRITE	Prompt: !?3,"# children 6-8",?36,$S(CIMGY="**":CIMGY,1:$$C(CIMGY,0,9)),?54,$$C(CIMGX,0,9) Line Location: IND1213+9
Function Call: WRITE	Prompt: !?3,"# with a dental visit 1351",!?5,"anytime in their history",?36,$S(CIMG1B="**":CIMG1B,1:$$C(CIMG1B,0,9)),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND1213+10
Function Call: WRITE	Prompt: !!?3,"# children 14-15",?36,$S(CIMGY="**":CIMGY,1:$$C(CIMGY,0,9)),?54,$$C(CIMGX,0,9) Line Location: IND1213+15
Function Call: WRITE	Prompt: !?3,"# with a dental visit 1351",!?5,"anytime in their history",?36,$S(CIMG1B="**":CIMG1B,1:$$C(CIMG1B,0,9)),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND1213+16
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+2
Function Call: WRITE	Prompt: !,"Immunizations Up to date" Line Location: IND1820+3
Function Call: WRITE	Prompt: !?38,"BASELINE",?45," %",?56,"REPORT",?64," %",?71,"% CHANGE",!?38,"PERIOD",?56,"PERIOD" Line Location: IND1820+4
Function Call: WRITE	Prompt: !?3,"# children 2 yrs of age",?36,$$C(CIMGY,0,9),?54,$$C(CIMGX,0,9) Line Location: IND1820+8
Function Call: WRITE	Prompt: !?3,"# immunized with basic series",?36,$$C(CIMG1B,0,9),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND1820+9
Function Call: WRITE	Prompt: !!!?3,"# children 27 months of age",?36,$$C(CIMGY,0,9),?54,$$C(CIMGX,0,9) Line Location: IND1820+13
Function Call: WRITE	Prompt: !?3,"# immunized with basic series",?36,$$C(CIMG1B,0,9),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND1820+14
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+2
Function Call: WRITE	Prompt: !,"Child Obesity" Line Location: IND2023+3
Function Call: WRITE	Prompt: !?38,"BASELINE",?45," %",?56,"REPORT",?64," %",?71,"% CHANGE",!?38,"PERIOD",?56,"PERIOD" Line Location: IND2023+4
Function Call: WRITE	Prompt: !?3,"# children 3-5 yrs of age",?36,$$C(CIMGY,0,9),?54,$$C(CIMGX,0,9) Line Location: IND2023+8
Function Call: WRITE	Prompt: !!?3,"# w/ HT/WT recorded on same",!?5,"date in time period",?36,$$C(CIMG1B,0,9),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND2023+9
Function Call: WRITE	Prompt: !?3,"# Obese",?36,$$C(CIMG1B,0,9),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND2023+13
Function Call: WRITE	Prompt: !?3,"# Overweight",?36,$$C(CIMG1B,0,9),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND2023+17
Function Call: WRITE	Prompt: !!!?3,"# children 8-10 yrs of age",?36,$$C(CIMGY,0,9),?54,$$C(CIMGX,0,9) Line Location: IND2023+21
Function Call: WRITE	Prompt: !!?3,"# w/ HT/WT recorded on same",!?5,"date in time period",?36,$$C(CIMG1B,0,9),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND2023+22
Function Call: WRITE	Prompt: !?3,"# Obese",?36,$$C(CIMG1B,0,9),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND2023+26
Function Call: WRITE	Prompt: !?3,"# Overweight",?36,$$C(CIMG1B,0,9),?44,$J(CIMG1BP,6,1),?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1),?72,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: IND2023+30

Name	Line Occurrences (* Changed, ! Killed)
^CIMAGP(	V+1

Name	Line Occurrences
$$C	IND44+8, IND44+9, IND55+8, IND55+9, IND66+8, IND66+9, IND77+8, IND77+9, IND88+8, IND88+9 , IND1112+8, IND1112+9, IND1213+9, IND1213+10, IND1213+15, IND1213+16, IND1820+8, IND1820+9, IND1820+13, IND1820+14 , IND2023+8, IND2023+9, IND2023+13, IND2023+17, IND2023+21, IND2023+22, IND2023+26, IND2023+30
$$CALC	IND44+9, IND55+9, IND66+9, IND77+9, IND88+9, IND1112+9, IND1213+10, IND1213+16, IND1820+9, IND1820+14 , IND2023+9, IND2023+13, IND2023+17, IND2023+22, IND2023+26, IND2023+30
$$V	IND44+5, IND44+6, IND55+5, IND55+6, IND66+5, IND66+6, IND77+5, IND77+6, IND88+5, IND88+6 , IND1112+5, IND1112+6, IND1213+5, IND1213+6, IND1213+11, IND1213+12, IND1820+5, IND1820+6, IND1820+10, IND1820+11 , IND2023+5, IND2023+6, IND2023+10, IND2023+11, IND2023+14, IND2023+15, IND2023+18, IND2023+19, IND2023+23, IND2023+24 , IND2023+27, IND2023+28

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
C	V+1~*, V+2
>> CIMG1	IND44+6, IND44+7, IND44+9, IND55+6, IND55+7, IND55+9, IND66+6, IND66+7, IND66+9, IND77+6 , IND77+7, IND77+9, IND88+6, IND88+7, IND88+9, IND1112+6, IND1112+7, IND1112+9, IND1213+6, IND1213+7 , IND1213+8, IND1213+10, IND1213+12, IND1213+13, IND1213+14, IND1213+16, IND1820+6, IND1820+7, IND1820+9, IND1820+11 , IND1820+12, IND1820+14, IND2023+6, IND2023+7, IND2023+9, IND2023+11, IND2023+12, IND2023+13, IND2023+15, IND2023+16 , IND2023+17, IND2023+19, IND2023+20, IND2023+22, IND2023+24, IND2023+25, IND2023+26, IND2023+28, IND2023+29, IND2023+30
>> CIMG1B	IND44+6, IND44+7, IND44+9, IND55+6, IND55+7, IND55+9, IND66+6, IND66+7, IND66+9, IND77+6 , IND77+7, IND77+9, IND88+6, IND88+7, IND88+9, IND1112+6, IND1112+7, IND1112+9, IND1213+6, IND1213+7 , IND1213+8, IND1213+10, IND1213+12, IND1213+13, IND1213+14, IND1213+16, IND1820+6, IND1820+7, IND1820+9, IND1820+11 , IND1820+12, IND1820+14, IND2023+6, IND2023+7, IND2023+9, IND2023+11, IND2023+12, IND2023+13, IND2023+15, IND2023+16 , IND2023+17, IND2023+19, IND2023+20, IND2023+22, IND2023+24, IND2023+25, IND2023+26, IND2023+28, IND2023+29, IND2023+30
>> CIMG1BP	IND44+7, IND44+9, IND55+7, IND55+9, IND66+7, IND66+9, IND77+7, IND77+9, IND88+7, IND88+9 , IND1112+7, IND1112+9, IND1213+7, IND1213+8, IND1213+10, IND1213+13, IND1213+14, IND1213+16, IND1820+7, IND1820+9 , IND1820+12, IND1820+14, IND2023+7, IND2023+9, IND2023+12, IND2023+13, IND2023+16, IND2023+17, IND2023+20, IND2023+22 , IND2023+25, IND2023+26, IND2023+29, IND2023+30
>> CIMG1P	IND44+7, IND44+9, IND55+7, IND55+9, IND66+7, IND66+9, IND77+7, IND77+9, IND88+7, IND88+9 , IND1112+7, IND1112+9, IND1213+7, IND1213+8, IND1213+10, IND1213+13, IND1213+14, IND1213+16, IND1820+7, IND1820+9 , IND1820+12, IND1820+14, IND2023+7, IND2023+9, IND2023+12, IND2023+13, IND2023+16, IND2023+17, IND2023+20, IND2023+22 , IND2023+25, IND2023+26, IND2023+29, IND2023+30
>> CIMGX	IND44+5, IND44+7, IND44+8, IND55+5, IND55+7, IND55+8, IND66+5, IND66+7, IND66+8, IND77+5 , IND77+7, IND77+8, IND88+5, IND88+7, IND88+8, IND1112+5, IND1112+7, IND1112+8, IND1213+5, IND1213+7 , IND1213+8, IND1213+9, IND1213+11, IND1213+13, IND1213+14, IND1213+15, IND1820+5, IND1820+7, IND1820+8, IND1820+10 , IND1820+12, IND1820+13, IND2023+5, IND2023+7, IND2023+8, IND2023+10, IND2023+12, IND2023+14, IND2023+16, IND2023+18 , IND2023+20, IND2023+21, IND2023+23, IND2023+25, IND2023+27, IND2023+29
>> CIMGY	IND44+5, IND44+7, IND44+8, IND55+5, IND55+7, IND55+8, IND66+5, IND66+7, IND66+8, IND77+5 , IND77+7, IND77+8, IND88+5, IND88+7, IND88+8, IND1112+5, IND1112+7, IND1112+8, IND1213+5, IND1213+7 , IND1213+8, IND1213+9, IND1213+11, IND1213+13, IND1213+14, IND1213+15, IND1820+5, IND1820+7, IND1820+8, IND1820+10 , IND1820+12, IND1820+13, IND2023+5, IND2023+7, IND2023+8, IND2023+10, IND2023+12, IND2023+14, IND2023+16, IND2023+18 , IND2023+20, IND2023+21, IND2023+23, IND2023+25, IND2023+27, IND2023+29
>> CIMPER	IND1213+6, IND1213+7, IND1213+8, IND1213+12, IND1213+13, IND1213+14
>> CIMQUIT	IND44+1, IND55+1, IND66+1, IND77+1, IND88+1, IND1112+1, IND1213+1, IND1820+1, IND2023+1
>> CIMSUL(	V+1
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
U	V+1
X	CALC+3~, CALC+4, CALC+5, V+1~*, C~, C+2
X2	CALC+3~, CALC+4, CALC+5, C~
X3	CALC+3~, CALC+4, CALC+5, C~
Z	CALC+1~, CALC+7*, CALC+8

Customize PDF page

Package: Aberdeen GPRA Report

Routine: CIMGAGPC

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: