Das ist das übliche Problem, dass ein Feld nur einmal in einer DS vorhanden sein darf.
Möchtest du ein Feld in verschiedenen Strukturen ist "qualified" zu verwenden.
Ich denke aber nicht, dass dies dein Problem löst, da du dir ja wohl die Move's sparen willst.

Du kannst natürliche die externe DS um weitere Felder einfach ergänzen.
Schau dir das Listing an, von welcher Position bis zu welcher die Felder FILExxx gehen und hänge ein

D AR_Monate P von bis 2 dim(12)

an.
Dadurch überlagerst du die entsprechenden Felder mit dem Array.