Routine: PRCPRAVL

Information

PRCPRAVL ;WISC/RFJ-availability list report (option, whse) ;9.9.97

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: PRCPRAVL+11
Function Call: WRITE	Prompt: ! Line Location: DEVICE+0
Function Call: WRITE	Prompt: !!,"<> please wait <>" Line Location: DEVICE+3
Function Call: WRITE	Prompt: !?10,"<<< TASKMANAGER JOB TERMINATED BY USER >>>" Line Location: DQ+27
Function Call: WRITE	Prompt: !?20,$J("ISSUE+NONISSUE",20),$J("ESTIMATED",20) Line Location: DQ+30
Function Call: WRITE	Prompt: !?2,"TOTALS :",?20,$J("INVENTORY VALUE",20),$J("NONISSUABLE VALUE",20),$J("SELLING VALUE",20),!?2,"--------",?20,$J("---------------",20),$J("------------------",20),$J("-------------",20) Line Location: DQ+31
Function Call: WRITE	Prompt: !?2,"ACCT ",ACCT," :",?20,$J($G(TOTINV(ACCT)),20,2),$J($G(TOTNON(ACCT)),20,2),$J($G(TOTSEL(ACCT)),20,2) Line Location: DQ+33
Function Call: WRITE	Prompt: !?2,"--------",?20,$J("---------------",20),$J("------------------",20),$J("-------------",20) Line Location: DQ+35
Function Call: WRITE	Prompt: !?2,"TOTALS :",?20,$J(TOTINV,20,2),$J(TOTNON,20,2),$J(TOTSEL,20,2) Line Location: DQ+36
Function Call: WRITE	Prompt: @IOF Line Location: H+0
Function Call: WRITE	Prompt: $C(13),"AVAILABILITY LISTING FOR: ",$E(PRCP("IN"),1,20),?(80-$L(%)),% Line Location: H+1
Function Call: WRITE	Prompt: !?1,"* ONLY SUMMARY OF ITEMS PRINTED *",!,% Line Location: H+3
Function Call: WRITE	Prompt: !,"NSN",?15,"DESCRIPTION",?40,"MI",$J("UNIT/IS",14),?58,"GROUP CATEGORY",?77,"KWZ",!,% Line Location: H+4