00001 ***** 07/30/01 00002 * DTSIR405 00003 * DTSIR405 LIEN RELEASE CANDIDATES REPORT RECORD. LV010 00004 * DTSIR405 00005 * 10/20/00 ADDED R405-OPID TO IR. ZL1. DTSIR405 00006 ***** DTSIR405 00007 SKIP1 DTSIR405 00008 10 R405-LENGTH PIC S9(04) COMP. DTSIR405 00009 SKIP1 DTSIR405 00010 10 R405-SORT-AREA. DTSIR405 00011 15 R405-REC-TYPE PIC X(03). DTSIR405 00012 15 R405-OP-ID PIC X(08). DTSIR405 00013 15 R405-EMP-NO PIC S9(07) COMP-3. DTSIR405 00014 SKIP1 DTSIR405 00015 10 R405-DATA-AREA. DTSIR405 00016 15 R405-PRIMARY-NAME PIC X(40). DTSIR405 00017 15 R405-STMT-DATE PIC S9(09) COMP-3. DTSIR405 00018 15 R405-CERTIFICATE-NO PIC S9(08) COMP-3. DTSIR405 00019 15 R405-REC-DEEDS-NO PIC X(10). DTSIR405 00020 15 R405-CERTIFICATE-DATE PIC S9(09) COMP-3. DTSIR405 00021 15 R405-FMT-ADDR. DTSIR405 00022 20 R405-FMT-LINE OCCURS 5 TIMES DTSIR405 00023 INDEXED BY R405-FMT-IDX DTSIR405 00024 PIC X(40). DTSIR405