| PRCPUSA |
PRCPUSA - UTILITY PROGRAM TO UPDATE INTERNAL USAGE
HISTORY FROM VARIABLES
THIS IS A UTLIITY PROGRAM THAT CAN BE CALLED BY ANY SYSTEM THAT WISHES TO
USE THEIR OWN PROGRAMS FOR SOME FUNCTIONS THAT WOULD AFFECT THE INVENTORY
LEVEL, BUT WISH TO USE THE GENERAL INVENTORY/DISTRIBUTION SYSTEM FOR OTHER
INVENTORY FUNCTIONS.
*** THE FOLLOWING VARIABLES ARE EXPECTED ***
PRCP("I")=RECORD NUMBER OF THE INVENTORY POINT TO BE UPDATED (TOP LEVEL ON
FILE 445)
PRCP("ITEM")=POINTER TO ITEM MASTER FILE (441)
PRCP("QTY")=QUANTITY TO AFFECT INVENTORY. NOTE: A PLUS QTY.WILL BE ADDED, A
MINUS WILL BE SUBTRACTED.
PRCP("TYP")=CODE INDICATING TYPE OF TRANSACTION
'RC'=RECEIVING 'R'=NORMAL DISTRIBUTION 'C'=CALL-IN DISTRIBUTION 'U'=IN-HOUSE
OR PATIENT USAGE 'A'=MANUAL ADJUSTMENT TO INVENTORY
PRCP("COM")=THIS FIELD IS OPTIONAL. IF PROVIDED, IT IS A FREE TEXT COMMENT
(1-80 CHAR.) EXPLAINING THE INVENTORY TRANSACTION.
**NOTE** SUCCESSFUL UPDATE WILL KILL ALL 'PRCP' VARIABLES. UNSUCCESSFUL WILL
LEAVE ALL VARIABLES AND ERROR MESSAGE IN 'X'.
|