Re: Question regarding Trigger programs and recursive calls

Good point Scott, just to expand upon your reply...

The OP would want to use ILE CL in order to use the CALLPRC command to
call the RPG IV procedure.

However, since we're talking about triggers, I'm wondering how big the
performance hit would be using ILE CL. Correct me if I'm wrong Scott,
but ILE CL doesn't support a program staying active like RPG does by
returning with LR = *OFF. C programs on the other hand always remain
active till the activation group ends.

Thus, it would seem to me that using C for the PEP (mainline) would be
preferable to using ILE CL. Even if a shop doesn't have C experience,
the C routine is so simple and easily copied for use in other
triggers, picking up what little knowledge is required to use it
shouldn't be a big deal in a modern RPG IV shop.

Charles


On Tue, Sep 2, 2008 at 12:03 PM, Scott Klement
<rpg400-l@xxxxxxxxxxxxxxxx> wrote:

CL also supports recursion. So you might consider a CL main procedure
and RPG subprocedures.

C would work as well (like Charles said) but if you happen to work in a
shop that doesn't have C expertise, you may find CL to be a more
palatable alternative.


Charles Wilt wrote:

Note that RPG _programs_ (ie. mainline Program Entry Procedures) don't
support recursion, thus you'll often run into trouble using them as
trigger programs.

However, RPG IV _procedures_ do support recursion. In addition, C
programs and procedures support recursion. So, one thing you can do
is build a small C module that contains the C main procedure that
calls an RPG IV procedure to do the actual work.

If you'd like, you can use Alan Campin's trigger mediator, the most
recent version supports recursion via a front end C mainline as
descibed above.

--
This is the RPG programming on the AS400 / iSeries (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.