Das musst du im ILERPG machen.
Da kannst du mit der DS arbeiten und die Pseudoarrayfelder mit der Basisreferenz als Array defineren.

dcl-ds Data name('DATEI') qualified;
end-ds;

dcl-s Basis * inz(%addr(Data.Feld001));
dcl-s FeldArray like(Data.Feld001) dim(nnn);

Per SQL gehts dann einfach pauschal.