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: CIMGAGPW

Package: Aberdeen GPRA Report

Routine: CIMGAGPW


Information

CIMGAGPW ; CMI/TUCSON/LAB - aberdeen gpra print ; [ 03/14/00 9:49 AM ]

Source Information

Source file <CIMGAGPW.m>

Call Graph

Call Graph Total: 4

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Aberdeen GPRA Report 1 CIMGAGPT  

Entry Points

Name Comments DBIA/ICR reference
INJ ;tally injuries
LOC() ;EP - Return location name from file 4 based on DUZ(2).
CTR(X,Y) ;EP - Center X in a field Y wide.
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
INJPP ;

External References

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

Interaction Calls

Name Line Occurrences
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
Function Call: WRITE
  • Prompt: !?38,"BASELINE",?45," %",?56,"REPORT",?64," %",?71,"% CHANGE",!?38,"PERIOD",?56,"PERIOD"
  • Line Location: HEADER1+8
Function Call: WRITE
  • Prompt: !,"Injury Diagnoses and E Codes"
  • Line Location: HEADER1+9
Routine Call
  • DIR
  • Line Location:
    • HEADER+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^CIMAGP( INJ+3, INJ+4, INJ+6, INJ+7, INJ+8, INJ+9, INJ+10, INJ+11, V+1
^DIC(4 - [#4] HEADER1+4, LOC+1
^TMP($J INJ+2!, INJ+4*, INJ+6*, INJ+7*, INJ+9*, INJ+10*, INJ+11*, INJPP+2, INJPP+3, INJPP+14
, INJPP+15
^VA(200 - [#200] HEADER1+2, USR+1

Label References

Name Line Occurrences
$$C INJPP+6, INJPP+8, INJPP+9, INJPP+10, INJPP+11, INJPP+12, INJPP+18
$$CALC INJPP+7, INJPP+8, INJPP+9, INJPP+10, INJPP+11, INJPP+12, INJPP+19
$$CTR HEADER1+3, HEADER1+4, HEADER1+5, HEADER1+6
HEADER INJ+1, INJPP+4, INJPP+16
HEADER1 HEADER+1

Naked Globals

Name Field # of Occurrence
^( INJ+4*, INJ+7*, INJ+9*, INJ+11*
^(0 INJ+4, INJ+7, INJ+9, INJ+11, USR+1, LOC+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A INJ+6*, INJ+10*
>> C INJ+4*, INJ+6, INJ+7, INJ+9*, INJ+10, INJ+11
>> CIM98B HEADER1+6
>> CIM98E HEADER1+6
>> CIMBD HEADER1+5
>> CIMD INJPP+15*, INJPP+17, INJPP+18, INJPP+19
>> CIMED HEADER1+5
>> CIMGPG HEADER+1, HEADER1+1*, HEADER1+2
>> CIMQUIT INJ+1, INJPP+2, INJPP+4, INJPP+14, INJPP+16, HEADER+2*
>> CIMRPT INJ+3, INJ+4, INJ+6, INJ+7, INJ+8, INJ+9, INJ+10, INJ+11
>> CIMX INJPP+2*, INJPP+3, INJPP+5, INJPP+14, INJPP+15
>> CIMY INJPP+14*, INJPP+15, INJPP+17
>> D INJ+4*, INJ+7*, INJ+9*, INJ+11*, INJPP+3*, INJPP+5, INJPP+6, INJPP+7, INJPP+8, INJPP+9
, INJPP+10, INJPP+11, INJPP+12
DIR HEADER+2!
DIR(0 HEADER+2*
DT HEADER1+2
>> DTOUT HEADER+2
DUZ HEADER1+2, USR+1
DUZ(2 HEADER1+4, LOC+1
>> E INJ+7*, INJ+11*
>> I INJ+4*, INJ+9*
IO HEADER+2
IO(0 HEADER+2
IOF HEADER1+1
IOM CTR+1
IOSL INJPP+4, INJPP+16
IOST HEADER+2
>> J INJ+4*, INJ+6, INJ+7, INJ+9*, INJ+10, INJ+11
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
>> T INJ+3*, INJ+4, INJ+8*, INJ+9
U INJ+3, INJ+4, INJ+6, INJ+7, INJ+8, INJ+9, INJ+10, INJ+11, INJPP+5, INJPP+6
, INJPP+7, INJPP+8, INJPP+9, INJPP+10, INJPP+11, INJPP+12, INJPP+17, INJPP+18, INJPP+19, V+1
, HEADER1+2, HEADER1+4, USR+1, LOC+1
X INJ+4*, INJ+6, INJ+7, INJ+9*, INJ+10, INJ+11, 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 INJ+6*, INJ+7*, INJ+10*, INJ+11*, HEADER+2, CTR~, CTR+1
Z INJ+7*, INJ+11*, 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