00001 *****                                                             04/19/99
00002 *                                                                 DTSIR506
00003 *   DTSIR506   RATE CUTOFF TRANSFERS OF EXPERIENCE REPORT RECORD.    LV003
00004 *                                                                 DTSIR506
00005 *****                                                             DTSIR506
00006                                                                      CL**2
00007          10  R506-LENGTH         PIC S9(04)  COMP.                   CL**2
00008                                                                      CL**2
00009          10  R506-SORT-AREA.                                      DTSIR506
00010              15  R506-REC-TYPE           PIC  X(03).                 CL**2
00011              15  R506-SUCC-EMP-NO        PIC S9(07)  COMP-3.         CL**2
00012              15  R506-PRED-EMP-NO        PIC S9(07)  COMP-3.         CL**2
00013              15  R506-REL-EFF-DATE       PIC S9(09)  COMP-3.         CL**2
00014                                                                      CL**2
00015          10  R506-DATA-AREA.                                      DTSIR506
00016              15  R506-EXP-CUTOFF-DATE    PIC S9(09)       COMP-3. DTSIR506
00017              15  R506-EFF-QTR            PIC S9(05)       COMP-3. DTSIR506
00018              15  R506-PRIOR-RESERVE-AMT  PIC S9(09)V9(02) COMP-3.    CL**2
00019              15  R506-UI-TAX-PAID-AMT    PIC S9(09)V9(02) COMP-3.    CL**2
00020              15  R506-TRUST-FUND-INTEREST-AMT                        CL**3
00021                                          PIC S9(09)V9(02) COMP-3.    CL**2
00022              15  R506-BENEFITS-CHARGED-AMT                           CL**3
00023                                          PIC S9(09)V9(02) COMP-3.    CL**3
00024              15  R506-WAGES-AREA                                     CL**2
00025                  OCCURS 3 TIMES                                      CL**2
00026                  INDEXED BY R506-WAGES-IDX.                          CL**2
00027                  20  R506-WAGES-FROM-YRQ PIC S9(05)       COMP-3.    CL**2
00028                  20  R506-WAGES-THRU-YRQ PIC S9(05)       COMP-3.    CL**2
00029                  20  R506-TOT-WAGE       PIC S9(11)V9(02) COMP-3.    CL**2
00030                  20  R506-TAX-WAGE       PIC S9(11)V9(02) COMP-3.    CL**2
00031              15  R506-EARLIEST-LIAB-DATE PIC S9(09)       COMP-3.    CL**2
00032              15  R506-MISS-RPT-CNT       PIC S9(03)       COMP-3.    CL**2
00033              15  R506-TOT-UI-TAX-BALANCE-AMT                         CL**2
00034                                          PIC S9(09)V9(02) COMP-3.    CL**2