Routine: PRCPAWR1

Information

PRCPAWR1 ;WISC/DWA,RFJ-print register approval form (end of report) ;11 Mar 94

Name	Comments	DBIA/ICR reference
BUILD	; build tmp global for printing the report
BUILD1	; build tmp global with adjustment data
END	; print end of report information
DATA	;print signature at bottom of report

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"----------- S U M M A R Y O F I T E M A C C O U N T C O D E S ----------" Line Location: END+1
Function Call: WRITE	Prompt: ! Line Location: END+3
Function Call: WRITE	Prompt: ?40 Line Location: END+4
Function Call: WRITE	Prompt: "ACCT: ",ACCT,?($S($X<10:10,1:50)),"INV AMOUNT: ",$J(DATA,12,2) Line Location: END+5
Function Call: WRITE	Prompt: !!,"TOTAL DOLLAR AMOUNT OF INVENTORY VALUE ADJUSTMENT (UNAPPROVED): ",$J(TOTAL,0,2) Line Location: END+9
Function Call: WRITE	Prompt: !!,PRCPMSG Line Location: END+10
Function Call: WRITE	Prompt: !,DATA(%) Line Location: END+14
Function Call: WRITE	Prompt: @IOF Line Location: END+15