Re: Having a major brain fart here on one RPG program calling another

When you notice the error in the called routine, clean up first (close files
and whatnot) and THEN send the escape message to "*PGMBDY" call stack count
1 (the prior call stack entry to your PEP which will be your immediate
caller).

Stu


On Fri, Feb 4, 2011 at 17:49, Dennis Lovelady <iseries@xxxxxxxxxxxx> wrote:

Send an *ESCAPE message to X. That's the official method, and the method
used by IBM.

Dennis Lovelady
http://www.linkedin.com/in/dennislovelady
--
Using Windows is better than eating glass*
-- *Depending upon the quality of the glass.

You could set on H1. That might be drastic, but I think that will do it.

Paul Therrien
Andeco Software, LLC
932 Saint Johns Dr
Maryville, TN 37801
225-229-2491
paultherrien@xxxxxxxxxxxxxxxxxx
www.andecosoftware.com

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-
bounces@xxxxxxxxxxxx]
On Behalf Of James H. H. Lampert
Sent: Friday, February 04, 2011 5:10 PM
To: RPG programming on the IBM i / System i
Subject: Having a major brain fart here on one RPG program calling
another

Program X calls program Y, via a traditional RPG CALL statement, with
either an error indicator or an error extender. Is there a quick and
easy way for Y to tell X that an error occurred, so that either the
error indicator is raised, or the %ERROR and %STATUS values are set?

--
JHHL
--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing
list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing
list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.