Information Systems:EODRPTW

Runs report of inventory onhand, and validate that SROSRO (Warehouse Balance), SROITR (Inventory Transactions), WHOLOP (Location Occupancy), and WHOLTR (Location Transactions) all balance with each other. It is called by EODWEEKLY.

/* Uniquely identify Query report so that Catapult Poller can file it on   */
/* SuperServer.                                                            */
                                                                             
            OVRPRTF    FILE(QPQUPRFIL) OUTQ(FINANCE/FINTEMP) USRDTA(REPORT3)   
                         
/* Print onhand inventory at cost by item account group for MAI and RET.   */

/* log entry is 'INV VAL 2'                                                */
 
            RUNQRY     QRY(STOCKST03A)                                       
            DLTOVR     FILE(QPQUPRFIL)

/* Compare summary of WHOLTR to WHOLOP, and summary of SROITR to summary   */
/* of WHOLTR.                                                              */

/* log entry is 'BAL TRANS'                                                */
                                                                             
             CALL       PGM(BALTRANS) PARM('UP1480BFVA')