Re: Incorrect module name and library

Date: Sat, 03 Mar 2001 20:59:38 -0500
From: "M. Lazarus" <mlazarus@ttec.com>

Jon Paris wrote:

>If you want to have the source name be different from the procedure name
>then all you have to do is specify the ExtProc keyword on a Prototype
(i.e.
>replace the *Entry PList with a PR/PI combination).  The compiler will use
>the name given instead of the source name.  For that matter you can use
>DFTNAME(rpg_name) on the H spec.

Jon, you can't rename RPG main procedures; only subprocedures.

Then Mark Lazarus wrote:
>  This was a _PEP module, so there was no PR/PI specified.

Mark, you _can_ use PR/PI for the main procedure of a _PEP module.
You use the EXTPGM keyword on the prototype, if it's going to be called
as a program by other callers.  Try creating and compiling these three
source members:

 * copy file MYPGM_P
D mypgm           pr                  extpgm('MYPGM')
D   someparm                    10a   const

 * MYPGM source file
 * ===> CRTBNDRPG MYPGM
 /copy MYPGM_P
D mypgm           pi
D   someparm                    10a   const
C                   return

 * TESTPGM source file
 /copy MYPGM_P
C                   callp     mypgm ('abcde')
C                   return

Barbara Morris


+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---