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

Package: IFCAP

Routine: PRCPRCTA


Information

PRCPRCTA ;WISC/RFJ-cost trend analysis (option, whse) ;26 May 93

Source Information

Source file <PRCPRCTA.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
IFCAP 7 PRIMARY^PRCPRCTP  ($$SCRPAUSE,END,P)^PRCPUREP  ($$SUMMARY,NSNSEL)^PRCPURS0  MONTHSEL^PRCPURS2  ^PRCPUSEL  ($$DESCR,$$NSN,$$UNIT)^PRCPUX1  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 PRCP COST TREND ANALYSIS  

Entry Points

Name Comments DBIA/ICR reference
DQ ; queue starts here
H

External References

Name Field # of Occurrence
DD^%DT DQ+15, DQ+16
C^%DTC DQ+11
NOW^%DTC DQ+15
^%ZIS PRCPRCTA+17
^%ZISC DQ+34
^%ZTLOAD PRCPRCTA+17
$$S^%ZTLOAD DQ+19
PRIMARY^PRCPRCTP PRCPRCTA+4
$$SCRPAUSE^PRCPUREP DQ+17
END^PRCPUREP DQ+33
P^PRCPUREP DQ+20, DQ+32
$$SUMMARY^PRCPURS0 PRCPRCTA+16
NSNSEL^PRCPURS0 PRCPRCTA+15
MONTHSEL^PRCPURS2 PRCPRCTA+13
^PRCPUSEL PRCPRCTA+3
$$DESCR^PRCPUX1 DQ+22
$$NSN^PRCPUX1 DQ+4
$$UNIT^PRCPUX1 DQ+22
DISPLAY^PRCPUX2 PRCPRCTA+11, PRCPRCTA+12, PRCPRCTA+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PRCPRCTA+14
Function Call: WRITE
  • Prompt: !
  • Line Location: PRCPRCTA+17
Function Call: WRITE
  • Prompt: !!,"<*> please wait <*>"
  • Line Location: PRCPRCTA+20
Function Call: WRITE
  • Prompt: !?10,"<<< TASKMANAGER JOB TERMINATED BY USER >>>"
  • Line Location: DQ+19
Function Call: WRITE
  • Prompt: !!,$TR(NSN,"-"),?15,$E($$DESCR^PRCPUX1(PRCP("I"),ITEMDA),1,18),?34,$J(ITEMDA,6),$J($$UNIT^PRCPUX1(PRCP("I"),ITEMDA,"/"),10)
  • Line Location: DQ+22
Function Call: WRITE
  • Prompt: $J($P(D,"^"),10,2),$J($P(D,"^",2),10,2),$J($P(D,"^",3),10,2)
  • Line Location: DQ+24
Function Call: WRITE
  • Prompt: !?5,HDR,!?5,DATA
  • Line Location: DQ+31
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: !,"NSN",?15,"DESCRIPTION",?38,"MI",$J("UNIT/IS",10),$J("CUM AVG",10),$J(CURDT,10),$J("%CHANGE",10),!,%
  • Line Location: H+3
Routine Call
  • %ZIS
  • Line Location:
    • PRCPRCTA+17

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 DQ+2!, DQ+9*, DQ+13*, DQ+18, DQ+23, DQ+28, DQ+34!

Label References

Name Line Occurrences
H DQ+17, DQ+20, DQ+32

Naked Globals

Name Field # of Occurrence
^( DQ+28

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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