RE: Retrieve the name of the caller

Do you have RPG xTools? 
If so, do this:

      GetCallerInfo('*PGM' : myCaller);

Otherwise you have at least two options.
1) Use the Retrieve Callstack Entries API.
2) Send/Receive a message to *PRV and check out the QMHRPGMN01 subfield of the
QMHRS structure.

-Bob Cozzi
www.iSeriesTV.com
iPod your industry news instead of reading it.
Coming July 18, 2006
Ask your friends to tune into iSeriesTV.com


-----Original Message-----
From: rpg400-l-bounces+cozzi=rpgiv.com@xxxxxxxxxxxx
[mailto:rpg400-l-bounces+cozzi=rpgiv.com@xxxxxxxxxxxx] On Behalf Of praveen
gunda
Sent: Thursday, June 08, 2006 10:57 AM
To: RPG programming on the AS400 / iSeries
Subject: Retrieve the name of the caller

How can I get the name of the called program from inside the current
program?

Eg: PgmA calls PgmB

inside PgmB how can I get the name of the called Program, which in this case
should be PgmA