RPG IV s’améliore à  nouveau dans la V5R2

L’amélioration la plus visible et la plus
controversée apportée au RPG en V5R1
était la spec de calcul en format libre.
Les instructions codées entre les directives
/Free et /End-Free sont spécifiées
dans un style en format libre. Comme
pour la plupart des autres langages de
programmation des dernières 40 années,
les instructions peuvent être décalées,
ou mises en retrait, pour bien
montrer la structure logique du code
programme. L’instruction est codée
avec le code opération en premier,
suivi des opérandes Factor 1, Factor 2
et Result Field.
Mais, dans un certain sens, le changement
le plus important était l’ajout
des mots-clés QUALIFIED et LIKEDS à 
la spec de définition. Le mot-clé QUALIFIED introduisait dans le langage
la notion de noms qualifiés. Il faut
se référer aux sous-champs dans les
structures de données qualifiées en
utilisant la syntaxe DSName.SubfName
plutôt que le nom du sous-champ seul.
A première vue, cela ressemble à  des
noms de sous-champs préfixés mais,
en réalité, c’est beaucoup plus puissant.
Vous pouvez définir une structure
de données en utilisant le mot-clé LIKEDS
et hériter de tous les souschamps
d’une autre structure de données.
Une structure de données
LIKEDS doit obligatoirement être une
structure de données qualifiée pour
éviter la collision de noms. Ce peut
être très utile dans des prototypes de
procédure, car vous pouvez définir les
paramètres de procédure en utilisant
LIKEDS.
Le programme de la figure 1
montre un exemple. Le paramètre de
la procédure Proc est défini comme la
structure de données DS en utilisant
LIKEDS. Ainsi, dans la procédure, le paramètre
Result est défini comme une
structure de données avec les mêmes
sous-champs que la structure de données
itemdesc. Ce devrait d’ailleurs
être la technique à  utiliser pour transmettre
des structures de données aux
procédures.