Re: EXTPGM() in PR/PI

[Rory Hewitt <rory.hewitt@xxxxxxxxx>]

Booth,

I use a standard where every program has a named constant (defined in the
module, not in a copybook at the very top of the D-specs) called
ThisProgram, e.g.:

D ThisProgram     C                   'CVTSPLFR'

and the standard for the PR is always as follows:

     D main            PR                  Extpgm(ThisProgram)
...
<parameters>
...

     D main            PI
...
<parameters>
...

Whether or not I use a copybook for the PR/PI, this is just the standrad we
use - it makes reporting easier, since it's very quick to search for the
ThisProgram constant.

Rory



On Thu, Jun 27, 2013 at 1:12 PM, Booth Martin <booth@xxxxxxxxxxxx> wrote:

> There are many programs, with new programs added regularly, that all use
> the same *ENTRY/PLIST.  This seems a great candidate for developing a
> PR/PI copy member for future programs.
>
> Here is the stumbling block for me.  I don't know how to handle the
> EXTPGM() keyword.  The external program will vary , depending on what
> the program using the PR/PI is doing. I tried using a variable name in
> the extPgm(TRGTPGM) but that did not compile.
>
> --
> Booth Martin
> 802-461-5349
> http://www.martinvt.com
>
> --
> This is the RPG programming on the IBM i (AS/400 and 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.