Apologies to Billy Ashton, it was his similar suggestion that I should have mentioned, not Michael Schmidt’s.
Peter From: IBM Mainframe Discussion List <[email protected]> On Behalf Of Farley, Peter Sent: Thursday, September 18, 2025 7:57 PM To: [email protected] Subject: Re: Can COBOL DEBUG for LE be turned off and on dynamically? > As I replied to the other Michael (Schmidt), possible but tedious to accomplish due to the volume of statements that would have to be modified. Thanks anyway for the suggestion. Peter From: IBM Mainframe Discussion List <[email protected]<mailto:[email protected]>> On Behalf Of Mike Schwab Sent: Thursday, September 18, 2025 4:13 PM To: [email protected]<mailto:[email protected]> Subject: Re: Can COBOL DEBUG for LE be turned off and on dynamically? > 77 DEBUG-MODE PIC X(3) VALUE 'NO '. IF (parameter value for specific call) THEN MOVE 'YES' TO DEBUG MODE END-IF. repeat as needed: IF DEBUG-MODE = 'YES' THEN DISPLAY 'debugging information' END-IF On Thu, Sep 18, 2025 at 2:06 PM Farley, Peter < [email protected]<mailto:[email protected]>> wrote: > Thanks Tom, I was already aware of that and am using the WITH DEBUGGING > MODE only in the program at issue. My problem is that the driving code > (which I am forced to use by the structure of the application) > unfortunately calls the subroutine from multiple places, but the error I am > tracking down only occurs from a call at one of those several call > locations. What I hoped to do is to turn OFF the effect of WITH DEBUGGING > MODE until the driving code gets to the one call location of interest, then > turn the WITH DEBUGGING MODE ON again for just that one call location and > turn it OFF again after that one call location completes the call. > > I am guessing this isn't possible, so I will just have to ignore the chaff > and look only for the wheat. > > Peter > > From: IBM Mainframe Discussion List > <[email protected]<mailto:[email protected]>> On Behalf > Of Tom Ross > Sent: Thursday, September 18, 2025 1:37 PM > To: [email protected]<mailto:[email protected]> > Subject: Can COBOL DEBUG for LE be turned off and on dynamically? > > > >I have a very complex COBOL program where I am investigating a > calculation = > >error, but the code test bed winds up invoking it for quite q few more > time= > >s than I am interested in seeing variable values during the calculation > pro= > >cess. > > >What I would like to do is to turn on LE COBOL DEBUG at the start of the > ba= > >tch driving program then turn it off dynamically until one specific place > w= > >here the program at issue is called, turn it ON before the call and then > tu= > >rn is off again on return from that call. > > Debugging lines that start with D are activiated by a COBOL clause: WITH > DEBUGGING MODE, on the PROGRAM-ID statement. You could have that clause in > only the program you are interested in. The whole application would have > to to be run with the LE DEBUG option, but only programs that have WITH > DEBUGGING MODE will activate the debugging lines. > > Cheers, > Tom Ross (AKA Captain COBOL :-) >> COBOL is the Language of the > Future! << -- This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
