Das ist doch eine Aussage:

https://www.ibm.com/docs/en/i/7.4.0?...m-calculations

Die Betonung liegt ja auf Free-Form. Occurs hat sich da auch überholt, da man dies locker mit DIM ersetzen kann. Nur die Zugriffe sind dann minimal anzupassen:
- Statt n occur array, eval ai = n
- Zugriff dann bei qualified ds(ai).feld oder feld(ai) bei nicht qualified.

Man beachte:
No change has been made to fixed-form calculations.

Da man Free/Fixed mischen kann, kannst du diese Zeile dann ja ggf. in fixed machen. Free/End-Free sind da nicht mehr erforderlich.