00001  01  OJRWE320-DATA-AREA.                                          05/13/02
00002                                                                   OJRWE320
00003                                                                      LV001
00004      05  WRK-EDIT-STATUS-IND          PIC  X(01) VALUE 'Y'.       OJRWE320
00005          88  WRK-EDIT-PASSED-88                  VALUE 'Y'.       OJRWE320
00006          88  WRK-EDIT-FAILED-88                  VALUE 'N'.       OJRWE320
00007                                                                   OJRWE320
00008                                                                   OJRWE320
00009      05  WRK-PARM-SUBJECT-YRQ          PIC S9(5)  COMP-3.         OJRWE320
00010                                                                   OJRWE320
00011      05  OJR-PARM-SUBJECT-YRQ          PIC X(3).                  OJRWE320