      *****************************************************************         
      * CALL #  - MMDDYY - PURPOSE                                    *         
      * 2006001 - 041706 - ADD FUNCTIONS 6500 & 8200.                 *         
      *****************************************************************         
       01            RWFDEF.                                                0031
           05        RWFLENK           PIC S9(04) COMP SYNC VALUE +017.     0035
041797*    05        RWFLENR           PIC S9(04) COMP SYNC VALUE +190.     0037
041706*    05        RWFLENR           PIC S9(04) COMP SYNC VALUE +314.     0037
041706     05        RWFLENR           PIC S9(04) COMP SYNC VALUE +350.     0037
           05        RWFFIL.                                                0038
             10      RWFFILDS          PIC  X(03).                          0040
             10      FILLER            PIC  X(06) VALUE 'RWF'.              0040
