Re: How does COBOL detect a recursive call?

2016-08-17 Thread Bill Woodger
That, Victor, could still require "IS RECURSIVE" on the PROGRAM-ID to avoid the abend with the IGZ0064S message (because the "handler" is invoked from the same program), depending the linkedit/binder RENT/REUS values. So it doesn't make it any simpler at the level of the mechanics. Also, when

Re: How does COBOL detect a recursive call?

2016-08-17 Thread Victor Gil
Chuck, Just another weird suggestion which may [or may not] work in your case - why can't the very SAME entry point also serve as the error handler? I mean, it is being called with a parameter list, so by parsing the input parameters can't it determine the exact reason for call? And if it's

Re: How does COBOL detect a recursive call?

2016-08-11 Thread Frank Swarbrick
subprogram. From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of Farley, Peter x23353 <peter.far...@broadridge.com> Sent: Thursday, August 11, 2016 10:16 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: How does COBOL detect a recursive

Re: How does COBOL detect a recursive call?

2016-08-11 Thread Farley, Peter x23353
nt: Thursday, August 11, 2016 8:07 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: How does COBOL detect a recursive call? > Excluding cursing, and including recursing. > > Any IT management who chooses that route over > TwoSimpleProgramsWithNothingButOrdinaryCodeCompile/ > LinkProce

Re: How does COBOL detect a recursive call?

2016-08-11 Thread Frank Swarbrick
<IBM-MAIN@LISTSERV.UA.EDU> on behalf of John McKown <john.archie.mck...@gmail.com> Sent: Thursday, August 11, 2016 6:07 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: How does COBOL detect a recursive call? On Thu, Aug 11, 2016 at 12:48 AM, Bill Woodger <bill.wood...@gmail.com&g

Re: How does COBOL detect a recursive call?

2016-08-11 Thread John McKown
On Thu, Aug 11, 2016 at 12:48 AM, Bill Woodger wrote: > On Thursday, 11 August 2016 01:47:07 UTC+2, John McKown wrote: > ...> > > ​Hum, I would guess this will be a case of "20 lines of code and 200 > lines > > of comments (excluding cursing)"​ > > > > > > > > > > >

Re: How does COBOL detect a recursive call?

2016-08-10 Thread John McKown
On Wed, Aug 10, 2016 at 4:04 PM, Bill Woodger wrote: > Thanks, Chuck. Tough sitch. > > I think as definitive as you are going to get, in a documentary sense, is > this, from the Programming Guide (doesn't matter which version): > > "Calling alternate entry points > >

Re: How does COBOL detect a recursive call?

2016-08-10 Thread John McKown
On Tue, Aug 9, 2016 at 5:52 PM, Bill Woodger wrote: > OK, it is the RENT or REUS (either will do) on the link-edit/bindering. > > Without RENT/REUS you get a new executable for free. With RENT/REUS you > get to "share" the original program, but it is necessarily a

Re: How does COBOL detect a recursive call?

2016-08-10 Thread Hardee, Chuck
The wherefores of using a main program and an ENTRY versus 2 programs is a political battle I am not prepared or willing to fight. When initially assigned this project I was hoping that my Systems status within the company would grant me some carte blanche in how I engineered the solution but,

Re: How does COBOL detect a recursive call?

2016-08-10 Thread John McKown
On Wed, Aug 10, 2016 at 12:16 AM, Peter Hunkeler wrote: > > > > I'm a bit OCD about trying to make all my code RENT,REUS. My main way to > think of this is "would this still run correctly if it were burned into > ROM?" I try to make the answer to that YES.​ > > > Put all your RENT

Re: How does COBOL detect a recursive call?

2016-08-10 Thread Hardee, Chuck
Bob, Since John is working with a stripped down copy of my program I resurrected the copy of the program with my debugging displays in it where I had already coded the displays for the two addresses you asked about. Displaying the main entry point address, that is, the name of the program as

AW: Re: How does COBOL detect a recursive call?

2016-08-09 Thread Peter Hunkeler
> I'm a bit OCD about trying to make all my code RENT,REUS. My main way to > think of this is "would this still run correctly if it were burned into ROM?" > I try to make the answer to that YES.​ Put all your RENT modules into an APF authorized load library. No AC(1) required! The code

Re: How does COBOL detect a recursive call?

2016-08-09 Thread John McKown
On Tue, Aug 9, 2016 at 4:23 PM, Bill Woodger wrote: > Reading your post rather than going from the title, the U4087 2 is > Language Environment abend for when an registered abend-handler has been > entered a subsequent time before processing of the original abend has >

Re: How does COBOL detect a recursive call?

2016-08-09 Thread John McKown
On Tue, Aug 9, 2016 at 11:28 AM, Mike Schwab wrote: > http://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/ > com.ibm.zos.v2r1.ieab100/reus.htm > When you link edit, you indicate the re-usability of the program. > When the program runs, it reuses the same program if

Re: How does COBOL detect a recursive call?

2016-08-09 Thread Hardee, Chuck
12:29 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: How does COBOL detect a recursive call? http://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.ieab100/reus.htm When you link edit, you indicate the re-usability of the program. When the program runs, it reuses the same program

Re: How does COBOL detect a recursive call?

2016-08-09 Thread Mike Schwab
http://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.ieab100/reus.htm When you link edit, you indicate the re-usability of the program. When the program runs, it reuses the same program if re-entrant. Each use has a different set of registers and working storage. Serially

Re: How does COBOL detect a recursive call?

2016-08-09 Thread John McKown
On Tue, Aug 9, 2016 at 9:40 AM, John McKown wrote: > This is a kind of curiosity question. Unless a COBOL program is compiled > with the THREAD option and the RECURSIVE clause on the PROGRAM-ID, the > program cannot CALL itself. I have also found out that if you use