Code:
D MASN            DS                  DIM(30) QUALIFIED     
D  MA                            4S 0                       
D                 DS                                        
D M                              4S 0 DIM(%ELEM(MASN))
oder
Code:
D MASN            DS                  DIM(30) QUALIFIED     
D  MA                            4S 0                       
D mm              DS                                        
D M                              4S 0 DIM(%ELEM(MASN))
Beides versucht.
sowohl die schleife als auch dein 1. vorschlag bringen
Code:
*RNF5343 30    505 019600  Feldgruppe hat zu viele übergangene Indizes; die Bestimmung
                           wird ignoriert.
Wuste gar nicht,das ILERPG so schwer ist.

HILFE
Max