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

Package: IFCAP

Routine: PRCPRSO1


Information

PRCPRSO1 ;WISC/RFJ/VAC-days of stock on hand report (print) ; 9/20/06 11:15am

Source Information

Source file <PRCPRSO1.m>

Entry Points

Name Comments DBIA/ICR reference
PRINT ; print report
WHSE ; print whse report
PRIMARY ; print primary or secondary report
H

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?38,"TOTAL SELLING VALUE IN STOCK: ",$J(TOTAL,12,2)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !?10,"<<< TASKMANAGER JOB TERMINATED BY USER >>>"
  • Line Location: WHSE+2
Function Call: WRITE
  • Prompt: !,$TR(NSN,"-"),?15,$E($$DESCR^PRCPUX1(PRCP("I"),ITEMDA),1,15),?31,ITEMDA,?37,$J($$UNIT^PRCPUX1(PRCP("I"),ITEMDA,"/"),8)
  • Line Location: WHSE+3
Function Call: WRITE
  • Prompt: ?45,$J($P(D,"^"),7),$J($P(D,"^",2),7),$J($P(D,"^",3),6),$J($P(D,"^",4),6),$J($P(D,"^",5),9)
  • Line Location: WHSE+10
Function Call: WRITE
  • Prompt: !?10,"<<< TASKMANAGER JOB TERMINATED BY USER >>>"
  • Line Location: PRIMARY+2
Function Call: WRITE
  • Prompt: !!?5,"GROUP: ",$S(GROUP=" ":"<<NONE>>",1:GROUP)
  • Line Location: PRIMARY+4
Function Call: WRITE
  • Prompt: !,$E($$DESCR^PRCPUX1(PRCP("I"),ITEMDA),1,30),?31,ITEMDA,?37,$J($$UNIT^PRCPUX1(PRCP("I"),ITEMDA,"/"),8)
  • Line Location: PRIMARY+6
Function Call: WRITE
  • Prompt: ?45,$J($P(D,"^"),7),$J($P(D,"^",2),7),$J($P(D,"^",3),6),$J($P(D,"^",4),6),$J($P(D,"^",5),9)
  • Line Location: PRIMARY+13
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $C(13),"DAYS OF STOCK ON HAND REPORT: ",$E(PRCP("IN"),1,20),?(80-$L(%)),%
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !?5,"USAGE DATE RANGE FROM ",DATESTRD," TO ",DATEENDD," (",TOTALDAY," DAYS)"
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !?5,"ITEMS WITH STOCK ON HAND ",$S(PRCPTYPE=1:"LESS",1:"GREATER")," THAN ",PRCPDAYS," DAYS"
  • Line Location: H+4
Function Call: WRITE
  • Prompt: !?5,"REPORT SHOWS STANDARD ITEMS ONLY"
  • Line Location: H+6
Function Call: WRITE
  • Prompt: !?5,"REPORT SHOWS ON-DEMAND ITEMS ONLY"
  • Line Location: H+7
Function Call: WRITE
  • Prompt: !?5,"REPORT SHOWS BOTH STANDARD AND ON-DEMAND ITEMS"
  • Line Location: H+8
Function Call: WRITE
  • Prompt: !?45,$J("TOTAL",7),$J("DAYS",7),$J("QTY",6),$J("DAYS",6),$J("SELL",9)
  • Line Location: H+9
Function Call: WRITE
  • Prompt: !,"NSN",?15,"DESCRIPTION"
  • Line Location: H+10
Function Call: WRITE
  • Prompt: !,"DESCRIPTION"
  • Line Location: H+11
Function Call: WRITE
  • Prompt: ?31,"IM",$J("UNIT/IS",12),?45,$J("USAGE",7),$J("AVG",7),$J("ONHND",6),$J("LEFT",6),$J("VALUE",9),!,%
  • Line Location: H+12
Info |  Source |  Entry Points |  Interaction Calls