00001  01  OJRWE417-DATA-AREA.                                          05/13/02
00002                                                                   OJRWE417
00003      05  OJR-PARM-SUBJECT-YRQ            PIC X(03).                  LV001
00004                                                                   OJRWE417
00005      05  OJR-PARM-RETURN-BY-DATE         PIC X(06).               OJRWE417
00006                                                                   OJRWE417
00007                                                                   OJRWE417
00008      05  OJR-SUBJECT-SLASH-QTR           PIC X(04).               OJRWE417
00009                                                                   OJRWE417
00010      05  OJR-UC30-FIRST-DEL-CUTOFF-DATE  PIC S9(09)  COMP-3.      OJRWE417
00011                                                                   OJRWE417
00012      05  OJR-UC30-FIRST-DEL-MAIL-DATE    PIC S9(09)  COMP-3.      OJRWE417
00013                                                                   OJRWE417
00014      05  OJR-FIRST-PURSUED-RPT-YRQ       PIC S9(05)  COMP-3.      OJRWE417
00015                                                                   OJRWE417
00016      05  OJR-SUBJECT-YRQ-DEF-DUE-DATE    PIC S9(09)  COMP-3.      OJRWE417
00017                                                                   OJRWE417
00018                                                                   OJRWE417
00019      05  OJR-SUBJECT-YRQ-PURSUED-IND     PIC  X(01).              OJRWE417
00020                                                                   OJRWE417
00021      05  OJR-SUBJECT-YRQ-RPT-DUE-DATE    PIC S9(09)  COMP-3.      OJRWE417
00022                                                                   OJRWE417
00023      05  OJR-SUBJECT-YRQ-UI-RATE         PIC S9(01)V9(04)  COMP-3.OJRWE417
00024          88 OJR-SUBJECT-YRQ-NO-UI-RATE-88       VALUE -9.9999.    OJRWE417
00025                                                                   OJRWE417
00026      05  OJR-SUB                         PIC S9(04)  COMP.        OJRWE417
00027                                                                   OJRWE417
00028      05  OJR-MTAD-LETTER-SENT-IND        PIC X(01).               OJRWE417
00029          88  OJR-MTAD-LETTER-SENT-88            VALUE 'Y'.        OJRWE417
00030          88  OJR-MTAD-NO-LETTER-SENT-88         VALUE 'N'.        OJRWE417
00031                                                                   OJRWE417
00032      05  OJR-MOPO-LETTER-SENT-IND        PIC X(01).               OJRWE417
00033          88  OJR-MOPO-LETTER-SENT-88            VALUE 'Y'.        OJRWE417
00034          88  OJR-MOPO-NO-LETTER-SENT-88         VALUE 'N'.        OJRWE417
00035                                                                   OJRWE417
00036      05  OJR-MTAA-LETTER-SENT-IND        PIC X(01).               OJRWE417
00037          88  OJR-MTAA-LETTER-SENT-88            VALUE 'Y'.        OJRWE417
00038          88  OJR-MTAA-NO-LETTER-SENT-88         VALUE 'N'.        OJRWE417
00039                                                                   OJRWE417
00040                                                                   OJRWE417
00041      05  OJR-EDIT-STATUS-IND             PIC X(01).               OJRWE417
00042          88  OJR-EDIT-PASSED-88                VALUE 'Y'.         OJRWE417
00043          88  OJR-EDIT-FAILED-88                VALUE 'N'.         OJRWE417
00044                                                                   OJRWE417
00045                                                                   OJRWE417
00046      05  WRK-PARM-SUBJECT-YRQ            PIC S9(05)  COMP-3.      OJRWE417
00047                                                                   OJRWE417
00048      05  WRK-PARM-RETURN-BY-DATE         PIC S9(09)  COMP-3.      OJRWE417
00049                                                                   OJRWE417
00050                                                                   OJRWE417
00051      05  WRK-SUBJECT-SLASH-QTR           PIC X(04).               OJRWE417
00052                                                                   OJRWE417
00053      05  WRK-UC30-FIRST-DEL-CUTOFF-DATE  PIC S9(09)  COMP-3.      OJRWE417
00054                                                                   OJRWE417
00055      05  WRK-UC30-FIRST-DEL-MAIL-DATE    PIC S9(09)  COMP-3.      OJRWE417
00056                                                                   OJRWE417
00057      05  WRK-FIRST-PURSUED-RPT-YRQ       PIC S9(05)  COMP-3.      OJRWE417
00058                                                                   OJRWE417
00059      05  WRK-SUBJECT-YRQ-DEF-DUE-DATE    PIC S9(09)  COMP-3.      OJRWE417
00060                                                                   OJRWE417
00061                                                                   OJRWE417
00062      05  WRK-SUBJECT-YRQ-PURSUED-IND     PIC  X(01).              OJRWE417
00063                                                                   OJRWE417
00064      05  WRK-SUBJECT-YRQ-RPT-DUE-DATE    PIC S9(09)  COMP-3.      OJRWE417
00065                                                                   OJRWE417
00066      05  WRK-SUBJECT-YRQ-UI-RATE         PIC S9(01)V9(04)  COMP-3.OJRWE417
00067          88 WRK-SUBJECT-YRQ-NO-UI-RATE-88       VALUE -9.9999.    OJRWE417
00068                                                                   OJRWE417
00069      05  WRK-SUB                         PIC S9(04)  COMP.        OJRWE417
00070                                                                   OJRWE417
00071      05  WRK-MTAD-LETTER-SENT-IND        PIC X(01).               OJRWE417
00072          88  WRK-MTAD-LETTER-SENT-88            VALUE 'Y'.        OJRWE417
00073          88  WRK-MTAD-NO-LETTER-SENT-88         VALUE 'N'.        OJRWE417
00074                                                                   OJRWE417
00075      05  WRK-MOPO-LETTER-SENT-IND        PIC X(01).               OJRWE417
00076          88  WRK-MOPO-LETTER-SENT-88            VALUE 'Y'.        OJRWE417
00077          88  WRK-MOPO-NO-LETTER-SENT-88         VALUE 'N'.        OJRWE417
00078                                                                   OJRWE417
00079      05  WRK-MTAA-LETTER-SENT-IND        PIC X(01).               OJRWE417
00080          88  WRK-MTAA-LETTER-SENT-88            VALUE 'Y'.        OJRWE417
00081          88  WRK-MTAA-NO-LETTER-SENT-88         VALUE 'N'.        OJRWE417
00082                                                                   OJRWE417
00083                                                                   OJRWE417
00084      05  WRK-EDIT-STATUS-IND             PIC X(01).               OJRWE417
00085          88  WRK-EDIT-PASSED-88                VALUE 'Y'.         OJRWE417
00086          88  WRK-EDIT-FAILED-88                VALUE 'N'.         OJRWE417