> Tech > Trouver le nom d’un programme RPG

Trouver le nom d’un programme RPG

Tech - Par Renaud ROSSET - Publié le 24 juin 2010
email

Q: J'ai besoin de déterminer le nom du programme RPG qui s'exécute à  partir d'un programme. Puis-je trouver cette information dans la structure de données du programme ou dans une API ?

R: L'information que vous recherchez se trouve dans la SDS (Status Data Structure) du programme. Toutefois, quand vous

Trouver le nom d’un programme RPG

dites que vous voulez connaître le nom du programme,
précisez : s’agit-il du nom du programme, de la procédure,
ou du module ? Avec RPG IV, vous voudrez peut-être
connaître les trois. Et vous trouverez cette information dans
la structure de données.
Pour extraire cette information en RPG IV V5R1 ou ultérieure,
codez le SDS comme le montre la figure 1, et RPG
remplira les valeurs des champs. Le Proc_Name (10 caractères)
est rempli avec le nom de la procédure principale. S’il
n’y a pas de procédure principale, la valeur est le nom associé
à  la source principale. Vous pouvez soit utiliser le mot-clé
*PROC, soit donner les valeurs 1 et 10 aux positions From et
To, respectivement.
Ensuite, le Pgm_Lib est rempli avec le nom de la bibliothèque
du programme, au cas où cela vous intéresserait. Le
Proc_Pgm est rempli avec le nom du programme contenant
la procédure. Et, finalement, le Proc_Mod est rempli avec le
nom du module contenant la procédure.

Pour une vue complète de la structure de données d’état
d’un programme V5R2, voir iSeries WebSphere
Development Studio ILE RPG Reference à  http://publib.
boulder.ibm.com/iseries/v5r2/ic2924/books/sm22/c0925084.
pdf.

Téléchargez cette ressource

Guide inmac wstore pour l’équipement IT de l’entreprise

Guide inmac wstore pour l’équipement IT de l’entreprise

Découvrez toutes nos actualités à travers des interviews, avis, conseils d'experts, témoignages clients, ainsi que les dernières tendances et solutions IT autour de nos 4 univers produits : Poste de travail, Affichage et Collaboration, Impression et Infrastructure.

Tech - Par Renaud ROSSET - Publié le 24 juin 2010