Re: Help with my first SRVPGM

use binding directories for your service programs...it makes maintenance
so much easier. add the service programs to the binding directory and in
your programs just put BNDDIR('MYBNDDIR') on your H spec then you don't
have to use BNDSRVPGM, etc on the compile..the compiler will use the
binding directory to find and resolve to the service programs and it's
procedures.

personally i discourage the use of binding directories for modules...but
then again i don't keep modules hanging around. i use them to compile
then nuke 'em.

Thanks,
Tommy Holden



From:
David FOXWELL <David.FOXWELL@xxxxxxxxx>
To:
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
Date:
05/23/2008 09:22 AM
Subject:
Help with my first SRVPGM



I've just created my first SRVPGM. As I had to create a new file, I wrote
a module to manage all the operations on that file and created a SRVPGM
SP1 on that module.
Like this CRTSRVPGM P1 BNDSRVPGM(SRVPGMREF) where SRVPGMREF has error
handling functions.

Now, I have another module M2 that uses this SP1.
A programe P1 has to call functions in M2.

I wanted to create SP2, a SRVPGM with M2. How should I be doing this ?
At the moment I did CRTSRVPGM P2 BNDSRVPGM(SRVPGMREF CLTFSC)

That way I add to the list of service programs each time. I don't know how
to automate this process.

As up till now we never used service programs, all the modules just got
thrown in to huge BNDDIRs and then the same compile command could be used
for all the programs :

CRTPGM PGM(&IOBJLIB/&IPGM) MODULE(&IOBJLIB/&IPGM) +

ENTMOD(*PGM) BNDDIR(&IOBJLIB/&IPGM) +

ACTGRP(&WACTGRP)