Refactoring RPG - Part 1
By Stephen West

Figure 5. CSPFIELDS.pf - Fields and Attributes

      ****************************************************************
      * Description:  Information on fields used in source and files.
      ****************************************************************
     A          R CSRFIELDS
     A            FILETYPE      10A
     A            LIBRARY       10A
     A            FILE          10A
     A            FORMAT        10A
     A            FIELD         15A
     A            LENGTH         7S 0
     A            DECIMALS       5S 0
     A            DATATYPE       1A
     A            ARRAY          1A
     A            NEWNAME       15A
     A            WHEREDEF       1A         TEXT('Where is field defined')
     A          K FIELD
     A          K FILE
     A          K LIBRARY