      *****************************************************************
      * K=017 D=0173 R=0190   REPORT WORK FILE
      *****************************************************************
      * CALL #  - MMDDYY - PURPOSE                                    *
      * FIX9701 - 041397 - EXPAND PRECISION OF AMT FIELDS             *
      * FIX9908 - 041499 - ADDED CHARTER SCHOOL                       *
      * 2006001 - 041706 - ADD FUNCTIONS 6500 & 8200.
      *****************************************************************
      *
       01            RWF.
           05        RWFKEY.
001          10      RWFDIST           PIC  X(02).
003          10      RWFFY             PIC  X(02).
005          10      RWFFUND           PIC  X(01).
             10      RWFTABLE.
006            15    RWFTABLE9         PIC  9(05).
011          10      RWFSCHL           PIC  X(04).
015          10      RWFPGM            PIC  X(03).
           05        RWFDATA.
             10      RWFDATAC.
018            15    FILLER            PIC  X(11).
             10      RWFDATAP.
041797*        15    RWFDIRECT.
041797*          20  RWFDSAL           PIC S9(09)       COMP-3.
041797*          20  RWFDBEN           PIC S9(09)       COMP-3.
041797*          20  RWFDPRCH          PIC S9(09)       COMP-3.
041797*          20  RWFDMATSUP        PIC S9(09)       COMP-3.
041797*          20  RWFDOTHER         PIC S9(09)       COMP-3.
041797*          20  RWFDCAP           PIC S9(09)       COMP-3.
041797*        15    RWFRECON   REDEFINES  RWFDIRECT.
041797*          20  RWFRRECEN         PIC S9(09)       COMP-3.
041797*          20  RWFROTHER         PIC S9(09)       COMP-3.
041797*          20  RWFRCAP           PIC S9(09)       COMP-3.
041797*          20  RWFRCMTYSRVC      PIC S9(09)       COMP-3.
041797*          20  RWFRDEBT          PIC S9(09)       COMP-3.
041797*          20  RWFRFEDIND        PIC S9(09)       COMP-3.
041797*        15    RWFSIND.
041797*          20  RWFSI6100         PIC S9(09)       COMP-3.
041797*          20  RWFSI6200         PIC S9(09)       COMP-3.
041797*          20  RWFSI6300         PIC S9(09)       COMP-3.
041797*          20  RWFSI6400         PIC S9(09)       COMP-3.
041797*          20  RWFSI7300         PIC S9(09)       COMP-3.
041797*          20  RWFSI7400         PIC S9(09)       COMP-3.
041797*          20  RWFSI7600         PIC S9(09)       COMP-3.
041797*          20  RWFSI7700         PIC S9(09)       COMP-3.
041797*          20  RWFSI7800         PIC S9(09)       COMP-3.
041797*          20  RWFSI7900         PIC S9(09)       COMP-3.
041797*          20  RWFSI8100         PIC S9(09)       COMP-3.
041797*        15    RWFDIND.
041797*          20  RWFDI6100         PIC S9(09)       COMP-3.
041797*          20  RWFDI6200         PIC S9(09)       COMP-3.
041797*          20  RWFDI6300         PIC S9(09)       COMP-3.
041797*          20  RWFDI6400         PIC S9(09)       COMP-3.
041797*          20  RWFDI7100         PIC S9(09)       COMP-3.
041797*          20  RWFDI7200         PIC S9(09)       COMP-3.
041797*          20  RWFDI7400         PIC S9(09)       COMP-3.
041797*          20  RWFDI7500         PIC S9(09)       COMP-3.
041797*          20  RWFDI7600         PIC S9(09)       COMP-3.
041797*          20  RWFDI7700         PIC S9(09)       COMP-3.
041797*          20  RWFDI7800         PIC S9(09)       COMP-3.
041797*          20  RWFDI7900         PIC S9(09)       COMP-3.
041797*          20  RWFDI8100         PIC S9(09)       COMP-3.
041797*        15    RWFTOTAL          PIC S9(11)       COMP-3.
041797         15    RWFDIRECT.
041797           20  RWFDSAL           PIC S9(10)V9(07) COMP-3.
041797           20  RWFDBEN           PIC S9(10)V9(07) COMP-3.
041797           20  RWFDPRCH          PIC S9(10)V9(07) COMP-3.
041797           20  RWFDMATSUP        PIC S9(10)V9(07) COMP-3.
041797           20  RWFDOTHER         PIC S9(10)V9(07) COMP-3.
041797           20  RWFDCAP           PIC S9(10)V9(07) COMP-3.
041797         15    RWFRECON   REDEFINES  RWFDIRECT.
041499*          20  RWFRRECEN         PIC S9(10)V9(07) COMP-3.
041499*          20  RWFROTHER         PIC S9(10)V9(07) COMP-3.
041499*          20  RWFRCAP           PIC S9(10)V9(07) COMP-3.
041499*          20  RWFRCMTYSRVC      PIC S9(10)V9(07) COMP-3.
041499*          20  RWFRDEBT          PIC S9(10)V9(07) COMP-3.
041499*          20  RWFRFEDIND        PIC S9(10)V9(07) COMP-3.
041499           20  RWFRRECEN         PIC S9(11)       COMP-3.
041499           20  RWFROTHER         PIC S9(11)       COMP-3.
041499           20  RWFRCAP           PIC S9(11)       COMP-3.
041499           20  RWFRCMTYSRVC      PIC S9(11)       COMP-3.
041499           20  RWFRDEBT          PIC S9(11)       COMP-3.
041499           20  RWFRFEDIND        PIC S9(11)       COMP-3.
041499           20  RWFRCHRTR         PIC S9(11)       COMP-3.
041499           20  FILLER            PIC X(12).
041797         15    RWFSIND.
041797           20  RWFSI6100         PIC S9(10)V9(07) COMP-3.
041797           20  RWFSI6200         PIC S9(10)V9(07) COMP-3.
041797           20  RWFSI6300         PIC S9(10)V9(07) COMP-3.
041797           20  RWFSI6400         PIC S9(10)V9(07) COMP-3.
041706           20  RWFSI6500         PIC S9(10)V9(07) COMP-3.
041797           20  RWFSI7300         PIC S9(10)V9(07) COMP-3.
041797           20  RWFSI7400         PIC S9(10)V9(07) COMP-3.
041797           20  RWFSI7600         PIC S9(10)V9(07) COMP-3.
041797           20  RWFSI7700         PIC S9(10)V9(07) COMP-3.
041797           20  RWFSI7800         PIC S9(10)V9(07) COMP-3.
041797           20  RWFSI7900         PIC S9(10)V9(07) COMP-3.
041797           20  RWFSI8100         PIC S9(10)V9(07) COMP-3.
041706           20  RWFSI8200         PIC S9(10)V9(07) COMP-3.
041797         15    RWFDIND.
041797           20  RWFDI6100         PIC S9(10)V9(07) COMP-3.
041797           20  RWFDI6200         PIC S9(10)V9(07) COMP-3.
041797           20  RWFDI6300         PIC S9(10)V9(07) COMP-3.
041797           20  RWFDI6400         PIC S9(10)V9(07) COMP-3.
041706           20  RWFDI6500         PIC S9(10)V9(07) COMP-3.
041797           20  RWFDI7100         PIC S9(10)V9(07) COMP-3.
041797           20  RWFDI7200         PIC S9(10)V9(07) COMP-3.
041797           20  RWFDI7400         PIC S9(10)V9(07) COMP-3.
041797           20  RWFDI7500         PIC S9(10)V9(07) COMP-3.
041797           20  RWFDI7600         PIC S9(10)V9(07) COMP-3.
041797           20  RWFDI7700         PIC S9(10)V9(07) COMP-3.
041797           20  RWFDI7800         PIC S9(10)V9(07) COMP-3.
041797           20  RWFDI7900         PIC S9(10)V9(07) COMP-3.
041797           20  RWFDI8100         PIC S9(10)V9(07) COMP-3.
041706           20  RWFDI8200         PIC S9(10)V9(07) COMP-3.
041797         15    RWFTOTAL          PIC S9(11)V9(07) COMP-3.
185            15    FILLER            PIC  X(06).
