Re: Procedures, inh1, and return

[Bruce Vining <bruce.vining@xxxxxxxxx>]

Send the *ESCAPE to the *PGMBDY

On Mon, May 18, 2020 at 3:49 PM <smith5646midrange@xxxxxxxxx> wrote:

> Before using procedures, if I wanted to stop a program dead in its tracks,
> I
> set on H1 and did a return.  However, inside of a procedure, the return
> only
> does a return from the procedure and does not exit the program.  I tried
> sending a *ESCAPE message using QMHSNDPM but the call stack counter has to
> change with the number of nested procedures, unless there is something I am
> missing.
>
>
>
> What is the proper way to handle this type of "get me out of here" error
> without adding return codes and IF statements for each procedure?
>
> --
> This is the RPG programming on IBM i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link: https://amazon.midrange.com