Thanks. I was a bit vague. But I was basically wondering how to get from the 
PERFORM'ed paragraph(s) back to the originating PERFORM verb.

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets®

9151 Boulevard 26 . N. Richland Hills . TX 76010
(817) 255-3225 phone . 
[email protected] . www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets® is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company®, Mid-West National Life Insurance Company of TennesseeSM and The MEGA 
Life and Health Insurance Company.SM

> -----Original Message-----
> From: IBM Mainframe Discussion List 
> [mailto:[email protected]] On Behalf Of Mike Schwab
> Sent: Friday, April 08, 2011 2:17 PM
> To: [email protected]
> Subject: Re: COBOL abend debug question with AbendAid/CICS dump
> 
> Double check for a PERFORM label THRU DO-READ.  If present it should
> be using the label before the DO-READ.
> 
> On Fri, Apr 8, 2011 at 2:03 PM, McKown, John
> <[email protected]> wrote:
> > I am not really a COBOL programmer. But I am familar with 
> COBOL. Anyway, we had a looping transaction in CICS/TS 3.2 on 
> z/OS 1.10. I used a monitor program - Mainview for CICS from 
> BMC, to abend the transaction. This produced an AbendAid/CICS 
> dump. Which is of little use because our COBOL code is very 
> PERFORM heavy. Basically what the dump showed was that I was 
> in a paragraph which looked mainly like:
> >
> > DO-READ.
> >      EXEC CICS READ ...
> >     END EXEC.
> >
> >
> > The paragraph DO-READ is referenced via a PERFORM verb in 
> about 10 different places to read this file. How do I tell 
> which PERFORM was the one which was most likely looping? I.e. 
> I know how to backtrace a series of CALL verbs via save 
> areas. But how is this done for a PERFORM backtrace?
> >
> > John McKown
> 
> -- 
> Mike A Schwab, Springfield IL USA
> Where do Forest Rangers go to get away from it all?
> 
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
> 
> 

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to