What program called this one?

[Guest.Visitor]

This response is probably too late since your message is a few months old, but here's some code we copied from Midrange Computing to get the calling program's name. We also have a module that uses an API that we bind to our triggers to do the same thing, but I think this technique is quicker to implement. Linda

[Guest.Visitor]

I have an RPG/400 program that is called by other pgms, and want to do various things based on the caller (but can't pass a parm because I don't have source for many of the calling pgms). How, in the called pgm, can I get the name of the pgm that called it?