Re: How to end RPG program abnormally?

["Steve Landess" <steve_landess@xxxxxxxxxxx>]

What about sending an escape message back to the Java program?  Won't this
make it bomb?

Steve

----- Original Message -----
From: "Buck Calabro" <Buck.Calabro@commsoft.net>
To: "RPG programming on the AS400 / iSeries" <rpg400-l@midrange.com>
Sent: Wednesday, January 29, 2003 1:07 PM
Subject: How to end RPG program abnormally?


> 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
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo.cgi/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>