IBM AS/400 manual Binding Modules into a Program, Concepts for, Crtrpgmod Modulemylib/Transrpt

Binding Modules into a Program

9. Once

all

the

imports

have

been

resolved,

the binding

process

complet

the program object is created.

Note: If

you have

specified

that

a

variable

or

procedure

is

to

be

the

EXPORT

keyword),

it

is

possible that

the

variable

or

procedu

will be identical to a

variable

or

procedure

in

another procedur

bound

program

object. In

this case,

the

results

may not

be

as

See ILE

Concepts for

information

on

how

to

handle

this situation.

Binding	Multiple		Modules
This	example		shows	you	how	to use the CRTPGM command	to	bind two	ILE R
modules		into	a program		TRPT.	In this program, the following occurs:
¹ The		module	TRANSRPT	reads		each transaction record	from	a file	TRNSDTA.

¹It then calls procedure Trans_Inc and Proc_Name in module TRANSSVC usin

bound calls within expressions.

¹Trans_Inc calculates the income pertaining to each transaction and re

value to the caller

¹	Proc_Name		determines the		product	name	and	returns	it
¹	TRANSRPT then prints the transaction record.
Source		for	TRANSRPT,	TRANSSVC, and TRNSDTA		is	shown	in Figure 38 on
page 79,		Figure 36		on page 76	and Figure 39 on			page 80	respectively.

1. First create the module TRANSRPT. Type:

CRTRPGMOD MODULE(MYLIB/TRANSRPT)

2. Then create module TRANSSVC by typing:

CRTRPGMOD MODULE(MYLIB/TRANSSVC)

3. To create the program object, type:

CRTPGM PGM(MYLIB/TRPT) MODULE(TRANSRPT TRANSSVC)

ENTMOD(*FIRST) ACTGRP(TRPT)

The	CRTPGM	command		creates		a	program object TRPT in the library		MYLIB.
Note	that		TRANSRPT	is	listed		first in the MODULE parameter.	ENTMOD(*FIRST)
will find the first module							with a program entry procedure. Since only
modules has			a program entry				procedure, they can be entered		in eithe
The	program		TRPT	will	run in		the named activation group TRPT. The		program
in a named group to ensure							that no other programs can affect		its res
Figure 41		on page 85			shows	an output file created when TRPT		is	run.

84 ILE RPG for AS/400 Programmer's Guide