Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

Entry Points

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

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
Info |  Source |  Entry Points |  Interaction Calls