RPG/RPGLE ?
Die Felder Menge01 bis Menge12 in einer DS definieren und redefinieren/überlagern per Dim(12).