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

Package: IFCAP

Routine: PRCPRCTP


Information

PRCPRCTP ;WISC/RFJ/DST-cost trend analysis (primary) ;26 May 93

Source Information

Source file <PRCPRCTP.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
IFCAP 6 ($$SCRPAUSE,END,P)^PRCPUREP  $$SUMMARY^PRCPURS0  MONTHSEL^PRCPURS2  ITEMSEL^PRCPURS4  ($$DESCR,$$UNIT)^PRCPUX1  ($$ODITEM,DISPLAY)^PRCPUX2  
Kernel 3 ^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  
VA FileMan 2 DD^%DT  (C,NOW)^%DTC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IFCAP 1 PRCPRCTA  

Entry Points

Name Comments DBIA/ICR reference
PRIMARY ; cost trend analysis for primary
; There is no Cost Trend Analysis for secondary
DQ ; queue starts here
Q
H

External References

Name Field # of Occurrence
DD^%DT DQ+15, DQ+16
C^%DTC DQ+11
NOW^%DTC DQ+15
^%ZIS PRIMARY+13
^%ZISC Q
^%ZTLOAD PRIMARY+13
$$S^%ZTLOAD DQ+19
$$SCRPAUSE^PRCPUREP DQ+17
END^PRCPUREP DQ+36
P^PRCPUREP DQ+20, DQ+35
$$SUMMARY^PRCPURS0 PRIMARY+12
MONTHSEL^PRCPURS2 PRIMARY+9
ITEMSEL^PRCPURS4 PRIMARY+11
$$DESCR^PRCPUX1 DQ+5, DQ+25
$$UNIT^PRCPUX1 DQ+25
$$ODITEM^PRCPUX2 DQ+23
DISPLAY^PRCPUX2 PRIMARY+7, PRIMARY+8, PRIMARY+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PRIMARY+10
Function Call: WRITE
  • Prompt: !
  • Line Location: PRIMARY+13
Function Call: WRITE
  • Prompt: !!,"<*> please wait <*>"
  • Line Location: PRIMARY+16
Function Call: WRITE
  • Prompt: !?10,"<<< TASKMANAGER JOB TERMINATED BY USER >>>"
  • Line Location: DQ+19
Function Call: WRITE
  • Prompt: !!,$E($$DESCR^PRCPUX1(PRCP("I"),ITEMDA),1,33),?35,$J(ITEMDA,6),?42,$S(ODI="Y":"D",1:""),?43,$J($$UNIT^PRCPUX1(PRCP("I"),ITEMDA,"/"),8)
  • Line Location: DQ+25
Function Call: WRITE
  • Prompt: $J($P(D,"^"),9,2),$J($P(D,"^",2),10,2),$J($P(D,"^",3),10,2)
  • Line Location: DQ+27
Function Call: WRITE
  • Prompt: !?5,HDR,!?5,DATA
  • Line Location: DQ+34
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $C(13),"COST TREND ANALYSIS FOR: ",$E(PRCP("IN"),1,20),?(80-$L(%)),%
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !?5,"CUM AVG CALCULATED FROM DATE RANGE: ",DATESDT," TO ",DATEEDT
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,"DESCRIPTION",?38,"IM",?42,"OD",$J("UNIT/IS",9),$J("CUM AVG",9),$J(CURDT,9),$J("%CHANGE",9),!,%
  • Line Location: H+3
Routine Call
  • %ZIS
  • Line Location:
    • PRIMARY+13

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCP(445 - [#445] DQ+3, DQ+21
^PRCP(445.1 - [#445.1] DQ+8, DQ+12
^TMP($J PRIMARY+11, DQ+2!, DQ+4, DQ+9*, DQ+13*, DQ+18, DQ+26, DQ+31, Q!

Label References

Name Line Occurrences
H DQ+17, DQ+20, DQ+35
Q PRIMARY+13

Naked Globals

Name Field # of Occurrence
^( DQ+31

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PRIMARY+2~, DQ+15, DQ+32*, H*, H+1, H+3*
%H PRIMARY+2~
%I PRIMARY+2~
>> %ZIS PRIMARY+13*
AVG DQ+1~, DQ+12*, DQ+13
CHANGE DQ+1~, DQ+12*, DQ+13
COUNT DQ+1~, DQ+6*, DQ+10*, DQ+12, DQ+31*
CURDT DQ+1~, DQ+15*, H+3
CURRENT DQ+1~, DQ+12*, DQ+13
D DQ+1~, DQ+8*, DQ+9, DQ+10, DQ+26*, DQ+27, DQ+31*, DQ+33
DATA DQ+1~, DQ+30*, DQ+33*, DQ+34
DATE DQ+1~, DQ+7*, DQ+8, DQ+9, DQ+11*, DQ+29*, DQ+31*, DQ+32
DATEEDT DQ+1~, DQ+16*, H+2
DATEEND PRIMARY+2~, PRIMARY+9, DQ+7, DQ+16
DATESDT DQ+1~, DQ+16*, H+2
DATESTRT PRIMARY+2~, DQ+7, DQ+16
DESCR DQ+1~, DQ+5*, DQ+9, DQ+13, DQ+18*, DQ+26, DQ+31
DT DQ+12, DQ+15
HDR DQ+1~, DQ+30*, DQ+32*, DQ+34
IO DQ+17
IO("Q" PRIMARY+13!
IOF H
IOSL DQ+20, DQ+35
ITEMDA DQ+1~, DQ+3*, DQ+4, DQ+5, DQ+8, DQ+9, DQ+12, DQ+13, DQ+18*, DQ+21
, DQ+23, DQ+25, DQ+26, DQ+31
ITEMDATA DQ+1~, DQ+21*
NOW DQ+1~, DQ+15*, H
NSN DQ+1~
ODI PRIMARY+3~, DQ+23*, DQ+25
PAGE DQ+1~, DQ+17*, H*
>> POP PRIMARY+13
>> PRCP("I" DQ+3, DQ+5, DQ+8, DQ+12, DQ+21, DQ+23, DQ+25
>> PRCP("IN" H+1
PRCPALLI PRIMARY+2~, PRIMARY+11, DQ+4
PRCPFLAG DQ+1~, DQ+18, DQ+19*, DQ+20, DQ+29, DQ+35, DQ+36
PRCPSUMM PRIMARY+2~, PRIMARY+12*, DQ+28
SCREEN DQ+1~, DQ+17*, DQ+20, DQ+35, H
TOTAL DQ+1~, DQ+6*, DQ+10*, DQ+12
X PRIMARY+2~, PRIMARY+4!, PRIMARY+7, PRIMARY+8!, PRIMARY+10!, DQ+11
X(1 PRIMARY+4*, PRIMARY+8*, PRIMARY+10*
X(2 PRIMARY+5*
X(3 PRIMARY+6*
X1 PRIMARY+2~, DQ+11*
X2 PRIMARY+2~, DQ+11*
Y PRIMARY+2~, DQ+15*, DQ+16*
>> ZTDESC PRIMARY+14*
>> ZTQUEUED DQ+19
>> ZTRTN PRIMARY+14*
>> ZTSAVE("DATE*" PRIMARY+15*
>> ZTSAVE("PRCP*" PRIMARY+15*
>> ZTSAVE("ZTREQ" PRIMARY+15*
>> ZTSAVE("^TMP($J,""PRCPURS4""," PRIMARY+15*
ZTSK PRIMARY+13!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All