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 |  Marked Items  | All
Print Page as PDF
Routine: PRCPRCOS

Package: IFCAP

Routine: PRCPRCOS


Information

PRCPRCOS ;WISC/RFJ-unit costing report (whse) ;28 Jan 92

Source Information

Source file <PRCPRCOS.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
IFCAP 4 $$MANDSRCE^PRCPU441  ($$SCRPAUSE,END,P)^PRCPUREP  ^PRCPUSEL  ($$DESCR,$$NSN,$$SKU,$$UNITVAL)^PRCPUX1  
Kernel 3 ^%ZIS  ^%ZISC  (,$$S)^%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 UNIT COSTING REPORT  

Entry Points

Name Comments DBIA/ICR reference
DQ ;queue comes here
H
TEXT ;;display info text
TEXTEND ;;display help at end of report

External References

Name Field # of Occurrence
DD^%DT DQ+2
NOW^%DTC DQ+2
^%ZIS PRCPRCOS+7
^%ZISC DQ+15
^%ZTLOAD PRCPRCOS+7
$$S^%ZTLOAD DQ+11
$$MANDSRCE^PRCPU441 DQ+5
$$SCRPAUSE^PRCPUREP DQ+2
END^PRCPUREP DQ+14
P^PRCPUREP DQ+10, DQ+13
^PRCPUSEL PRCPRCOS+3
$$DESCR^PRCPUX1 DQ+7
$$NSN^PRCPUX1 DQ+4
$$SKU^PRCPUX1 DQ+6
$$UNITVAL^PRCPUX1 DQ+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"THIS OPTION CAN ONLY BE USED BY THE WAREHOUSE INVENTORY POINT."
  • Line Location: PRCPRCOS+3
Function Call: WRITE
  • Prompt: !!,"THERE IS NOT A VENDOR IN THE VENDOR FILE (#440) DESIGNATED AS A SUPPLY WHSE."
  • Line Location: PRCPRCOS+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRCPRCOS+6
Function Call: WRITE
  • Prompt: !,X
  • Line Location: PRCPRCOS+6
Function Call: WRITE
  • Prompt: !!,"<*> please wait <*>"
  • Line Location: PRCPRCOS+10
Function Call: WRITE
  • Prompt: !!,$TR(NSN,"-"),?14,$E($P(DATA,"^"),1,14),?29,$J(ITEMDA,6),$J($P(DATA,"^",2),8),?48,$P(DATA,"^",3),?50,$P(DATA,"^",4),$P(DATA,"^",5),$P(DATA,"^",6)
  • Line Location: DQ+9
Function Call: WRITE
  • Prompt: !?10,"<<< TASKMANAGER JOB TERMINATED BY USER >>>"
  • Line Location: DQ+11
Function Call: WRITE
  • Prompt: !!?20,">> NO ITEMS FOUND <<"
  • Line Location: DQ+12
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+13
Function Call: WRITE
  • Prompt: !?6,X
  • Line Location: DQ+13
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $C(13),"UNIT COSTING REPORT FOR: ",$E(PRCP("IN"),1,12),?(80-$L(%)),%
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,"NSN",?15,"DESCRIPTION",?33,"MI",?37,"UNIT/ISS",?47,"SKU",?53,"AVGCOST",?62,"LASTCOST",?72,"UNITCOST",!,%
  • Line Location: H+2
Routine Call
  • %ZIS
  • Line Location:
    • PRCPRCOS+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(440 - [#440] PRCPRCOS+5
^PRC(441 - [#441] DQ+5
^PRCP(445 - [#445] DQ+3, DQ+4
^TMP($J DQ+2!, DQ+7*, DQ+8, DQ+12, DQ+15!

Label References

Name Line Occurrences
H DQ+2, DQ+10, DQ+13

Naked Globals

Name Field # of Occurrence
^( DQ+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PRCPRCOS+6*, DQ+1~, DQ+2, DQ+13*, H*, H+1, H+2*
%I DQ+1~
>> %ZIS PRCPRCOS+7*
DATA DQ+1~, DQ+4*, DQ+7, DQ+8*, DQ+9
IO DQ+2
IO("Q" PRCPRCOS+7!
IOF H
IOSL DQ+10, DQ+13
ITEMDA DQ+1~, DQ+3*, DQ+4, DQ+5, DQ+6, DQ+7, DQ+8*, DQ+9
NOW DQ+1~, DQ+2*, H
NSN DQ+1~, DQ+4*, DQ+7, DQ+8*, DQ+9
PAGE DQ+1~, DQ+2*, H*
>> POP PRCPRCOS+7
>> PRCP("DPTYPE" PRCPRCOS+3
>> PRCP("I" PRCPRCOS+3, DQ+3, DQ+4, DQ+6, DQ+7
>> PRCP("IN" H+1
PRCPFLAG DQ+1~, DQ+8, DQ+10, DQ+11*, DQ+13, DQ+14
SCREEN DQ+1~, DQ+2*, DQ+10, DQ+13, H
SKU DQ+1~, DQ+6*, DQ+7
UNITCOST DQ+1~, DQ+5*, DQ+7
WHSESRCE PRCPRCOS+4~, PRCPRCOS+5*, DQ+5
X PRCPRCOS+4~, PRCPRCOS+6*, DQ+13*
Y PRCPRCOS+4~, DQ+2*
>> ZTDESC PRCPRCOS+8*
>> ZTQUEUED DQ+11
>> ZTRTN PRCPRCOS+8*
>> ZTSAVE("PRCP*" PRCPRCOS+9*
>> ZTSAVE("WHSE*" PRCPRCOS+9*
>> ZTSAVE("ZTREQ" PRCPRCOS+9*
ZTSK PRCPRCOS+7!

Marked Items

Name Field # of Occurrence
$T(TEXT+% PRCPRCOS+6
$T(TEXTEND+% DQ+13
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All