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 |  Local Variables  | All
Print Page as PDF
Routine: PRCPRQDP

Package: IFCAP

Routine: PRCPRQDP


Information

PRCPRQDP ;WISC/RFJ-quantity distribution report (primary) ;10 Jun 93

Source Information

Source file <PRCPRQDP.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
IFCAP 4 ($$SCRPAUSE,END,P)^PRCPUREP  ITEMSEL^PRCPURS4  ($$DESCR,$$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 PRCPRQDR  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**1**;Oct 20, 2000
PRIMARY ; quantity distribution report for primary
SECONDY ; quantity distribution report for secondary
DQ ; queue starts here
SELECT
COMPILE
PRINT
Q
H

External References

Name Field # of Occurrence
DD^%DT DQ+5, DQ+9, PRINT, PRINT+1
C^%DTC DQ+4, DQ+8
NOW^%DTC PRINT+1
^%ZIS SECONDY+12
^%ZISC Q
^%ZTLOAD SECONDY+12
$$S^%ZTLOAD PRINT+4
$$SCRPAUSE^PRCPUREP PRINT+2
END^PRCPUREP PRINT+30
P^PRCPUREP PRINT+5
ITEMSEL^PRCPURS4 SECONDY+9
$$DESCR^PRCPUX1 COMPILE+4
$$UNIT^PRCPUX1 PRINT+8
DISPLAY^PRCPUX2 SECONDY+6, SECONDY+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: SECONDY+8
Function Call: WRITE
  • Prompt: !
  • Line Location: SECONDY+12
Function Call: WRITE
  • Prompt: !!,"<*> please wait <*>"
  • Line Location: SECONDY+15
Function Call: WRITE
  • Prompt: !?10,"<<< TASKMANAGER JOB TERMINATED BY USER >>>"
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !!,DESCR,?34,ITEMDA
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: ?39,$J($$UNIT^PRCPUX1(PRCP("I"),ITEMDA,"/"),7)
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: $J($P(ITEMDATA,"^",10),6)
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: $J($P(ITEMDATA,"^",4),7)
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: $J($P(ITEMDATA,"^",23),7)
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: $J($P(ITEMDATA,"^",11),7)
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: $J($P(ITEMDATA,"^",9),7)
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !,H(0),?79,"^",!,Q(0),?79,"|",!,V(0),?79,"v",!,H(1),!,Q(1),!,V(1)
  • Line Location: PRINT+28
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $C(13),"QUANTITY DISTRIBUTION REPORT FOR: ",$E(PRCP("IN"),1,20),?(80-$L(%)),%
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !?5,"QUANTITY DISTRIBUTION DATE RANGE: ",DATESDT," TO ",DATEEDT
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !?46,$J("STAND",6),$J("OPT",7),$J("TEMP",7),$J("EMER",7),$J("NORM",7),!,"DESCRIPTION",?34,"MI#",?39,$J("UNIT/IS",7),$J("REOPT",6),$J("REOPT",7),$J("S.LVL",7),$J("S.LVL",7),$J("S.LVL",7)
  • Line Location: H+4
Function Call: WRITE
  • Prompt: !,%
  • Line Location: H+5
Routine Call
  • %ZIS
  • Line Location:
    • SECONDY+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCP(445 - [#445] PRINT+6
^PRCP(445.2 - [#445.2] DQ+12, COMPILE, COMPILE+1
^TMP($J SECONDY+10, DQ+10!, COMPILE+3, COMPILE+7, COMPILE+8*, PRINT+3, PRINT+16, Q!

Label References

Name Line Occurrences
COMPILE SELECT, SELECT+1
H PRINT+2, PRINT+5
PRINT DQ+13
Q SECONDY+12, PRINT+29
SELECT DQ+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DQ+1~, COMPILE+7*, COMPILE+8, PRINT+1, H*, H+1, H+3*, H+5
%H DQ+1~
%I DQ+1~
>> %ZIS SECONDY+12*
COUNT DQ+1~, PRINT+15*, PRINT+23*, PRINT+24*
CURRENT DQ+1~, DQ+3*, DQ+7, DQ+12
DA DQ+1~, COMPILE*, COMPILE+1
DATA DQ+1~, COMPILE+1*, COMPILE+2, COMPILE+5*, COMPILE+6*, COMPILE+8
DATE DQ+1~, DQ+6*, DQ+7*, DQ+11*, DQ+12*, COMPILE, COMPILE+7, COMPILE+8, PRINT+15*, PRINT+16*
, PRINT+20
DATEDAT DQ+1~, DQ+2!
DATEDAT( DQ+5*, DQ+9*, PRINT+16, PRINT+20
DATEEDT DQ+1~, PRINT*, H+2
DATESDT DQ+1~, PRINT*, H+2
DATESTRT DQ+1~, DQ+4*, DQ+6, DQ+11, PRINT
DESCR DQ+1~, COMPILE+4*, COMPILE+7, COMPILE+8, PRINT+3*, PRINT+7, PRINT+16
DT DQ+3, PRINT
H DQ+1~
H( PRINT+20*
H(0 PRINT+14*, PRINT+28
H(1 PRINT+14*, PRINT+25*, PRINT+28
IO PRINT+2
IO("Q" SECONDY+12!
IOF H
IOSL PRINT+5
ITEMDA DQ+1~, COMPILE+2*, COMPILE+3, COMPILE+4, COMPILE+7, COMPILE+8, PRINT+3*, PRINT+6, PRINT+7, PRINT+8
, PRINT+16
ITEMDATA DQ+1~, PRINT+6*, PRINT+9, PRINT+10, PRINT+11, PRINT+12, PRINT+13
L DQ+1~, PRINT+15*, PRINT+20, PRINT+21, PRINT+22, PRINT+24*
NOW DQ+1~, PRINT+1*, H
PAGE DQ+1~, PRINT+2*, H*
>> POP SECONDY+12
>> PRCP("DPTYPE" SECONDY+4, SELECT, SELECT+1
>> PRCP("I" DQ+12, COMPILE, COMPILE+4, PRINT+6, PRINT+8
>> PRCP("IN" H+1
PRCPALLI SECONDY+1~, SECONDY+10, COMPILE+3
PRCPDATA DQ+1~, PRINT+16*, PRINT+17, PRINT+18, PRINT+19
PRCPFLAG DQ+1~, PRINT+3, PRINT+4*, PRINT+5, PRINT+29
Q DQ+1~
Q( PRINT+21*
Q(0 PRINT+14*, PRINT+28
Q(1 PRINT+14*, PRINT+26*, PRINT+28
QTY DQ+1~, PRINT+17*, PRINT+21
SCREEN DQ+1~, PRINT+2*, PRINT+5, H
TOTALC DQ+1~, PRINT+15*, PRINT+19*, PRINT+26, PRINT+27
TOTALQ DQ+1~, PRINT+15*, PRINT+19*, PRINT+26
TOTALV DQ+1~, PRINT+15*, PRINT+19*, PRINT+27
TYPE DQ+1~, SELECT*, SELECT+1*, COMPILE
V DQ+1~
V( PRINT+22*
V(0 PRINT+14*, PRINT+28
V(1 PRINT+14*, PRINT+27*, PRINT+28
VALUE DQ+1~, PRINT+18*, PRINT+22
X SECONDY+1~, SECONDY+2!, SECONDY+6, SECONDY+8!, DQ+1~, DQ+4, DQ+5, DQ+7, DQ+8, DQ+9
X(1 SECONDY+3*, SECONDY+4*, SECONDY+5*, SECONDY+8*
>> X1 DQ+3*, DQ+7*
>> X2 DQ+3*, DQ+7*
Y DQ+1~, DQ+4*, DQ+5, DQ+8*, DQ+9, PRINT*, PRINT+1*
>> ZTDESC SECONDY+13*
>> ZTQUEUED PRINT+4
>> ZTRTN SECONDY+13*
>> ZTSAVE("PRCP*" SECONDY+14*
>> ZTSAVE("ZTREQ" SECONDY+14*
>> ZTSAVE("^TMP($J,""PRCPURS4""," SECONDY+14*
ZTSK SECONDY+12!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All