Re: How to end RPG program abnormally?

[Scott Klement <klemscot@xxxxxxxxxxxx>]

Send back an escape message?   That's how I normally end a program
abnormally...


On Wed, 29 Jan 2003, Buck Calabro wrote:

> I want to terminate an RPG program abnormally.
>
> Specifically, I'm integrating some RPG back end stuff with Java.  Java will
> use the toolbox program call class to call the RPG program.  If anything
> untoward happens on the RPG end (stuff like file locked for backup) our Java
> person wants her call to fail.  She does not want to have to inspect a
> return code, partially because the direct call class only allows 35
> parameters, and she doesn't want to use one up for very rare circumstances.
>
> So we have our files set to USROPN and trap the I/O error just fine.  Now we
> want to terminate the RPG program so we don't see any white messages, but we
> also want to set the 'return code' to abnormal.
>
> The Error handling chapter of the RPG Reference wasn't much help.  The CL
> manual has an elliptical reference to reading the return code (RTVJOBA) but
> I couldn't find a way to set it except by setting one of the halt
> indicators.  I did discover that EXSR *PSSR works when the *PSSR has ENDSR
> *CANCL.
>
> Any other ideas?
>   --buck