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

Package: IFCAP

Routine: PRCPCRDC


Information

PRCPCRDC ;WISC/RFJ-case cart definition ;01 Sep 93

Source Information

Source file <PRCPCRDC.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
IFCAP 7 CASECART^PRCPCRU1  $$STORAGE^PRCPESTO  ($$MANDSRCE,$$REUSABLE)^PRCPU441  ($$SCRPAUSE,$$USER,END,P)^PRCPUREP  ^PRCPUSEL  ($$DESCR,$$INVNAME)^PRCPUX1  DISPLAY^PRCPUX2  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 2 DD^%DT  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 CC DEFINITION REPORT  

Entry Points

Name Comments DBIA/ICR reference
DQ ; queue starts here
Q
PRINT ; print a case cart definition
H

External References

Name Field # of Occurrence
DD^%DT PRINT+4, PRINT+6
NOW^%DTC PRINT+6
^%ZIS PRCPCRDC+10
^%ZISC Q
^%ZTLOAD PRCPCRDC+10
CASECART^PRCPCRU1 PRCPCRDC+7
$$STORAGE^PRCPESTO PRINT+5, PRINT+9
$$MANDSRCE^PRCPU441 PRINT+8
$$REUSABLE^PRCPU441 PRINT+10
$$SCRPAUSE^PRCPUREP DQ+2
$$USER^PRCPUREP PRINT+4
END^PRCPUREP PRINT+19
P^PRCPUREP DQ+5, PRINT+12, PRINT+14, PRINT+17
^PRCPUSEL PRCPCRDC+3
$$DESCR^PRCPUX1 PRINT+4, PRINT+11
$$INVNAME^PRCPUX1 PRINT+3
DISPLAY^PRCPUX2 PRCPCRDC+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"NOTE -- This option will use a lot of paper!"
  • Line Location: PRCPCRDC+9
Function Call: WRITE
  • Prompt: !
  • Line Location: PRCPCRDC+10
Function Call: WRITE
  • Prompt: !!,"<*> please wait <*>"
  • Line Location: PRCPCRDC+13
Function Call: WRITE
  • Prompt: !,$J(+$P(DATA,"^",2),7),?10,$E($$DESCR^PRCPUX1(PRCPINPT,ITEMDA),1,20),?31,ITEMDA,?38,REUSABLE,?40,VENDOR,?48,CATALOG,?67,$E(LOCATION,1,12)
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: !!,"SPECIAL INSTRUCTIONS/REMARKS:"
  • Line Location: PRINT+15
Function Call: WRITE
  • Prompt: !,DATA
  • Line Location: PRINT+18
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $C(13),"DEFINITION OF CASE CART REPORT FOR: ",$E(PRCPINNM,1,20),?(80-$L(%)),%
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !?9,"NAME: ",CCNAME," (#",CCITEM,") ",?46,"LOCATION: ",CCLOC
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !?15,"CURRENT QUANTITY ASSEMBLED: ",ONHAND
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !?3,"CREATED BY: ",CCUSER,?50,"DATE: ",CCDATE
  • Line Location: H+4
Function Call: WRITE
  • Prompt: !?1,"LAST EDIT BY: ",EDITUSER,?50,"DATE: ",EDITDATE
  • Line Location: H+5
Function Call: WRITE
  • Prompt: !,$J("QTY",7),?10,"DESCRIPTION",?31,"MI#",?37,"RD",?40,"VEND#",?48,"CATALOG#",?67,"LOCATION",!,%
  • Line Location: H+7
Routine Call
  • %ZIS
  • Line Location:
    • PRCPCRDC+10

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(441 - [#441] PRINT+8
^PRCP(445 - [#445] PRINT+5
^PRCP(445.7 - [#445.7] DQ+3, DQ+5, PRINT+2, PRINT+7, PRINT+16
^TMP($J PRCPCRDC+8, DQ+7, Q!

Label References

Name Line Occurrences
H PRINT+6, PRINT+12, PRINT+14, PRINT+17
PRINT DQ+4, DQ+7
Q PRCPCRDC+10

Naked Globals

Name Field # of Occurrence
^( PRINT+7, PRINT+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PRINT+1~, PRINT+6, H*, H+1, H+6*, H+7
%I PRINT+1~
>> %ZIS PRCPCRDC+10*
ALLCARTS PRCPCRDC+4~, PRCPCRDC+8, PRCPCRDC+9, DQ+3, DQ+7
CATALOG PRINT+1~, PRINT+8*, PRINT+11
CCDATA PRINT+1~, PRINT+2*, PRINT+3, PRINT+4
CCDATE PRINT+1~, PRINT+4*, H+4
CCITEM DQ+1~, DQ+3*, DQ+5, DQ+7*, PRINT+2, PRINT+4, PRINT+5, PRINT+7, PRINT+16, H+2
CCLOC PRINT+1~, PRINT+5*, H+2
CCNAME PRINT+1~, PRINT+4*, H+2
CCUSER PRINT+1~, PRINT+4*, H+4
DATA PRINT+1~, PRINT+7*, PRINT+11, PRINT+16*, PRINT+18
EDITDATE PRINT+1~, PRINT+4*, H+5
EDITUSER PRINT+1~, PRINT+4*, H+5
IO PRINT+6
IO("Q" PRCPCRDC+10!
IOF H
IOSL PRINT+12, PRINT+14, PRINT+17
ITEMDA PRINT+1~, PRINT+7*, PRINT+8, PRINT+9, PRINT+10, PRINT+11
LOCATION PRINT+1~, PRINT+9*, PRINT+11
NOW PRINT+1~, PRINT+6*, H
ONHAND PRINT+1~, PRINT+5*, H+3
PAGE PRINT+1~, PRINT+6*, H*
>> POP PRCPCRDC+10
>> PRCP("I" PRCPCRDC+3
PRCPFLAG DQ+1~, DQ+3, DQ+4, PRINT+7, PRINT+12, PRINT+13, PRINT+14, PRINT+16, PRINT+17
PRCPINNM PRINT+1~, PRINT+3*, H+1
PRCPINPT PRINT+1~, PRINT+3*, PRINT+4, PRINT+5, PRINT+9, PRINT+11
REUSABLE PRINT+1~, PRINT+10*, PRINT+11
SCREEN DQ+1~, DQ+2*, DQ+5, PRINT+12, PRINT+14, PRINT+17, H
VENDOR PRINT+1~, PRINT+8*, PRINT+11
X PRCPCRDC+4~, PRCPCRDC+5!, PRCPCRDC+6, DQ+1~, PRINT+16*
X(1 PRCPCRDC+5*
Y DQ+1~, PRINT+4*, PRINT+6*
>> ZTDESC PRCPCRDC+11*
>> ZTRTN PRCPCRDC+11*
>> ZTSAVE("ALLCARTS" PRCPCRDC+12*
>> ZTSAVE("PRCP*" PRCPCRDC+12*
>> ZTSAVE("ZTREQ" PRCPCRDC+12*
>> ZTSAVE("^TMP($J,""PRCPCARTS""," PRCPCRDC+12*
ZTSK PRCPCRDC+10!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All