Routine: CIMGAGPM

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

Package	Total	Caller Graph
Aberdeen GPRA Report	1	CIMGAGPL

Entry Points

Name	Comments	DBIA/ICR reference
A	;
B	;
PHN	;
LOC()	;EP - Return location name from file 4 based on DUZ(2).
CTR(X,Y)	;EP - Center X in a field Y wide.
SMOKER	;
V(R,N,P)	;
HEADER	;EP
USR()	;EP - Return name of current user from ^VA(200.
HEADER1	;
LOCW	;
CALC(N,O)	;ENTRY POINT
FLUPNEU	;
C(X,X2,X3)	;

External References

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

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"19/2000 Public Health Nursing",!,"Assure the total number of public health nursing services provided to ",!,"individuals in all settings and the total number of home visits are",!,"increased by 5% over the FY 1998 workload baselines",! Line Location: PHN+3
Function Call: WRITE	Prompt: !,"Public Health Nursing - # served by PHS in any Setting" Line Location: PHN+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: PHN+5
Function Call: WRITE	Prompt: !,"19/2000 Public Health Nursing",!,"Assure the total number of public health nursing services provided to ",!,"individuals in all settings and the total number of home visits are",!,"increased by 5% over the FY 1998 workload baselines",! Line Location: A+3
Function Call: WRITE	Prompt: !,"Public Health Nursing - # served by PHN in HOME setting" Line Location: A+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: A+5
Function Call: WRITE	Prompt: !,"19/2000 Public Health Nursing",!,"Assure the total number of public health nursing services provided to ",!,"individuals in all settings and the total number of home visits are",!,"increased by 5% over the FY 1998 workload baselines",! Line Location: B+3
Function Call: WRITE	Prompt: !,"Public Health Nursing - # PHN Visits any Setting" Line Location: B+4
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: B+5
Function Call: WRITE	Prompt: ?44,$J(%,5,1) Line Location: B+8
Function Call: WRITE	Prompt: !,"19/2000 Public Health Nursing",!,"Assure the total number of public health nursing services provided to ",!,"individuals in all settings and the total number of home visits are",!,"increased by 5% over the FY 1998 workload baselines",! Line Location: B+11
Function Call: WRITE	Prompt: !,"Public Health Nursing - # PHN Visits in the HOME" Line Location: B+12
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: B+13
Function Call: WRITE	Prompt: ?44,$J(%,5,1) Line Location: B+16
Function Call: WRITE	Prompt: !,"21/2000 Adult Immunization",!,"Produce an overall pneumoccal and influenza vaccination level of at least 60%",!,"for adults aged 65 and older.",! Line Location: FLUPNEU+3
Function Call: WRITE	Prompt: !,"Adult Immunizations - Pneumovax ever" Line Location: FLUPNEU+4
Function Call: WRITE	Prompt: !?44,"Total Percent" Line Location: FLUPNEU+5
Function Call: WRITE	Prompt: !,"21/2000 Adult Immunization",!,"Produce an overall pneumoccal and influenza vaccination level of at least 60%",!,"for adults aged 65 and older.",! Line Location: FLUPNEU+14
Function Call: WRITE	Prompt: !,"Adult Immunizations - Flu Vaccine" Line Location: FLUPNEU+15
Function Call: WRITE	Prompt: !?44,"Total Percent" Line Location: FLUPNEU+16
Function Call: WRITE	Prompt: ?44,$J(CIMG1P,6,1) Line Location: FLUPNEU+20
Function Call: WRITE	Prompt: !!,"24/2000 Smoking",!,"Determine Area-age specific prevalance rates for the",!,"usage of tobacco products.",! Line Location: SMOKER+3
Function Call: WRITE	Prompt: !,"Prevalance of Usage of Tobacco Products" Line Location: SMOKER+5
Function Call: WRITE	Prompt: !?44,"% CHANGE" Line Location: SMOKER+6
Function Call: WRITE	Prompt: ?44,$J($$CALC(CIMG1P,CIMG1BP),7) Line Location: SMOKER+11
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

Global Variables Directly Accessed

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

Label References

Name	Line Occurrences
$$CALC	PHN+11, A+10, SMOKER+11
$$CTR	HEADER1+3, HEADER1+4, HEADER1+5, HEADER1+6
$$V	PHN+7, PHN+8, A+7, B+8, B+16, FLUPNEU+7, FLUPNEU+8, FLUPNEU+18, SMOKER+8, SMOKER+9
HEADER	PHN+2, A+2, B+2, B+10, FLUPNEU+2, FLUPNEU+13, SMOKER+2, SMOKER+4, LOCW+1
HEADER1	HEADER+1
LOCW	PHN+10, A+9, B+7, B+15, FLUPNEU+10, FLUPNEU+20, SMOKER+11

Naked Globals

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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	B+8, B+16
>> CIM98B	HEADER1+6
>> CIM98E	HEADER1+6
>> CIMBD	HEADER1+5
>> CIMDO	PHN+6, PHN+7, PHN+8, A+6, A+7, B+6, B+8, B+14, B+16, FLUPNEU+6* , FLUPNEU+7, FLUPNEU+8, FLUPNEU+17, FLUPNEU+18, SMOKER+7, SMOKER+8, SMOKER+9, LOCW+2, LOCW+3
>> CIMED	HEADER1+5
>> CIMG1	PHN+8, PHN+9, A+7, A+8, FLUPNEU+8, FLUPNEU+9, FLUPNEU+18, FLUPNEU+19, SMOKER+9*, SMOKER+10
>> CIMG1B	PHN+8, PHN+9, A+7, A+8, FLUPNEU+8, FLUPNEU+9, FLUPNEU+18, FLUPNEU+19, SMOKER+9*, SMOKER+10
>> CIMG1BP	PHN+9, PHN+11, A+8, A+10, FLUPNEU+9, FLUPNEU+19, SMOKER+10*, SMOKER+11
>> CIMG1P	PHN+9, PHN+11, A+8, A+10, FLUPNEU+9, FLUPNEU+11, FLUPNEU+19, FLUPNEU+20, SMOKER+10*, SMOKER+11
>> CIMGPG	HEADER+1, HEADER1+1*, HEADER1+2
>> CIMGX	PHN+7, PHN+9, A+8, FLUPNEU+7, FLUPNEU+9, FLUPNEU+19, SMOKER+8*, SMOKER+10
>> CIMGY	PHN+7, PHN+9, A+8, FLUPNEU+7, FLUPNEU+9, FLUPNEU+19, SMOKER+8*, SMOKER+10
>> CIMQUIT	PHN+1, PHN+2, PHN+6, PHN+10, A+1, A+2, A+6, A+9, B+1, B+2 , B+6, B+7, B+9, B+10, B+14, B+15, FLUPNEU+1, FLUPNEU+2, FLUPNEU+6, FLUPNEU+10 , FLUPNEU+12, FLUPNEU+13, FLUPNEU+17, FLUPNEU+20, SMOKER+1, SMOKER+2, SMOKER+4, SMOKER+7, SMOKER+11, LOCW+1 , HEADER+2*
>> CIMSUCNT	HEADER1+4
>> CIMSUL(	PHN+6, A+6, B+6, B+14, FLUPNEU+6, FLUPNEU+17, SMOKER+7
>> CIMSUNM	HEADER1+4
DIR	HEADER+2!
DIR(0	HEADER+2*
DT	HEADER1+2
>> DTOUT	HEADER+2
DUZ	HEADER1+2, USR+1
DUZ(2	LOC+1
IO	HEADER+2
IO(0	HEADER+2
IOF	HEADER1+1
IOM	CTR+1
IOSL	SMOKER+4, LOCW+1
IOST	HEADER+2
N	CALC~, CALC+4, CALC+6*, CALC+9, V~, V+1
O	CALC~, CALC+4, CALC+7*, CALC+8, CALC+9
P	V~, V+1
R	V~, V+1
U	LOCW+2, LOCW+3, LOCW+7, V+1, HEADER1+2, USR+1, LOC+1
X	B+8, B+16, CALC+5~, CALC+6, CALC+7, LOCW+3, LOCW+4, LOCW+5, LOCW+6, LOCW+7 , C~, C+2, HEADER1+5, HEADER1+6, CTR~, CTR+1
X2	CALC+5~, CALC+6, CALC+7, C~
X3	CALC+5~, CALC+6, CALC+7, C~
Y	B+8, B+16, HEADER+2, CTR~, CTR+1
Z	CALC+3~, CALC+9*, CALC+10
>> ZTQUEUED	HEADER+2

Customize PDF page

Package: Aberdeen GPRA Report

Routine: CIMGAGPM

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

Naked Globals

Local Variables

Legend: