00001 *****                                                             10/15/98
00002 *                                                                 DTSIR103
00003 *    DTSIR103    EMPLOYER REGISTRATION CYCLE A (LETTER 2)            LV002
00004 *                REPORT RECORD.                                   DTSIR103
00005 *                                                                 DTSIR103
00006 *****                                                             DTSIR103
00007                                                                      CL**2
00008          10  R103-LENGTH         PIC S9(04)  COMP.                   CL**2
00009                                                                      CL**2
00010          10  R103-SORT-AREA.                                      DTSIR103
00011              15  R103-REC-TYPE           PIC  X(03)  VALUE '103'. DTSIR103
00012              15  R103-OP-ID              PIC  X(08).              DTSIR103
00013              15  R103-EMP-NO             PIC S9(07)      COMP-3.  DTSIR103
00014                                                                      CL**2
00015          10  R103-DATA-AREA.                                      DTSIR103
00016              15  R103-MAIL-DATE          PIC S9(09)      COMP-3.  DTSIR103
00017              15  R103-FMT-ADDR.                                   DTSIR103
00018                  20  R103-FMT-LINE OCCURS 5 TIMES                 DTSIR103
00019                                    INDEXED BY R103-FMT-IDX        DTSIR103
00020                                          PIC  X(40).              DTSIR103
00021              15  R103-ZIP                PIC  X(10).              DTSIR103
00022              15  R103-ADVANCED-BARCODE   PIC  X(14).                 CL**2