01 NAL-TAPE-REC. 05 NAL-KEY. 10 NAL-PARCEL. 15 NAL-RNG PIC X(2). 15 NAL-TWP PIC X(2). 15 NAL-SEC PIC X(2). 15 NAL-SUB PIC X(4). 15 NAL-BLK PIC X(5). 15 NAL-LOT PIC X(4). 15 NAL-DIR PIC X(1). 10 NAL-RCD-NO PIC 9(2). 05 NAL-TAPE-DATA PIC X(183). The following record types get moved to nal-tape-data - check nal-rcd-no to see which layout to use 01 NAL-REC-01. 05 NAL-RCD-TYPE PIC X. 05 NAL-MORT PIC X(4). 05 NAL-AREA-CODE PIC X(4). 05 NAL-EXEM PIC X(2). 05 NAL-MAP-NUM PIC X(4). 05 NAL-NC-AMT PIC 9(11). 05 NAL-EX-FLGS PIC 9(6). 05 NAL-EX-FLGS-R REDEFINES NAL-EX-FLGS. 10 NAL-HX-FLG PIC 9. 10 NAL-WID-FLG PIC 9. 10 NAL-DIS-FLG PIC 9. 10 NAL-VET-FLG PIC 9. 10 NAL-TOT-FLG PIC 9. 10 FILLER PIC 9. 05 NAL-CLASS PIC X(3). 05 NAL-BATCH PIC X(3). 05 NAL-ZONE PIC X(4). 05 NAL-DELQ PIC 9(1). 05 NAL-CNTY-CODE PIC X(2). 05 NAL-VC-NOTICE PIC X. 88 YES-VAL-CHG VALUE 'Y'. 88 NO-VAL-CHG VALUE 'N'. 05 NAL-LAT-FLG PIC X. 05 NAL-ACRE PIC 9(5)V99. 05 NAL-HMST-PCT PIC 9(2)V999. 05 NAL-MULTI-HMST PIC 9(9). 05 NAL-HMST PIC 9(5). 05 NAL-WID PIC 9(5). 05 NAL-DIS PIC 9(5). 05 NAL-VET PIC 9(5). 05 NAL-ASSD PIC 9(9). 05 NAL-SYSTEM PIC 9(9). 05 NAL-LAND PIC 9(9). 05 NAL-BLDG PIC 9(9). 05 NAL-XFSB PIC 9(9). 05 NAL-AGRI PIC 9(9). 05 NAL-PEN PIC 9(9). 05 NAL-SEWER PIC 9(5)V99. 05 NAL-ST-LITE PIC 9(5)V99. 05 NAL-EX-K22700 PIC 9(3). 05 NAL-AREA PIC 9(3). 05 NAL-LT-LOT PIC 9(3). 05 NAL-RB-BOND PIC 9(7)V99. 01 NAL-REC-02. 05 NAL-NAME-ADDR. 10 NAL-NAME-1 PIC X(30). 10 NAL-NAME-2 PIC X(30). 10 NAL-NAME-3 PIC X(30). 10 NAL-NAME-4 PIC X(30). 05 FILLER REDEFINES NAL-NAME-ADDR OCCURS 4 TIMES. 10 NAL-NAME PIC X(30). 05 FILLER PIC X(60). 01 NAL-REC-03. 05 NAL-SALES-DATA-AREA PIC X(150). 05 NAL-SALES-DATA REDEFINES NAL-SALES-DATA-AREA OCCURS 5 TIMES. 10 NAL-SALE-CCYY. 15 NAL-SALE-CC PIC X(2). 15 NAL-SALE-YR PIC X(2). 10 NAL-SALE-BOOK PIC X(4). 10 NAL-SALE-PAGE PIC X(4). 10 NAL-SALE-STAT PIC X(1). 10 NAL-SALE-INST PIC X(2). 10 NAL-SALE-QUAL PIC X(1). 10 NAL-SALE-LIFE PIC X(1). 10 NAL-SALE-TRANS PIC X(1). 10 NAL-SALE-TOI PIC X(1). 10 NAL-SALE-AMT PIC 9(9). 10 NAL-SALE-MON PIC X(2). 05 FILLER PIC X(30). 01 NAL-LEG-REC. 05 NAL-LEGAL-DATA-AREA. 10 NAL-LEGAL-CONV PIC X(180). 01 NAL-REC-12. 05 NAL-CITY PIC X(25). 05 NAL-ST PIC XX. 05 NAL-ZIP PIC X(9). 05 FILLER PIC X(144).