José:
Encontré estas 2 sitios , que te pueden ser útiles:

http://www.code400.com/forum/forum/tips-techniques-tools-announcements/tips-for-the-iseries-as400/9840-program-to-retrieve-call-stack

http://www.rpgpgm.com/2017/11/program-stack-information-via-sql.html


atte.
Ignacio

De: forum.help400-boun...@listas.combios.es 
[mailto:forum.help400-boun...@listas.combios.es] En nombre de josepozzo
Enviado el: jueves, 21 de diciembre de 2017 12:04
Para: forum.help400 <forum.help400@listas.combios.es>
Asunto: Recuperar nombre del programa


Hola foro!
Como puedo obtener dentro del programa#2  Rpg,  el nombre de programa#1 desde 
el cual es invocado el programa#2.

Gracias
Saludos

-----------------------------------------------------------------
Notice of Confidentiality: The information transmitted is intended only for the 
sender and person or entity to which it is addressed and may contain 
confidential and/or privileged material. Any review, e-transmission, 
dissemination or other use of, or taking of any action in reliance upon, this 
information by persons or entities other than the intended recipient is 
prohibited.
If you received this in error, please contact the sender immediately by return 
electronic transmission and then immediately delete this transmission, 
including all attachments, without copying, distributing or disclosing same.
------------------------------------------------------------------
Aviso de Confidencialidad: Este correo electrónico y/o el material adjunto es 
para uso exclusivo del emisor y la persona o entidad a la que expresamente se 
le ha enviado, y puede contener información confidencial o material 
privilegiado. Si usted no es el destinatario legítimo del mismo, por favor 
repórtelo inmediatamente al remitente del correo y bórrelo.
Cualquier revisión, retransmisión, difusión o cualquier otro uso de este 
correo, por personas o entidades distintas a las del destinatario legítimo, 
queda expresamente prohibido. Este correo electrónico no pretende ni debe ser 
considerado como constitutivo de ninguna relación legal, contractual o de otra 
índole similar.
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Responder a