File Layout for OC document 01 OC-REC-DELIMIT. 05 OC-BAT-DATA. 10 BAT-TYPE PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 BAT-ORG1 PIC X(03). 10 FILLER PIC X(01) VALUE '|'. 10 BAT-NUMBER PIC X(06). 10 FILLER PIC X(01) VALUE '|'. 10 DOC-TYPE PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 DOC-ORG1 PIC X(03). 10 FILLER PIC X(01) VALUE '|'. 10 DOC-NUMBER PIC X(11). 10 FILLER PIC X(01) VALUE '|'. 05 OC-HDR-DATA. 10 TRANS-CODE PIC X(2). 10 FILLER PIC X(01) VALUE '|'. 10 TRANS-NUMBER-AGENCY PIC X(03). 10 FILLER PIC X(01) VALUE '|'. 10 TRANS-NUMBER-NUMBER PIC X(11). 10 FILLER PIC X(01) VALUE '|'. 10 HDR-AGENCY PIC X(3). 10 FILLER PIC X(01) VALUE '|'. 10 RECORD-MONTH PIC X(2). 10 FILLER PIC X(01) VALUE '|'. 10 RECORD-DAY PIC X(2). 10 FILLER PIC X(01) VALUE '|'. 10 RECORD-YEAR PIC X(2). 10 FILLER PIC X(01) VALUE '|'. 10 FISC-MONTH PIC X(2). 10 FILLER PIC X(01) VALUE '|'. 10 FISC-YEAR PIC X(2). 10 FILLER PIC X(01) VALUE '|'. 10 BUDGET-FY PIC X(2). 10 FILLER PIC X(01) VALUE '|'. 10 DOCUMENT-ACTION PIC X(1). 10 FILLER PIC X(01) VALUE '|'. 10 WAREHOUSE PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 REQUESTING-ORG PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 REQUESTED-BY PIC X(20). 10 FILLER PIC X(01) VALUE '|'. 10 DOC-TOTAL PIC X(14). 10 FILLER PIC X(01) VALUE '|'. 10 COMMENTS PIC X(30). 10 FILLER PIC X(01) VALUE '|'. 10 LINE-NO-1 PIC X(02). 10 FILLER PIC X(01) VALUE '|'. 10 FUND-1 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 AGENCY-1 PIC X(03). 10 FILLER PIC X(01) VALUE '|'. 10 ORG-1 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 SUB-ORG-1 PIC X(02). 10 FILLER PIC X(01) VALUE '|'. 10 APPR-UNIT-1 PIC X(09). 10 FILLER PIC X(01) VALUE '|'. 10 ACTIVITY-1 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 OBJECT-1 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 SUB-OBJECT-1 PIC X(02). 10 FILLER PIC X(01) VALUE '|'. 10 REPORTING-CATEGORY-1 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 JOB-NUMBER-1 PIC X(08). 10 FILLER PIC X(01) VALUE '|'. 10 LINE-AMOUNT-1 PIC X(14). 10 FILLER PIC X(01) VALUE '|'. 10 INC-DEC-IND-1 PIC X(01). 10 FILLER PIC X(01) VALUE '|'. 10 LINE-NO-2 PIC X(02). 10 FILLER PIC X(01) VALUE '|'. 10 FUND-2 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 AGENCY-2 PIC X(03). 10 FILLER PIC X(01) VALUE '|'. 10 ORG-2 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 SUB-ORG-2 PIC X(02). 10 FILLER PIC X(01) VALUE '|'. 10 APPR-UNIT-2 PIC X(09). 10 FILLER PIC X(01) VALUE '|'. 10 ACTIVITY-2 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 OBJECT-2 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 SUB-OBJECT-2 PIC X(02). 10 FILLER PIC X(01) VALUE '|'. 10 REPORTING-CATEGORY-2 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 JOB-NUMBER-2 PIC X(08). 10 FILLER PIC X(01) VALUE '|'. 10 LINE-AMOUNT-2 PIC X(14). 10 FILLER PIC X(01) VALUE '|'. 10 INC-DEC-IND-2 PIC X(01). 10 FILLER PIC X(01) VALUE '|'. 10 LINE-NO-3 PIC X(02). 10 FILLER PIC X(01) VALUE '|'. 10 FUND-3 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 AGENCY-3 PIC X(03). 10 FILLER PIC X(01) VALUE '|'. 10 ORG-3 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 SUB-ORG-3 PIC X(02). 10 FILLER PIC X(01) VALUE '|'. 10 APPR-UNIT-3 PIC X(09). 10 FILLER PIC X(01) VALUE '|'. 10 ACTIVITY-3 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 OBJECT-3 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 SUB-OBJECT-3 PIC X(02). 10 FILLER PIC X(01) VALUE '|'. 10 REPORTING-CATEGORY-3 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 JOB-NUMBER-3 PIC X(08). 10 FILLER PIC X(01) VALUE '|'. 10 LINE-AMOUNT-3 PIC X(14). 10 FILLER PIC X(01) VALUE '|'. 10 INC-DEC-IND-3 PIC X(01). 10 FILLER PIC X(01) VALUE '|'. 10 LINE-NO-4 PIC X(02). 10 FILLER PIC X(01) VALUE '|'. 10 FUND-4 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 AGENCY-4 PIC X(03). 10 FILLER PIC X(01) VALUE '|'. 10 ORG-4 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 SUB-ORG-4 PIC X(02). 10 FILLER PIC X(01) VALUE '|'. 10 APPR-UNIT-4 PIC X(09). 10 FILLER PIC X(01) VALUE '|'. 10 ACTIVITY-4 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 OBJECT-4 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 SUB-OBJECT-4 PIC X(02). 10 FILLER PIC X(01) VALUE '|'. 10 REPORTING-CATEGORY-4 PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 JOB-NUMBER-4 PIC X(08). 10 FILLER PIC X(01) VALUE '|'. 10 LINE-AMOUNT-4 PIC X(14). 10 FILLER PIC X(01) VALUE '|'. 10 INC-DEC-IND-4 PIC X(01). 10 FILLER PIC X(01) VALUE '|'. 10 COST-CAT-1 PIC X(3). 10 FILLER PIC X(01) VALUE '|'. 10 COST-CAT-2 PIC X(3). 10 FILLER PIC X(01) VALUE '|'. 10 COST-CAT-3 PIC X(3). 10 FILLER PIC X(01) VALUE '|'. 10 COST-CAT-4 PIC X(3). 10 FILLER PIC X(01) VALUE '|'. 10 JOB-TYPE PIC X(4). 10 FILLER PIC X(01) VALUE '|'. 10 FUNCTION-1 PIC X(4). 10 FILLER PIC X(01) VALUE '|'. 10 FUNCTION-2 PIC X(4). 10 FILLER PIC X(01) VALUE '|'. 10 FUNCTION-3 PIC X(4). 10 FILLER PIC X(01) VALUE '|'. 10 FUNCTION-4 PIC X(4). 10 FILLER PIC X(01) VALUE '|'. 10 DEFAULT-ALLOWED PIC X(1). 10 FILLER PIC X(01) VALUE '|'. 05 OC-LN-DATA. 10 OC-DOCD. 20 COMM-LINE-NUMBER PIC X(03). 20 FILLER PIC X(01) VALUE '|'. 20 STOCK-NUMBER PIC X(14). 20 FILLER PIC X(01) VALUE '|'. 20 STOCK-SUFFIX PIC X(03). 20 FILLER PIC X(01) VALUE '|'. 20 REQUESTED-QTY PIC X(12). 20 FILLER PIC X(01) VALUE '|'. 20 QTY-INC-DEC PIC X(01). 20 FILLER PIC X(01) VALUE '|'. 20 ISSUE-UNIT PIC X(04). 20 FILLER PIC X(01) VALUE '|'. 20 UNIT-PRICE PIC X(14). 20 FILLER PIC X(01) VALUE '|'. 20 PRICE-INC-DEC PIC X(01). 20 FILLER PIC X(01) VALUE '|'. 20 TOTAL-PRICE PIC X(14). 20 FILLER PIC X(01) VALUE '|'. 20 DESCRIPTION PIC X(30). 20 FILLER PIC X(01) VALUE '|'. 20 PRIMARY-BIN PIC X(05). 20 FILLER PIC X(01) VALUE '|'. 20 REF-ACCT-LINE PIC X(02). 20 FILLER PIC X(01) VALUE '|'. 20 ITEM-JOB-TYPE PIC X(04). 10 FILLER PIC X(01) VALUE '|'. 10 OC-STATUS PIC X(05). 10 FILLER PIC X(01) VALUE '|'. 10 LAST-USER PIC X(08). 10 FILLER PIC X(01) VALUE '|'. 10 APPROVALS PIC X(05). 10 FILLER PIC X(01) VALUE '|'. 10 LAST-DATE PIC X(08).