*
 01  marion-MORT-REC.
     05  marion-MORT-TAX-YEAR      PIC 9999.
     05  marion-MORT-ASSESSED-YEAR PIC 9999.
     05  marion-MORT-ACCT-NO       PIC :@20).
     05  marion-MORT-FOLIO-NO      PIC 9(7)V9999.
     05  marion-MORT-ESCROW        PIC :@6).
     05  marion-MORT-LOAN-NO       PIC :@15).
     05  marion-MORT-EX-TYPE       PIC :@4).
     05  marion-MORT-STATUS        PIC :@2).
     05  marion-MORT-ASSESSED      PIC 9(11).
     05  marion-MORT-EXEMPT        PIC 9(11).
     05  marion-MORT-TAXABLE       PIC 9(11).
     05  marion-MORT-MILL-CODE     PIC :@6).
     05  marion-MORT-OWNR-NO       PIC :@7).
     05  marion-MORT-OWNR-ADDR     PIC :@30)  OCCURS  7 TIMES.
     05  marion-MORT-ZIP           PIC :@10).
     05  marion-MORT-LEGAL         PIC :@45)  OCCURS  7 TIMES.
     05  marion-MORT-ACRES         PIC 9(6)V999.
     05  marion-MORT-INSTALLMENTS  PIC X.
     05  marion-MORT-DISTRICT-TABLE OCCURS 30 TIMES.
         10  marion-MORT-DIST-TYPE PIC X.
         10  marion-MORT-DIST-CODE PIC XXX.
         10  marion-MORT-DIST-EXEM PIC 9(11).
         10  marion-MORT-DIST-TXBL PIC 9(11).
         10  marion-MORT-DIST-TAX  PIC 9(8)V99.
     05  marion-MORT-TOTAL-TAX     PIC 9(11)V99.
     05  marion-MORT-TOTAL-PAID    PIC S9(11)V99 SIGN TRAILING SEPARATE.
     05  marion-MORT-BALANCE       PIC S9(11)V99 SIGN TRAILING SEPARATE.
     05  marion-MORT-RECEIPT-NO    PIC 9(7)V9999.
     05  marion-MORT-DATE-PAID     PIC 9(6).
     05  marion-MORT-PAID-BY       PIC :@30).
     05  marion-MORT-NOV-AMOUNT    PIC S9(11)V99 SIGN TRAILING SEPARATE.
     05  marion-MORT-DELQ-TAXES OCCURS 10 TIMES.
         10  marion-MORT-DELQ-YEAR PIC 9999.
         10  marion-MORT-DELQ-TAX  PIC 9(11)V99.
         10  marion-MORT-DELQ-FACE PIC 9(11)V99.
     05  marion-MORT-SITUS-ADDRESS.
         10  marion-MORT-ST-CITY   PIC XXX.
         10  marion-MORT-ST-NAME   PIC :@22).
         10  marion-MORT-ST-NO     PIC :@8).
     05  marion-MORT-GEO-NUMBER    PIC :@30).
     05  marion-MORT-FILLER-1      PIC :@97).
     05  marion-MORT-end      PIC :@1).
         88   marion-end-mort-char value 'Z'.
*