00001 *****                                                             04/05/04
00002 *                                                                 DTSIT001
00003 *    DTSIT001    REGISTRATION TRANSACTION RECORD.                    LV013
00004 *                                                                 DTSIT001
00005 *                                                                 DTSIT001
00006 *                09/23/1998  REVIEWED AND MODIFIED FOR DC.  EHH   DTSIT001
00007 *                                                                 DTSIT001
00008 *                06/02/1999  ADDED T001-INACT-LTR-8ZEROWAGE-88.   DTSIT001
00009 *                                                           EHH   DTSIT001
00010 *                                                                 DTSIT001
00011 *                10/29/2001  ADDED HOUSEHOLD INDICATOR.     GD    DTSIT001
00012 *                                                                 DTSIT001
00013 *                07/23/2003  ADDED ENROLLMENT INDICATOR.     GD   DTSIT001
00014 *                                                                 DTSIT001
00015 *****                                                             DTSIT001
00016                                                                   DTSIT001
00017          10  T001-LENGTH         PIC S9(04)  COMP.                DTSIT001
00018                                                                   DTSIT001
00019          10  T001-COMMON-AREA.                                    DTSIT001
00020              15  T001-REC-TYPE           PIC  X(03)  VALUE '001'. DTSIT001
00021              15  T001-EMP-NO             PIC S9(07)       COMP-3. DTSIT001
00022              15  T001-ORIGIN             PIC  X(10).              DTSIT001
00023              15  FILLER REDEFINES T001-ORIGIN.                    DTSIT001
00024                  20  T001-OP-ID          PIC  X(08).              DTSIT001
00025                  20  T001-SCR-ID         PIC  X(02).              DTSIT001
00026              15  T001-SYS-DATE           PIC S9(09)       COMP-3. DTSIT001
00027              15  T001-SYS-TIME           PIC S9(07)       COMP-3. DTSIT001
00028                                                                   DTSIT001
00029          10  T001-DATA-AREA.                                      DTSIT001
00030              15  T001-TRN-CD             PIC  X(02).              DTSIT001
00031                  88  T001-LIABLE-PKG         VALUE '01'.          DTSIT001
00032                  88  T001-NOT-LIABLE-LTR     VALUE '02'.          DTSIT001
00033                  88  T001-INACTIVE-LTR       VALUE '03'.          DTSIT001
00034                  88  T001-ERA-CYCLE          VALUE '04'.          DTSIT001
00035                  88  T001-FILE-CLERK-LIST    VALUE '06'.          DTSIT001
00036                  88  T001-HSEHLD-NOTICES     VALUE '07'.          DTSIT001
00037                  88  T001-EFT-ENROLLMENT     VALUE '08'.          DTSIT001
00038                                                                   DTSIT001
00039              15  T001-RESP-OP-ID         PIC  X(08).              DTSIT001
00040                                                                   DTSIT001
00041              15  T001-INACT-LTR-TYPE     PIC  X(01).              DTSIT001
00042                  88  T001-INACT-LTR-GENERIC-88       VALUE 'G'.   DTSIT001
00043                  88  T001-INACT-LTR-DEMAND-88        VALUE 'D'.   DTSIT001
00044                  88  T001-INACT-LTR-8ZEROWAGE-88     VALUE '8'.   DTSIT001
00045                                                                   DTSIT001
00046              15  T001-NOT-LIABLE-LTR-TYPE                         DTSIT001
00047                                          PIC  X(01).              DTSIT001
00048                                                                   DTSIT001
00049              15  T001-WELCOME-LTR-IND    PIC  X(01).              DTSIT001
00050                                                                   DTSIT001
00051              15  T001-HSEHLD-RPT-TYPE    PIC  X(02).              DTSIT001
00052                  88  T001-HH-POT-HOUSEHOLD-88        VALUE '01'.  DTSIT001
00053                  88  T001-HH-EMP-REQUEST-88          VALUE '02'.  DTSIT001
00054                  88  T001-HH-CONFIRM-QTR-88          VALUE '10'.  DTSIT001
00055                  88  T001-HH-CONFIRM-ANN-88          VALUE '11'.  DTSIT001
00056                  88  T001-HH-ADMIN-DELQNT-88         VALUE '20'.  DTSIT001
00057                  88  T001-HH-ADMIN-REACT-88          VALUE '21'.  DTSIT001
00058                                                                   DTSIT001
00059              15  T001-HH-START-YRQ       PIC S9(05)       COMP-3. DTSIT001
00060                                                                   DTSIT001
00061              15  T001-EFT-ENROLL-TYPE    PIC  X(01).              DTSIT001
00062                  88  T001-EFT-ENROLL-ADD-88          VALUE '0'.   DTSIT001
00063                  88  T001-EFT-ENROLL-DEL-88          VALUE '1'.   DTSIT001
00064                                                                   DTSIT001
00065              15  FILLER                  PIC  X(17).              DTSIT001