00001 *****                                                             05/22/01
00002 *                                                                 DTSIT061
00003 *    DTSIT061    ELECTRONIC MEDIA BATCH UPDATE TRIGGER RECORD.       LV001
00004 *                                                                 DTSIT061
00005 *                                                                 DTSIT061
00006 *                04/11/2001  INITIAL DEVELOPMENT.  GD             DTSIT061
00007 *                                                                 DTSIT061
00008 *                                                                 DTSIT061
00009 *****                                                             DTSIT061
00010                                                                   DTSIT061
00011          10  T061-LENGTH         PIC S9(04)  COMP.                DTSIT061
00012                                                                   DTSIT061
00013          10  T061-COMMON-AREA.                                    DTSIT061
00014              15  T061-REC-TYPE           PIC  X(03)  VALUE '061'. DTSIT061
00015                  88  T061-061-88                     VALUE '061'. DTSIT061
00016              15  T061-LOG-NO             PIC  9(10).              DTSIT061
00017              15  T061-ABSTIME            PIC S9(15)       COMP-3. DTSIT061
00018                                                                   DTSIT061
00019          10  T061-DATA-AREA.                                      DTSIT061
00020              15  T061-TYPE               PIC  9(02).              DTSIT061
00021                  88  T061-TYPE-WAGE-88        VALUE 01.           DTSIT061
00022                                                                   DTSIT061
00023              15  FILLER                  PIC  X(39).              DTSIT061