00001 ***** 10/02/24 00002 * DTSES140 00003 * DTSES140 ESSP TAX REPORT EXTRACT RECORD LV005 00004 * DTSES140 00005 * EXCHANGES EMPLOYER TAX REPORTS BETWEEN MAINFRAME AND DTSES140 00006 * SQL SERVER DATABASE. DTSES140 00007 * DTSES140 00008 * 05/04/2010 ADDED CHECK SCAN DATE, CHECK SEQUENCE NBR, DTSES140 00009 * LEVEL-88 FOR REPORTS FROM IN-HOUSE CASHIERING, DTSES140 00010 * INTEREST AND PENALTY WAIVER INDICATORS, DTSES140 00011 * RESPONSIBLE OPID AND ACTIVITY. GD DTSES140 00012 ***** DTSES140 00013 DTSES140 00014 15 X140-REC-TYPE PIC X(03) VALUE '140'. DTSES140 00015 15 FILLER PIC X(01) VALUE ','. DTSES140 00016 15 X140-EMP-NO PIC 9(06). DTSES140 00017 15 FILLER PIC X(01) VALUE ','. DTSES140 00018 15 X140-QUARTER PIC X(06). DTSES140 00019 15 FILLER PIC X(01) VALUE ','. DTSES140 00020 15 X140-REP-TYPE PIC X(08). CL**2 00021 15 FILLER PIC X(01) VALUE ','. DTSES140 00022 15 X140-REP-EMPLEE-CNT PIC X(08). CL**2 00023 15 FILLER PIC X(01) VALUE ','. CL**2 00024 15 X140-EXCESS-WAGE PIC ----------9.99. CL**5 00025 15 FILLER PIC X(01) VALUE ','. DTSES140 00026 15 X140-TAX-WAGE PIC ----------9.99. CL**4 00027 15 FILLER PIC X(01) VALUE ','. DTSES140 00028 15 X140-TOTAL-WAGE PIC ----------9.99. CL**4 00029 15 FILLER PIC X(01) VALUE ','. CL**2 00030 15 X140-SUBM PIC X(04). CL**2 00031 15 FILLER PIC X(01) VALUE ','. CL**2 00032 15 X140-RCVD-DATE PIC X(10). CL**2 00033 15 FILLER PIC X(01) VALUE ','. CL**2 00034 15 X140-WRKR-CNT-1ST-MNTH PIC 9(08). CL**2 00035 15 FILLER PIC X(01) VALUE ','. DTSES140 00036 15 X140-WRKR-CNT-2ND-MNTH PIC 9(08). CL**2 00037 15 FILLER PIC X(01) VALUE ','. DTSES140 00038 15 X140-WRKR-CNT-3RD-MNTH PIC 9(08). CL**2 00039 15 FILLER PIC X(01) VALUE ','. DTSES140 00040 15 X140-RPT-SUBM PIC X(04). CL**2 00041 15 FILLER PIC X(01) VALUE ','. DTSES140 00042 15 X140-REMITTANCE PIC 9(11).99. CL**2 00043 15 FILLER PIC X(01) VALUE ','. CL**2 00044 15 X140-RESP-OPID PIC X(06). CL**2 00045 15 FILLER PIC X(363). CL**2