00001 *****                                                             07/01/08
00002 *                                                                 DTSIT003
00003 *    DTSIT003    NOTEPAD TRANSACTION RECORD.                         LV003
00004 *                01/14/2005  INITIAL DEVELOPMENT.           GD    DTSIT003
00005 *                06/11/2008  MODIFIED TO INCLUDE MEVL RECS  GD    DTSIT003
00006 *                                                                 DTSIT003
00007 *                THIS RECORD IS USED TO PASS AN MNTE NOTEPAD      DTSIT003
00008 *                RECORD TO THE DAILY TAX UPDATE FROM EXTERNAL     DTSIT003
00009 *                BATCH PROCESSES SUCH AS UC30 REPORT PROCESSING   DTSIT003
00010 *                FROM ELECTRONIC MEDIA.                           DTSIT003
00011 *                                                                 DTSIT003
00012 *****                                                             DTSIT003
00013                                                                   DTSIT003
00014          10  T003-LENGTH         PIC S9(04)  COMP.                DTSIT003
00015                                                                   DTSIT003
00016          10  T003-COMMON-AREA.                                    DTSIT003
00017 *            15  T003-REC-TYPE           PIC  X(03)  VALUE '003'. DTSIT003
00017              15  T003-REC-TYPE           PIC  X(03).              DTSIT003
00018              15  T003-EMP-NO             PIC S9(07)       COMP-3. DTSIT003
00019              15  T003-ORIGIN             PIC  X(10).              DTSIT003
00020              15  FILLER REDEFINES T003-ORIGIN.                    DTSIT003
00021                  20  T003-OP-ID          PIC  X(08).              DTSIT003
00022                  20  T003-SCR-ID         PIC  X(02).              DTSIT003
00023              15  T003-SYS-DATE           PIC S9(09)       COMP-3. DTSIT003
00024              15  T003-SYS-TIME           PIC S9(07)       COMP-3. DTSIT003
00025                                                                   DTSIT003
00026          10  T003-DATA-AREA.                                      DTSIT003
00027              15  T003-TRN-CD             PIC  X(02).              DTSIT003
00028                  88  T003-ADD-MNTE-88        VALUE '01'.          DTSIT003
00029                  88  T003-ADD-MEVL-88        VALUE '02'.          DTSIT003
00030                                                                   DTSIT003
00031              15  T003-REC-AREA               PIC X(1267).         DTSIT003
00032              15  T003-MNTE-REC REDEFINES T003-REC-AREA            DTSIT003
00033                                              PIC  X(1267).        DTSIT003
00034              15  T003-MEVL-REC REDEFINES T003-REC-AREA            DTSIT003
00035                                              PIC  X(1267).        DTSIT003