00001 *****                                                             04/04/18
00002 *                                                                 DTSHX145
00003 *    DTSIX145    EMPLOYER PAYMENT EXTRACT RECORD                     LV008
00004 *                                                                 DTSHX145
00005 *    EXCHANGES EMPLOYER PAYMENT DATA BETWEEN MAINFRAME AND        DTSHX145
00006 *    SQL SERVER DATABASE.                                         DTSHX145
00007 *                                                                 DTSHX145
00008 *    05/04/2010  ADDED CHECK SCAN DATE, CHECK SEQUENCE NBR,       DTSHX145
00009 *                LEVEL-88 FOR PAYMENTS FROM IN-HOUSE CASHIERING,  DTSHX145
00010 *                INTEREST AND PENALTY WAIVER INDICATORS,          DTSHX145
00011 *                RESPONSIBLE OPID AND ACTIVITY.            GD     DTSHX145
00012 *                                                                 DTSHX145
00013 *    11/17/2010  CHANGED LENGTH OF SOURCE TO ONE BYTE.  ADDED     DTSHX145
00014 *                X145-TO-WEB-88 FOR DATA SENT TO THE WEB          DTSHX145
00015 *                DATABASE FROM THE MAINFRAME.             GD      DTSHX145
00016 *****                                                             DTSHX145
00017                                                                   DTSHX145
00018          15  H145-REC-TYPE              PIC  X(03) VALUE '145'.      CL**7
00019          15  FILLER                     PIC  X(01) VALUE ','.     DTSHX145
00020          15  H145-EMP-NO                PIC  9(06).                  CL**7
00021          15  FILLER                     PIC  X(01) VALUE ','.     DTSHX145
00022          15  H145-QTR                   PIC  X(06).                  CL**7
00023          15  FILLER                     PIC  X(01) VALUE ','.     DTSHX145
00024          15  FILLER                     PIC  X(06).                  CL**3
00025          15  FILLER                     PIC  X(01) VALUE ','.        CL**3
00026          15  FILLER                     PIC  X(03).                  CL**5
00027          15  FILLER                     PIC  X(01) VALUE ','.        CL**3
00028          15  FILLER                     PIC  X(02).                  CL**3
00029          15  FILLER                     PIC  X(01) VALUE ','.        CL**3
00030          15  FILLER                     PIC  X(02).                  CL**3
00031          15  FILLER                     PIC  X(01) VALUE ','.        CL**3
00032          15  FILLER                     PIC  X(02).                  CL**3
00033          15  FILLER                     PIC  X(01) VALUE ','.        CL**3
00034          15  H145-REMITTANCE            PIC  9(11).99.               CL**8
00035          15  FILLER                     PIC  X(01) VALUE ','.     DTSHX145
00036          15  H145-RECV-DATE             PIC  X(10).                  CL**7
00037          15  FILLER                     PIC  X(01) VALUE ','.        CL**3
00038          15  FILLER                     PIC  X(10).                  CL**3
00039          15  FILLER                     PIC  X(01) VALUE ','.        CL**3
00040          15  H145-TRACE-NO              PIC  X(08).                  CL**7
00041          15  FILLER                     PIC  X(429).                 CL**5
