Page 1 sur 1
Equivalent RETURN dans un CL
Posté : mar. 25 mars 2008, 09:00:32
par fbillard
Afin d'optimiser les performances , y a t'il un équivalent au return RPG à mettre dans un CL , pour qu'il reste en mémoire si il est appelé souvent .
Cordialement
C TALHOUET
(sans texte)
Posté : mar. 25 mars 2008, 09:29:18
par cimmelé
Il existe une commande RETURN permettant de rendre le contrôle au programme appelant.
En revanche, je n'ai pas l'expérience d'un RETURN avec un fichier ouvert dans le programme et de savoir si le fichier reste ouvert.
à suivre...
RETURN en CL
Posté : dim. 30 mars 2008, 01:06:51
par cmasse
le RETURN en CL fait exactement la même chose que ENDPGM, cela facilite la programmation et evite simplement un "GOTO FIN"; sans plus.
le seul moyen de garder le CL en mémoire (et les fichiers ouverts) c'est que ce soit le CL qui appel le RPG, sous cette forme :
Code : Tout sélectionner
PGM
APPEL: CALL DUGAP parm(&RETOUR)
IF COND(&RETOUR = 'Encore') then (DO)
/* faire qqchose */
GOTO APPEL
ENDDO
/* sinon fin du pgm */
ENDPGM