If you are on Release 7.2 (current PTF Level) or higher, you may have a look
at the STACK_INFO UDTF (Db2 Service).
The following SELECT-Statement will return the call stack of the current
job.

Select * from Table(Stack_Info()) x;

If you pass any active job name as parameter to the table function, you'll
get the call stack of this job:
Select * from Table(Stack_Info('123478/QTMHHTTP/XXXXXX')) x
Order By Ordinal_Position;

Mit freundlichen Grüßen / Best regards

Birgitta Hauser

"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
?Train people well enough so they can leave, treat them well enough so they
don't want to.? (Richard Branson)


-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxx> On Behalf Of James H. H.
Lampert
Sent: Freitag, 27. April 2018 22:42
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Subject: Re: Anybody know a good way for a program to see what's on its
job's call-stack?

On 4/27/18, 1:40 PM, Gary Monnier wrote:
The only thing I can think of is to use the IBM Knowledge Center -
Retrieve Call Stack (QWVRCSTK) API -
https://www.ibm.com/support/knowledgecenter/ssw_ibm_i_71/apis/qwvrcstk
.htm

Thanks. That would probably do it. I guess there's a downside to looking up
system APIs in the old V2R3 API manual. ;-)

--
JHHL

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe,
or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link:
http://amzn.to/2dEadiD


This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].