> -----Original Message----- > From: IBM Mainframe Discussion List > [mailto:[email protected]] On Behalf Of Frank Swarbrick > Sent: Monday, April 25, 2011 3:57 PM > To: [email protected] > Subject: Re: Recursive PERFORM in COBOL > > Couple questions.... > > What do you mean that a recursive PERFORM is forbidden? > While I can't think of a good use for it, and when I tried it > I got into a loop, it doesn't cause a compile or run-time error. > Here's what I tried: > <snip> > > So while it doesn't "work", neither is it apparently disallowed.
Yes. My poor choice of words. The book says that "results are unpredictable". That makes it "forbiden" in my lexicon. > > In any case, I wonder if it would be useful to open a PMR to > see if they have any suggestions on how to debug your issue. > It's an interesting issue, and in my 15 years of COBOL > programming I don't think I've ever had a case where I had to > debug such a thing. Lucky perhaps? > > Can this issue not be reproduced in a test/dev region? Not so far. It appears to be data related in some way. > > I'm surprised it's up to a sysprog to figure out this issue. > I don't think my sysprogs would touch COBOL with a ten foot > pole. :-) They'd shoot us if we (appl dev) gave this to > them to resolve. And rightly so. Basically, if AbendAid does not solve the problem for them, our applications staff will declare the problem insoluble and will only assign a low priority to it (unless kicked by management). They will expect somebody else to detect the loop and cancel the transaction when it occurs. > > Frank > > -- > > Frank Swarbrick -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 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(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM ---------------------------------------------------------------------- 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
