Routine: PRCPRODA

Information

PRCPRODA ;WOIFO/VAC-On-Demand Audit Activity Report ; 2/22/07 9:05am

Name	Comments	DBIA/ICR reference
PRIMARY	;This routine displays the audit information on On-Demand Items updates
DESC	; Ask user for Item#/Description sort preference
BEGIN
DQ	; queue starts here
REPORT	; Print Report
Q
H	;PRINT HEADING

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: PRIMARY+24
Function Call: WRITE	Prompt: !,"-- TOTAL NUMBER OF DAYS: ",X+1,! Line Location: PRIMARY+30
Function Call: WRITE	Prompt: !,"*** NO GROUP CATEGORIES SELECTED !" Line Location: PRIMARY+34
Function Call: WRITE	Prompt: !!,"<> please wait <>" Line Location: BEGIN+4
Function Call: WRITE	Prompt: !?10,"<<< TASKMANAGER JOB TERMINIATED BY USER >>>" Line Location: REPORT+4
Function Call: WRITE	Prompt: !?7,"GROUP: ",GRPDESC,! Line Location: REPORT+10
Function Call: WRITE	Prompt: !,$P(ITEMDA,"^",1),?9,$P(ITEMDA,"^",2) Line Location: REPORT+18
Function Call: WRITE	Prompt: ! Line Location: REPORT+23
Function Call: WRITE	Prompt: ! Line Location: REPORT+24
Function Call: WRITE	Prompt: @IOF Line Location: H+1
Function Call: WRITE	Prompt: "ON-DEMAND AUDIT FOR: ",$E(PRCP("IN"),1,20),?(80-$L(%)),% Line Location: H+2
Function Call: WRITE	Prompt: !,"IM#",?9,"DESCRIPTION" Line Location: H+4
Function Call: WRITE	Prompt: !,?32,"INVENTORY POINT" Line Location: H+5
Function Call: WRITE	Prompt: !,?3,"SETTING",?12,"DATE/TIME",?38,"USER",?49,"REASON" Line Location: H+6
Function Call: WRITE	Prompt: !,%,! Line Location: H+7