08/31/94 RP BYPASS AUM RECORDS The fixed assets system needs to exclude AUM transactions. This change does that exclusion. ------------------------------------------------------------------------ 2000-INPUT-100. MOVE 'N' TO VO-CMD-CODE. PERFORM 8500-VO-FILE-IO THRU 8500-VO-FILE-IO-EXIT. IF VO-RTN-CODE = '8' GO TO 2000-INPUT-900. IF VO-KEY = SPACES OR VO-CONTROL-REC-KEY GO TO 2000-INPUT-100. IF VO-VENDOR-NO-1 = 'M' OR 'P' OR 'S' OR 'V' RP0894 GO TO 2000-INPUT-100. RP0894 ADD 1 TO REC-CNT-VO-READ. MOVE SPACES TO SORT-RECORD. * * CHECK IF THIS RECORD MEETS SELECTION CRITERIA. ------------------------------------------------------------------------
Last Modified: Tuesday, 28-Nov-2000 11:27:22 CST
©1999 All Rights Reserved