Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: CIMGAGPT

Package: Aberdeen GPRA Report

Routine: CIMGAGPT


Information

CIMGAGPT ; CMI/TUCSON/LAB - aberdeen gpra print ; [ 03/13/00 9:53 AM ]

Source Information

Source file <CIMGAGPT.m>

Call Graph

Call Graph Total: 4

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Aberdeen GPRA Report 1 CIMGAGPQ  

Entry Points

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

External References

Name Field # of Occurrence
COMMA^%DTC CALC+6, CALC+7, C+1
^CIMGAGPW AGE11+19
^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+2
Function Call: WRITE
  • Prompt: !,"Public Health Nursing"
  • Line Location: PHN+3
Function Call: WRITE
  • Prompt: !?38,"BASELINE",?45," %",?56,"REPORT",?64," %",?71,"% CHANGE",!?38,"PERIOD",?56,"PERIOD"
  • Line Location: PHN+4
Function Call: WRITE
  • Prompt: !?3,"# active users",?36,$$C(CIMGY,0,9),?54,$$C(CIMGX,0,9)
  • Line Location: PHN+8
Function Call: WRITE
  • Prompt: !?3,"# of Persons served by PHN's",!?5,"in any setting",?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: PHN+9
Function Call: WRITE
  • Prompt: !?3,"# of Persons Served by PHN's",!?5,"in a Home Setting",?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: PHN+12
Function Call: WRITE
  • Prompt: !!?3,"# of PHN Visits - any Setting",?36,$$C($$V(CIMRPT,20,18),0,9),?54,$$C($$V(CIMRPT,19,18),0,9)
  • Line Location: PHN+13
Function Call: WRITE
  • Prompt: ?72,$J(%,5,1)
  • Line Location: PHN+14
Function Call: WRITE
  • Prompt: !!?3,"# of PHN Visits - Home",?36,$$C($$V(CIMRPT,20,19),0,9),?54,$$C($$V(CIMRPT,19,19),0,9)
  • Line Location: PHN+15
Function Call: WRITE
  • Prompt: ?72,$J(%,5,1)
  • Line Location: PHN+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+2
Function Call: WRITE
  • Prompt: !,"Adult Immunizations"
  • Line Location: FLUPNEU+3
Function Call: WRITE
  • Prompt: !?56,"REPORT",?64," %",!?56,"PERIOD"
  • Line Location: FLUPNEU+5
Function Call: WRITE
  • Prompt: !?3,"# patients 65 yrs and older",?54,$$C(CIMGX,0,9)
  • Line Location: FLUPNEU+9
Function Call: WRITE
  • Prompt: !?3,"# w/Pneumovax ever",?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1)
  • Line Location: FLUPNEU+10
Function Call: WRITE
  • Prompt: !?3,"# with Flu Vaccine within",!?5,"1 year prior to end of time period",?54,$$C(CIMG1,0,9),?62,$J(CIMG1P,6,1)
  • Line Location: FLUPNEU+13
Function Call: WRITE
  • Prompt: !!,"24/2000 Smoking",!,"Determine Area-age specific prevalance rates for the",!,"usage of tobacco products.",!
  • Line Location: SMOKER+2
Function Call: WRITE
  • Prompt: !,"Prevalance of Usage of Tobacco Products"
  • Line Location: SMOKER+4
Function Call: WRITE
  • Prompt: !?38,"BASELINE",?45," %",?56,"REPORT",?64," %",?71,"% CHANGE",!?38,"PERIOD",?56,"PERIOD"
  • Line Location: SMOKER+5
Function Call: WRITE
  • Prompt: !?3,"# active users",?36,$$C(CIMGY,0,9),?54,$$C(CIMGX,0,9)
  • Line Location: SMOKER+9
Function Call: WRITE
  • Prompt: !!?3,"# w/ Tobacco Status documented",?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: SMOKER+10
Function Call: WRITE
  • Prompt: !!?3,"# documented Tobacco Users",?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: SMOKER+14
Function Call: WRITE
  • Prompt: !,"Age specific Tobacco Usage Prevalance"
  • Line Location: AGE11+2
Function Call: WRITE
  • Prompt: !?40,"Age Distribution"
  • Line Location: AGE11+3
Function Call: WRITE
  • Prompt: !?23,"<1 yr",?30,"1-4",?37,"5-14",?44,"15-19",?51,"20-24",?56,"25-44",?65,"45-64",?72,">64 yrs",!
  • Line Location: AGE11+4
Function Call: WRITE
  • Prompt: !," BASELINE"
  • Line Location: AGE11+5
Function Call: WRITE
  • Prompt: !?2,"# active users"
  • Line Location: AGE11+6
Function Call: WRITE
  • Prompt: ?T,$$C(Y,0,6)
  • Line Location: AGE11+7
Function Call: WRITE
  • Prompt: !?2,"# Tobacco Users"
  • Line Location: AGE11+8
Function Call: WRITE
  • Prompt: ?T,$$C(Y,0,6)
  • Line Location: AGE11+9
Function Call: WRITE
  • Prompt: ?T,$S(%="":" .",1:$J(%,5,1))
  • Line Location: AGE11+10
Function Call: WRITE
  • Prompt: !,"CURRENT PERIOD"
  • Line Location: AGE11+12
Function Call: WRITE
  • Prompt: !?2,"# active users"
  • Line Location: AGE11+13
Function Call: WRITE
  • Prompt: ?T,$$C(Y,0,6)
  • Line Location: AGE11+14
Function Call: WRITE
  • Prompt: !?2,"# Tobacco Users"
  • Line Location: AGE11+15
Function Call: WRITE
  • Prompt: ?T,$$C(Y,0,6)
  • Line Location: AGE11+16
Function Call: WRITE
  • Prompt: ?T,$S(%="":" .",1:$J(%,5,1))
  • Line Location: AGE11+17
Function Call: WRITE
  • Prompt: ?T,$J($$CALC(N,O),6)
  • Line Location: AGE11+18
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 date",!?5,"w/in 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: 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 date",!?5,"w/in 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: 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
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: $$CTR($P(^DIC(4,DUZ(2),0),U)),!
  • 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)
^CIMAGP( V+1
^DIC(4 - [#4] HEADER1+4, LOC+1
^VA(200 - [#200] HEADER1+2, USR+1

Label References

Name Line Occurrences
$$C PHN+8, PHN+9, PHN+12, PHN+13, PHN+15, FLUPNEU+9, FLUPNEU+10, FLUPNEU+13, SMOKER+9, SMOKER+10
, SMOKER+14, AGE11+7, AGE11+9, AGE11+14, AGE11+16, IND2023+8, IND2023+9, IND2023+13, IND2023+17, IND2023+21
, IND2023+22, IND2023+26, IND2023+30
$$CALC PHN+9, PHN+12, SMOKER+10, SMOKER+14, AGE11+18, IND2023+9, IND2023+13, IND2023+17, IND2023+22, IND2023+26
, IND2023+30
$$CTR HEADER1+3, HEADER1+4, HEADER1+5, HEADER1+6
$$V PHN+5, PHN+6, PHN+10, PHN+13, PHN+14, PHN+15, PHN+16, FLUPNEU+6, FLUPNEU+7, FLUPNEU+11
, SMOKER+6, SMOKER+7, SMOKER+11, SMOKER+12, AGE11+7, AGE11+9, AGE11+10, AGE11+14, AGE11+16, AGE11+17
, IND2023+5, IND2023+6, IND2023+10, IND2023+11, IND2023+14, IND2023+15, IND2023+18, IND2023+19, IND2023+23, IND2023+24
, IND2023+27, IND2023+28
HEADER PHN+1, FLUPNEU+1, SMOKER+1, SMOKER+3, AGE11+1, AGE11+11, IND2023+1
HEADER1 HEADER+1

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PHN+14*, PHN+16*, AGE11+10*, AGE11+17*
>> CIM98B HEADER1+6
>> CIM98E HEADER1+6
>> CIMBD HEADER1+5
>> CIMED HEADER1+5
>> CIMG1 PHN+6*, PHN+7, PHN+9, PHN+10*, PHN+11, PHN+12, FLUPNEU+7*, FLUPNEU+8, FLUPNEU+10, FLUPNEU+11*
, FLUPNEU+12, FLUPNEU+13, SMOKER+7*, SMOKER+8, SMOKER+10, SMOKER+12*, SMOKER+13, SMOKER+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 PHN+6*, PHN+7, PHN+9, PHN+10*, PHN+11, PHN+12, FLUPNEU+7*, FLUPNEU+8, FLUPNEU+11*, FLUPNEU+12
, SMOKER+7*, SMOKER+8, SMOKER+10, SMOKER+12*, SMOKER+13, SMOKER+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 PHN+7*, PHN+9, PHN+11*, PHN+12, FLUPNEU+8*, FLUPNEU+12*, SMOKER+8*, SMOKER+10, SMOKER+13*, SMOKER+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 PHN+7*, PHN+9, PHN+11*, PHN+12, FLUPNEU+8*, FLUPNEU+10, FLUPNEU+12*, FLUPNEU+13, SMOKER+8*, SMOKER+10
, SMOKER+13*, SMOKER+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
>> CIMGPG HEADER+1, HEADER1+1*, HEADER1+2
>> CIMGX PHN+5*, PHN+7, PHN+8, PHN+11, FLUPNEU+6*, FLUPNEU+8, FLUPNEU+9, FLUPNEU+12, SMOKER+6*, SMOKER+8
, SMOKER+9, SMOKER+11*, SMOKER+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 PHN+5*, PHN+7, PHN+8, PHN+11, FLUPNEU+6*, FLUPNEU+8, FLUPNEU+12, SMOKER+6*, SMOKER+8, SMOKER+9
, SMOKER+11*, SMOKER+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
>> CIMQUIT PHN+1, FLUPNEU+1, SMOKER+1, SMOKER+3, AGE11+1, AGE11+11, IND2023+1, HEADER+2*
>> CIMRPT PHN+5, PHN+6, PHN+10, PHN+13, PHN+14, PHN+15, PHN+16, FLUPNEU+6, FLUPNEU+7, FLUPNEU+11
, SMOKER+6, SMOKER+7, SMOKER+11, SMOKER+12, AGE11+7, AGE11+9, AGE11+10, AGE11+14, AGE11+16, AGE11+17
, IND2023+5, IND2023+6, IND2023+10, IND2023+11, IND2023+14, IND2023+15, IND2023+18, IND2023+19, IND2023+23, IND2023+24
, IND2023+27, IND2023+28
CIMX AGE11+10!
CIMX( AGE11+10*, AGE11+17*, AGE11+18
>> D AGE11+10*, AGE11+17*
DIR HEADER+2!
DIR(0 HEADER+2*
DT HEADER1+2
>> DTOUT HEADER+2
DUZ HEADER1+2, USR+1
DUZ(2 HEADER1+4, LOC+1
IO HEADER+2
IO(0 HEADER+2
IOF HEADER1+1
IOM CTR+1
IOSL SMOKER+3, AGE11+11
IOST HEADER+2
N AGE11+10*, AGE11+17*, AGE11+18*, CALC~, CALC+4, CALC+6*, CALC+9, V~, V+1
O AGE11+18*, CALC~, CALC+4, CALC+7*, CALC+8, CALC+9
P V~, V+1
R V~, V+1
>> T AGE11+7*, AGE11+9*, AGE11+10*, AGE11+14*, AGE11+16*, AGE11+17*, AGE11+18*
U AGE11+10, AGE11+17, AGE11+18, V+1, HEADER1+2, HEADER1+4, USR+1, LOC+1
X PHN+14*, PHN+16*, AGE11+7*, AGE11+9*, AGE11+10*, AGE11+14*, AGE11+16*, AGE11+17*, AGE11+18*, CALC+5~
, CALC+6*, CALC+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 PHN+14*, PHN+16*, AGE11+7*, AGE11+9*, AGE11+14*, AGE11+16*, HEADER+2, CTR~, CTR+1
Z CALC+3~, CALC+9*, CALC+10
>> ZTQUEUED HEADER+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All