Routine: PRCPEIQT

Information

PRCPEIQT ;WISC/RFJ-edit quantities, dueins, costs ; 5/4/99 3:40pm

Name	Comments	DBIA/ICR reference
V	;;5.1;IFCAP;124;Oct 20, 2000;Build 2
QTY(PRCPINPT,ITEMDA)	; adjust primary or secondary quantity
DUEIN(PRCPINPT,ITEMDA)	; change primary or secondary due-ins
COSTEDIT(PRCPINPT,ITEMDA)	; edit last cost for invpt and item
CE1

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?3,"QTY ON-HAND (in ",$$UNIT^PRCPUX1(PRCPINPT,ITEMDA," per "),"): ",+$P(ITEMDATA,"^",7) Line Location: QTY+3
Function Call: WRITE	Prompt: !?10,"x",?16,"AVERAGE COST: ",$J(+$P(ITEMDATA,"^",22),0,3) Line Location: QTY+4
Function Call: WRITE	Prompt: !?10,"=",?13,"INVENTORY VALUE: ",$J(+$P(ITEMDATA,"^",27),0,2),! Line Location: QTY+5
Function Call: WRITE	Prompt: ! Line Location: QTY+7
Function Call: WRITE	Prompt: ! Line Location: QTY+9
Function Call: WRITE	Prompt: !!?3,"QTY DUE-IN (in ",$$UNIT^PRCPUX1(PRCPINPT,ITEMDA," per "),"): ",$$GETIN^PRCPUDUE(PRCPINPT,ITEMDA),! Line Location: DUEIN+4
Function Call: WRITE	Prompt: !?5,"...total DUE-IN QUANTITY adjusted (by: ",X,") to: ",Y Line Location: DUEIN+10