Re: create a COBOL ILE module with exportable procedures

Jay,

The ILE COBOL approach to doing this is very different from RPG IV, due in
large part to IBM's attempt to conform closely to the ANSI and ISO
standards for COBOL.

Study this manual:

https://www.ibm.com/docs/en/i/7.3?topic=guide-pdf-file-ile-cobol-programmers


Study the diagram on page 38.

The easiest and simplest way is to just create one procedure per *MODULE,
then add them to a binding directory and bind them as needed to create your
*PGMs or *SRVPGMs.

After that it gets more complex; one example is, a single source member
may contain "nested COBOL programs". :-o Even worse, in my opinion, a
single source member can contain one or more "non-nested programs" in which
case a CRTCBLMOD command will actually generate multiple *MODULEs. :-/
I am not sure what happens if you use CRTBNDCBL on such a source member.
:-(

Look again carefully at that diagram on page 38 ... and see if you can
wrap your mind around this concept of "nested programs"... :-o

My personal advice is to just stick with one procedure per *MODULE and use
binding directories and binder language to deal with it.

Good luck.

All the best,

Mark S. Waterbury

On Saturday, April 8, 2023 at 08:46:46 PM EDT, Jay Vaughn <

jeffersonvaughn@xxxxxxxxx> wrote:

I do this all the time in RPGLE.
A *module with *nomain, and many exportable procedures that can be compiled
into a *srvpgm.

How and what is the syntax to do this same concept with COBOL?

Does anyone have any examples?

google turned up nothing... the IBM i COBOL ILE guide is ok, but no real
examples on how to do this.

All I would need to see is the code to the module source with at least 2
different exportable procedures in it. From there I'm sure I can figure
out the rest on how to compile to *srvpgm and be called by other ILE
languages.

tia

Jay
--
This is the COBOL Programming on the IBM i (AS/400 and iSeries)
(COBOL400-L) mailing list
To post a message email: COBOL400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/cobol400-l
or email: COBOL400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/cobol400-l.



*
*
*
*

________________________________






On Saturday, April 8, 2023 at 08:46:46 PM EDT, Jay Vaughn <
jeffersonvaughn@xxxxxxxxx> wrote:





I do this all the time in RPGLE.
A *module with *nomain, and many exportable procedures that can be compiled
into a *srvpgm.

How and what is the syntax to do this same concept with COBOL?

Does anyone have any examples?

google turned up nothing... the IBM i COBOL ILE guide is ok, but no real
examples on how to do this.

All I would need to see is the code to the module source with at least 2
different exportable procedures in it. From there I'm sure I can figure
out the rest on how to compile to *srvpgm and be called by other ILE
languages.

tia

Jay
--
This is the COBOL Programming on the IBM i (AS/400 and iSeries)
(COBOL400-L) mailing list
To post a message email: COBOL400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/cobol400-l
or email: COBOL400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/cobol400-l.

--
This is the COBOL Programming on the IBM i (AS/400 and iSeries)
(COBOL400-L) mailing list
To post a message email: COBOL400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/cobol400-l
or email: COBOL400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/cobol400-l.