Réorientation des fichiers à  l’exécution

où la logique RPG peut être appelée directement à  partir d’un client Web ou GUI,
cela devient plus important. La prochaine version du RPG IV facilite quelque peu
les choses.
Avec l’introduction des nouveaux mots-clés EXTFILE et EXTMBR, cette tâche devient
bien plus facile. Les paramètres de ces nouveaux mots-clés peuvent être des constantes,
ou, mieux encore, des noms de variables, qui indiquent respectivement les noms
de fichier et de membre à  ouvrir. L’exemple de la figure 4 illustre le fonctionnement
d’ensemble de cela.

Dans notre exemple, la première carte F déclare le fichier MyFile, et l’initialise
à  FARR/MASTER dans le cadre du paramètre EXTFILE. Le mot-clé EXTMBR indique que
tous les membres seront ouverts quand on exécutera un code opération OPEN sur
MyFile. Quand on ouvrira réellement MyFile dans la carte C, le fichier réel utilisé
sera constitué par tous les membres du fichier FARR/MASTER.

Le second fichier que nous déclarons utilise un nom de champ comme paramètre pour
le mot-clé EXTFILE. Nous pouvons ainsi initialiser le champ d’après n’importe
quel fichier que nous voulons ouvrir à  l’exécution, puis l’ouvrir explicitement.
Mais que se passe-t-il s’il y a des substitutions actives ?
Pour le savoir, supposons qu’avant d’appeler le programme RPG illustré ci-dessus,
nous ayons la substitution suivante en vigueur :

OVRDBF PRODUCTION FARR/INVENTORY

Cela modifiera ce qui se retrouve ouvert quand nous exécutons l’instruction OPEN
product. Comme le champ YourFile contient la valeur FARR/PRODUCTION et que PRODUCTION
a une substitution en vigueur, le fichier réel ouvert est FARR/INVENTORY.