Moin Andreas,

hier der Spoolfile-Abschnitt:
Code:
    19+DPGMSDS          SDS                  qualified 
    20+D  PGMNAM                 1     10              
    21+D  STATUS                11     15              
    22+D  PRVSTS                16     20              
    23+D  RPGLIN                21     28              
    24+D  SUBROU                29     36              
    25+D  NBRPAR                37     39              
    26+D  XMSGID                40     46              
    27+D  XMSGTY                40     42              
    28+D  MIODT                 47     50              
    29+D  IWRKAR                51     80              
    30+D  PGMLIB                81     90              
    31+D  XMSGTX                91    170              
    32+D  RPGEXC               171    174              
    33+D  JAHRHU               199    200              
    34+D  XFILE                201    208              
    35+D  XINFO                209    243              
    36+D  JOB                  244    253    
    37+D  USER                 254    263    
    38+D  NBR                  264    269    
    39+D  RUNDAT               270    275    
    40+D  DATSYS               276    281    
    41+D  TIMSYS               282    287    
    42+D  CMPDAT               288    293    
    43+D  CMPTIM               294    299    
    44+D  CMPLVL               300    303    
    45+D  SRCFIL               304    313    
    46+D  SRCLIB               314    323    
    47+D  SRCMBR               324    333
und hier der Quellcode:

Code:
      *
      * ‚Programm-Status Datenstruktur
      *‚-----------------------------------------------
     DPGMSDS          SDS                  qualified
     D  PGMNAM                 1     10
     D  STATUS                11     15
     D  PRVSTS                16     20
     D  RPGLIN                21     28
     D  SUBROU                29     36
     D  NBRPAR                37     39
     D  XMSGID                40     46
     D  XMSGTY                40     42
     D  MIODT                 47     50
     D  IWRKAR                51     80
     D  PGMLIB                81     90
     D  XMSGTX                91    170
     D  RPGEXC               171    174
     D  JAHRHU               199    200
     D  XFILE                201    208
     D  XINFO                209    243
     D  JOB                  244    253
     D  USER                 254    263
     D  NBR                  264    269
     D  RUNDAT               270    275
     D  DATSYS               276    281
     D  TIMSYS               282    287
     D  CMPDAT               288    293
     D  CMPTIM               294    299
     D  CMPLVL               300    303
     D  SRCFIL               304    313
     D  SRCLIB               314    323
     D  SRCMBR               324    333
Habe ich etwas übersehen.
Der Code stammt grundsätzlich noch von OS V5R4, mittlerweile stehen wir bei V7R1M0.

Gruß

Andreas