Re: Recursive calls

Jerry, there are two ways to achieve Recursion in RPG IV.

1). As others have mentioned, create the program object with ACTGRP(*NEW), i.e.

CRTBNDRPG . . . DFTACTGRP(*NO) ACTGRP(*NEW) or,

CRTPGM  . . .  ACTGRP(*NEW)

This is "pseudo recursion" and not recommended. (Overhead of creating new activation groups.)

2). Subprocedures have always been recursive - a subprocedure can call itself. Coupled with this, it is now possible to code a non-cycle, (i.e. liner main) RPG IV program which ONLY contains subprocedures. You have to nominate which subprocedure is the entry point for the program by coding,

CTL-OPT . . . MAIN(<your entry procedure>);

Another approach which I have seen used in similar circumstances to yours is to use Group Jobs. (This was many years ago.) Coupled with the use of the ATTN key, (to invoke a "hub" program) this allowed switching between various tasks in a single interactive session.

HTH,
Brian.

On 09/08/2019 16:50, (WalzCraft) Jerry Forss wrote:

Is there some secret voodoo that I can do that will allow me (in a controlled fashion) to do recursive calls.

Realistically they would only go maybe 5 deep. I could control by having 5 versions of the APIOPTIONS and know which to call but would rather not.


Jerry Forss
Information Technology Team
WalzCraft
608-781-6355 EXT 2530
jforss@xxxxxxxxxxxxx