Prototypes : Remplacer une *Entry Plist

Vous savez probablement bien coder un prototype et une interface
de procédure pour une sous-procédure. Mais saviez
que vous pouvez utiliser des définitions PR/PI pour remplacer
la *Entry Plist pour un programme RPG IV ? Lorsque vous
codez une interface de procédure pour une procédure principale
(c’est-à -dire un programme), il faut tenir compte de
quelques exigences supplémentaires :

• Le prototype pour la procédure
  principale doit inclure le mot-clé
  ExtPgm.

• Le prototype doit précéder l’interface
  de procédure.

• L’interface de procédure doit être
  nommée (du même nom que le
  prototype).

Pour nommer le prototype et l’interface
de procédure, vous pouvez
choisir : soit nommer les descriptions
PR et PI pour correspondre au nom
du module, soit attribuer un nom de
votre choix – peut-être un nom standard
comme Main. Si le nom sur les
descriptions PR/PI ne correspond pas
au nom du module, vous devez spécifier
le nom du module avec le motclé
ExtPgm (ExtPgm(‘MyPgm’), par
exemple).
La figure 1 montre un exemple
de *Entry Plist pour un programme
nommé MyPgm et un couple
d’exemples de combinaisons PR/PI
pour le remplacer. Vous pouvez appeler
ce programme à  partir de tout
autre programme, et ce, que le programme
appelant prototype l’appel
ou non. Le programme appelant
peut même être un programme CL
ou un programme RPG III.
Vous pouvez souhaiter passer à 
l’utilisation des descriptions PR/PI au lieu d’une *Entry Plist,
pour plusieurs raisons. Tout d’abord, le coding est en harmonie
avec celui qu’exigent les sous-procédures, qui ne supportent
pas *Entry Plist. Deuxièmement, la spécification de
remplacement en format libre pour C-specs ne supporte pas
l’opération Plist ou Parm ; le coding en format libre rend la
*Entry Plist obsolète. Enfin, vous pouvez bénéficier du prototypage
pour mieux contrôler la manière dont les paramètres
sont transmis, en utilisant des mots-clés de prototypage
comme Const et Options (*NoPass).
A noter qu’on ne peut pas transmettre des paramètres
par Value à  une procédure principale et que cette dernière
ne prend pas en charge une valeur de renvoi.