00001 *****                                                             04/10/19
00002 *                                                                 DTSIR412
00003 *    DTSIR412    ESTIMATED REPORT CANDIDATES REPORT RECORD.          LV005
00004 *                                                                 DTSIR412
00005 *                03/17/1999  REVIEWED AND MODIFIED FOR DC.  EHH   DTSIR412
00006 *                04/09/2019  BATCH NO ADDED DTSBE412 & DTSBR412 NH   CL**5
00007 *****                                                             DTSIR412
00008                                                                   DTSIR412
00009          10  R412-LENGTH                 PIC S9(04)  COMP.        DTSIR412
00010                                                                   DTSIR412
00011          10  R412-SORT-AREA.                                      DTSIR412
00012              15  R412-REC-TYPE           PIC  X(03).              DTSIR412
00013              15  R412-ESTIMATE-GENERATED-IND                      DTSIR412
00014                                          PIC  X(01).              DTSIR412
00015                  88  R412-ESTIMATE-GENERATED-YES-88    VALUE '1'. DTSIR412
00016                  88  R412-ESTIMATE-GENERATED-NO-88     VALUE '2'. DTSIR412
00017              15  R412-FIELD-REP-ID       PIC  X(02).              DTSIR412
00018              15  R412-EMP-NO             PIC S9(07)  COMP-3.      DTSIR412
00019              15  R412-YRQ                PIC S9(05)  COMP-3.      DTSIR412
00020                                                                   DTSIR412
00021          10  R412-DATA-AREA.                                      DTSIR412
00022              15  R412-PRIMARY-NAME       PIC  X(40).              DTSIR412
00023              15  R412-RPT-DUE-DATE       PIC S9(09)  COMP-3.      DTSIR412
00024              15  R412-BATCH-NUMBER       PIC S9(05)  COMP-3.         CL**3