Routine: PRCPRISW

Information

PRCPRISW ;WISC/RFJ-inventory sales (print whse) ;24 May 93

Name	Comments	DBIA/ICR reference
PRINT	; print whse report
H

Name	Line Occurrences
Function Call: WRITE	Prompt: !?10,"<<< TASKMANAGER JOB TERMINATED BY USER >>>" Line Location: PRINT+20
Function Call: WRITE	Prompt: ! Line Location: PRINT+31
Function Call: WRITE	Prompt: ! Condition for execution: $X>20 Line Location: PRINT+35
Function Call: WRITE	Prompt: ?27,"TOTALS BY DISTR. PT: ",$J(TOTALQ,10),$J(TOTALV,22,2) Line Location: PRINT+35
Function Call: WRITE	Prompt: !!,"TOTAL SALES TO DISTRIBUTION POINTS:" Line Location: PRINT+40
Function Call: WRITE	Prompt: !?10,DISTRPT,?40,$J(%,20,2) Line Location: PRINT+42
Function Call: WRITE	Prompt: !?10,"TOTAL",?40,$J(TOTALV,20,2) Line Location: PRINT+46
Function Call: WRITE	Prompt: @IOF Line Location: H+0
Function Call: WRITE	Prompt: $C(13),"INVENTORY SALES FOR: ",$E(PRCP("IN"),1,20),?(80-$L(%)),% Line Location: H+1
Function Call: WRITE	Prompt: !?5,"INVENTORY SALES DATE RANGE: ",DATESDT," TO ",DATEEDT Line Location: H+2
Function Call: WRITE	Prompt: !?1,"* ONLY SUMMARY OF SALES PRINTED *",!,% Line Location: H+4
Function Call: WRITE	Prompt: !,"NSN",?15,"DESCRIPTION",?37,"DATE ISSUED",$J("QUANTITY",10),$J("SELL COST",10),$J("TOTAL VALUE",12),!,% Line Location: H+5