RPG IV Program Status Data Structure copybook member

     D* Program Status Data Structure
     D PSDS           SDS
     D*                Procedure/program name
     D  S#PGM                  1     10
     D*                Status code
     D  S#STAT                11     15  0
     D*                Previous status code
     D  S#PSTA                16     20  0
     D*                Source statement sequence number
     D  S#SEQ#                21     28
     D*                Routine
     D  S#RTN                 29     36
     D*                Number of parameters
     D  S#PARM                37     39  0
     D*                Exception message ID
     D  S#EXID                40     46
     D*                Exception type
     D  S#EXCT                40     42
     D*                Exception number
     D  S#EXC#                43     46
     D*                HI/ODT number
     D  S#ODT#                47     50
     D*                Message work area
     D  S#MWA                 51     80
     D*                Library in which program is located
     D  S#LIB                 81     90
     D*                Exception data
     D  S#EXCD                91    170
     D*                Exception ID
     D  S#EXCI               171    174
     D*                First 2 digits of *YEAR
     D  S#YEAR               199    200
     D*         Last file on which operation was performed
     D  S#FILE               201    208
     D*                File status
     D  S#FLST               209    243
     D*                Job name
     D  S#JOB                244    253
     D*                User profile
     D  S#USER               254    263
     D*                Job number
     D  S#JOB#               264    269  0
     D*                Date job entered system
     D  S#EDAT               270    275  0
     D*                System date
     D  S#SDAT               276    281  0
     D*                System time
     D  S#STIM               282    287  0
     D*                Compile date
     D  S#CDAT               288    293
     D*                Compile time
     D  S#CTIM               294    299
     D*                Compiler level
     D  S#LEVL               300    303
     D*                Source file name
     D  S#SRCF               304    313
     D*                Source file library
     D  S#SRCL               314    323
     D*                Source file member
     D  S#SRCM               324    333

[report a broken link by clicking here]