RE: Integrity help?

["Walden Leverich" <walden@xxxxxxxxxxxxxxx>]

You are quite a sick man, but thanks. Please tell me you did not throw that
together in response to my e-mail and that you had it lying around
somewhere.

-Walden

-----Original Message-----
From: mcsnet!midrange.com!midrange-l-owner@Mcs.Net
[mailto:mcsnet!midrange.com!midrange-l-owner@Mcs.Net]On Behalf Of Pete
Hall
Sent: Sunday, January 11, 1998 12:01 AM
To: MIDRANGE-L@midrange.com
Subject: RE: Integrity help?


At 07:34 PM 1/10/98 -0500, Walden Leverich wrote:
>
>I would love to see an API to list the program stack, but I sure can't find
>one, and I've looked hard. Anyone with enough knowledge of the internal
>OS/400 job structures and MI care to write one?
>
Walden,

Here's some code that'll get you started. It returns the name of the program
n
levels above the current program in the invocation stack. The current
program
is of course, the MI program, so the program that calls it would be at
offset
<snip>

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "MIDRANGE-L@midrange.com".
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---