On Thu, 28 Jul 2011 16:39:13 -0700, Cris Hernandez #9 wrote:

>First thing I would do is figure out which statement is causing the error.
>I use a simple
>
>lc = RC
>
>to capture the return code from all commands & calls (like ALLOC, EXECIO, 
>FREE, etc.), then code:
>
Why "capture" RC?  It's not going to escape.

>IF lc <> 0 THEN DO
> SAY 'Error performing xxxxxxxx.  last RC =' lc
> EXIT lc
>END
>
In fact, why not simply "signal on Error"?

-- gil

----------------------------------------------------------------------
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