Re: Help with Service Programming

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Kelly, John (Limerick) wrote:

Vern,

This where I get confused with the binding directory stuff. I created
the module program successfully (via CRTRPGMOD). I then ran the
UPDSVRPGM. The message tells me that UTILITY service program does not
exist. With just running the CRTRPGMOD and UPDSRVPGM I cannot see were
the UTILITY service program object gets created.


Regards,
John.

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Vern Hamberg
Sent: 19 February 2010 22:36
To: RPG programming on the IBM i / System i
Subject: Re: Help with Service Programming

John

The message should tell you what kind of object it is. Do a WRKOBJ
against it, specifying *ALLUSR for the library. See where it is, add
that library to your library list.

HTH
Vern

Kelly, John (Limerick) wrote:

Hi Charles,

When I run the UPDSRVPGM I get message saying the Service program not

updated. When I check the job log it tells me object UTILITY in NEWLIB
not found. Where am I going wrong?

Regards,
John.

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx

[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Charles Wilt

Sent: 19 February 2010 21:14
To: RPG programming on the IBM i / System i
Subject: Re: Help with Service Programming

No.

1) CRTRPGMOD on UTIL001A
2) UPDSRVPGM srvpgm(UTILITY) module(UTIL001A)

That's pretty much it. You don't even need to recompile your program!

Thus the advantages of ILE programming.

HTH,
Charles


On Fri, Feb 19, 2010 at 3:58 PM, Kelly, John (Limerick)
<John.Kelly@xxxxxxxxxxx> wrote:

So to re-create them from scratch I would ...
1. Use CRTRPGMOD to create the UTIL001A RPGLE
2. Create the service program UTILITY - CRTSRVPGM

SRVPGM(NEWLIB/UTILITY)

MODULE(UTIL001A) SRCFILE(NEWLIB/QSRVSRC) SRCMBR(*SRVPGM)
TEXT('Utilities')
3. Create binding directory UTILITY - CRTBNDDIR

BNDDIR(NEWLIB/UTILITY)

4. Add the service program to the binding directory - ADDBNDDIRE
BNDDIR(NEWLIB/UTILITY) OBJ((NEWLIB/UTIL001A))
5. Finally compile my RPG program which uses the UTILITY

You're binding to the module not the service program.
You need to:
1. create the module (CRTRPGMOD)
2. create the service program containing the module, binding the module.
(CRTSRVPGM)
3. Delete "NEWLIB/UTIL001A" from the binding directory
4. Add NEWLIB/UTILITY to the binding directory
5. Delete the module. It's not needed, and deleting it will keep you
from getting a successful compile if you try to use it.
6. Create the program using the binding directory.

- --
Pete Hall
pete@xxxxxxxxxxxxxx
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.9 (GNU/Linux)

iEYEARECAAYFAkt/O48ACgkQXczQcKdXKg7IlACfb+JXoZrwdhEUnYGVuPAf2iVa
cw0AoJkSTJ3p0OonEnzlGLjwSXm2J1g9
=8Rig
-----END PGP SIGNATURE-----