00001 *****                                                             08/28/02
00002 *                                                                 DESIR110
00003 *    DESIR110    ELECTRONIC MEDIA STATISTICS                         LV001
00004 *                REPORT RECORD.                                   DESIR110
00005 *                                                                 DESIR110
00006 *                                                                 DESIR110
00007 *                03/21/2001  INITIAL DEVELOPMENT. GD              DESIR110
00008 *                                                                 DESIR110
00009 *****                                                             DESIR110
00010                                                                   DESIR110
00011          10  R110-LENGTH              PIC S9(04)  COMP.           DESIR110
00012                                                                   DESIR110
00013          10  R110-SORT-AREA.                                      DESIR110
00014              15  R110-REC-TYPE        PIC  X(03)  VALUE '110'.    DESIR110
00015                                                                   DESIR110
00016          10  R110-DATA-AREA.                                      DESIR110
00017              15  R110-START-DATE            PIC S9(09)  COMP-3.   DESIR110
00018              15  R110-END-DATE              PIC S9(09)  COMP-3.   DESIR110
00019              15  R110-RECEIVED-CNT          PIC  9(07).           DESIR110
00020              15  R110-SUCCESSFUL-CNT        PIC  9(07).           DESIR110
00021              15  R110-ERROR-CNT             PIC  9(07).           DESIR110
00022              15  R110-FAILED-CNT            PIC  9(07).           DESIR110
00023              15  R110-IN-PROCESS-CNT        PIC  9(07).           DESIR110
00024              15  R110-WAGE-SUCCESS-CNT      PIC  9(07).           DESIR110
00025              15  R110-WAGE-ERROR-CNT        PIC  9(07).           DESIR110
00026              15  R110-WAGE-FAILED-CNT       PIC  9(07).           DESIR110