Gracias Lorenzo, es algo rudimentario pero supongo que efectivo. Aunque obliga a modificar todas las rutinas llamadas de esta forma. Sería muy interesante averiguar lo que comenté, si el programa ILE RPG llamador cuando acaba con SETON LR, lo hace automáticamente el RUNTIME.
Saludos, Javier ________________________________ De: Forum.help400 <[email protected]> en nombre de Lorenzo Martinez <[email protected]> Enviado: martes, 27 de abril de 2021 20:14 Para: forum.help400 Asunto: Re: Eliminar programa de memoria Yo creo recordar que hacía algo parecido a lo que se comenta aquí, con RPG-FREE o sin él: https://www.mcpressonline.com/programming/rpg/practical-rpg-activation-groups-and-inlr <https://www.mcpressonline.com/programming/rpg/practical-rpg-activation-groups-and-inlr> Al principio del programa se inserta este código p.ej., y cuando se quiere descargar el programa de memoria y que cierre todo, se le llama sin parámetros, o con algún parámetro expresamente para ello, para que active el LR y termine con todo cerrado en el RETURN: // Check for shutdown request if %parms = 0; *inlr = *on; return; endif; El mar, 27 abr 2021 a las 12:50, Javier Baca Lechuga (<[email protected]<mailto:[email protected]>>) escribió: Buenos días, ¿Entonces cómo se haría en ile free? Saludos, Javier ________________________________ From: Forum.help400 <[email protected]<mailto:[email protected]>> on behalf of Alberto Martinez <[email protected]<mailto:[email protected]>> Sent: Tuesday, April 27, 2021 7:20:25 AM To: forum.help400 <[email protected]<mailto:[email protected]>> Subject: RE: Eliminar programa de memoria Buenos días. Haciendo memoria…diría que en ILE’Normal’ ya no estaba soportado. De hecho, creo que con el CVTRPGSRC ya te tendría que dar el error de la sentencia FREE Saludos. De: Forum.help400 <[email protected]<mailto:[email protected]>> En nombre de Javier Baca Lechuga Enviado el: viernes, 23 de abril de 2021 19:24 Para: forum.help400 <[email protected]<mailto:[email protected]>> Asunto: ** Newsletter ** Eliminar programa de memoria Buenas tardes : Tengo un programa A escrito en RPG-III (no ILE) que en un bucle llama muchas veces a un programa B. Para agilizar la ejecución del programa A, el programa B acaba con RETRN (para dejarlo en memoria). Cuando finaliza el bucle del programa A, quito de memoria el programa B con FREE ‘B’. Hasta aquí, todo correcto. En RPG ILE FREE, parece que la sentencia FREE no compila. ¿Sabe alguien si realmente la han quitado o es que en RPG ILE FREE no hace falta liberar memoria porque al finalizar A ya lo hace el sistema?. Un saludo y muchas gracias, Javier ____________________________________________________ Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 © Publicaciones Help400, S.L.
____________________________________________________ �nete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 � Publicaciones Help400, S.L.
