Peter,

We pass a parm debug=y or debug=n , our code there is a 88 level...

If debug-on 
  ...
 ...

End-if

Plus I had to create a special sysout , allocated dynamically...

Scott ford
www.identityforge.com

On Jun 4, 2012, at 1:11 PM, "Farley, Peter x23353" 
<peter.far...@broadridge.com> wrote:

> The subject is the question.  Obviously I can insert a WORKING-STORAGE switch 
> that is off by default and a "D"ebugging line in the PROCEDURE division to 
> turn "on" that switch when "WITH DEBUGGING" is in effect, but this seems 
> clumsy to me.
> 
> If there is another way, I'd appreciate any info you can provide.
> 
> Peter
> 
> 
> 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 lists...@bama.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

Reply via email to