RE: Service Program Moving to Production problem

No. The problem is not with the module. The module is ONLY relevant when you
are creating the program or service program. Once the service program is
created, you can delete the module object.

As Rob suggested - do a DSPPGM of your test program (not the service
program) and paste the results.

Regards
 
Paul Tuohy
ComCon
www.comconadvisor.com 
 

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of praveen gunda
Sent: 28 February 2006 14:59
To: RPG programming on the AS400 / iSeries
Subject: Re: Service Program Moving to Production problem

When I create a program by binding with a Service Program, I am specifying
the srvpgm name & *libl as the library in BNDSRVPGM.
This works fine. The problem is with the module, I am creating the program
from.

Eg:
Say the module name is  LOTUTIL in LIbrary DEVOBJ.
I create a Service Program named LOTUTIL for module LOTUTI.
This one does not use any other service programs or modules, so I do not
specify anything on BNDSRVPGM.
here's the crreate command:

CRTSRVPGM SRVPGM(DEVOBJ/LOTUTIL)
          MODULE(*LIBL/LOTUTIL)

now when I transfer this program to the production machine, that does not
have the library DEVOBJ, it fails when I try to invoke any procedure in this
service program. It gives the error msg:

"Library DEVOBJ Not found"

here is the screen shot from JobLog:

Message ID . . . . . . :   CPD0028       Severity . . . . . . . :
30
Message type . . . . . :   Diagnostic

Date sent  . . . . . . :   02/27/06      Time sent  . . . . . . :
16:59:32


Message . . . . :   Library DEVOBJ not
found.
Cause . . . . . :   If attempting to run a CALL command, the library of
the
  called program or library of the CALL command definition object was
not
  found. If any other command, the library of the command definition
object,
  library of command processing program, library of validity checking
program,
  current library, or product library was not found. The library that is
not
  found may also be the library for a service program that is bound to
a
  called program, a command processing program, or a validity
checking

program.
Recovery  . . . :   Change the library name or create the library, and
then
  try the command again. If the library is on an independent auxiliary
storage
  pool (ASP), make sure that the ASP group which contains the independent
ASP
  has been set for the current job or thread.


Any help is greatly appreciated.

Regards
Praveen
www.euscold.com



On 2/28/06, Paul Tuohy <tuohyp@xxxxxxxxxxxxx> wrote:
>
> Your problem is with the test program, not with the service program.
>
> When you created the test program (on the development machine) it was
> bound
> to the service program in the library DEVOBJ.
>
> When you moved everything to production and called the test program, it
> goes
> to load the service program and cannot find it.
>
> When creating the test program try specifying *LIBL for the library for
> the
> service program in the binding directory or on the CRTPGM command.
> Alternatively, re-create the test program on the production machine and
> specify the correct library for the service program.
>
> Regards
>
> Paul Tuohy
> ComCon
> www.comconadvisor.com
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of praveen gunda
> Sent: 27 February 2006 22:03
> To: RPG programming on the AS400 / iSeries
> Subject: Re: Service Program Moving to Production problem
>
> I created a savf of the service program and a test program that call a
> procedure in the srvpgm.
> Ftp'ed to production.
>
> When I created the service program, the module was in library devobj. My
> production machine does not have the library DEVOBJ.
>
> So when I call the test program, it says, "Library DEVOBJ Not found"
>
> here is the screen shot from JobLog:
>
> Message ID . . . . . . :   CPD0028       Severity . . . . . . . :
> 30
> Message type . . . . . :
> Diagnostic
> Date sent  . . . . . . :   02/27/06      Time sent  . . . . . . :
> 16:59:32
>
>
> Message . . . . :   Library DEVOBJ not
> found.
> Cause . . . . . :   If attempting to run a CALL command, the library of
> the
>   called program or library of the CALL command definition object was
> not
>   found. If any other command, the library of the command definition
> object,
>   library of command processing program, library of validity checking
> program,
>   current library, or product library was not found. The library that is
> not
>   found may also be the library for a service program that is bound to
> a
>   called program, a command processing program, or a validity
> checking
>
> program.
> Recovery  . . . :   Change the library name or create the library, and
> then
>   try the command again. If the library is on an independent auxiliary
> storage
>   pool (ASP), make sure that the ASP group which contains the independent
> ASP
>   has been set for the current job or thread.
>
>
> --ooOOoo--
>
> On 2/27/06, rob@xxxxxxxxx <rob@xxxxxxxxx> wrote:
> >
> > What are your steps to move it to production?
> >
> > I too, have a service program composed of one module.  We save the
> *SRVPGM
> > and the *SQLPKG (if applicable) and restore them on to our production
> > machine.  We do not bring along the *MODULE nor the *BNDDIR.  And we
> have
> > no problems.
> >
> > Rob Berendt
> > --
> > Group Dekko Services, LLC
> > Dept 01.073
> > PO Box 2000
> > Dock 108
> > 6928N 400E
> > Kendallville, IN 46755
> > http://www.dekko.com
> >
> >
> >
> >
> >
> > "praveen gunda" <praveen.gunda@xxxxxxxxx>
> > Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> > 02/27/2006 04:38 PM
> > Please respond to
> > RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> >
> >
> > To
> > "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
> > cc
> >
> > Fax to
> >
> > Subject
> > Service Program Moving to Production problem
> >
> >
> >
> >
> >
> >
> > Hi all,
> >
> > I am having problems moving my service programs to Production.
> > When I create a service program, the library name of the module is being
> > hardcoded by the CRTSRVPGM/CRTPGM commands.
> >
> > Here are the details:
> > I am following one SRVPGM per one module.
> >
> > I have a module called LOTUTIL in library DEVOBJ
> > I created a service program with
> >
> > CRTSRVPGM SRVPGM(DEVOBJ/LOTUTIL)
> > MODULE(*LIBL/LOTUTIL)BNDSRVPGM(*LIBL/WMSUTIL) DETAIL(*FULL)
> > ALWLIBUPD(*YES)
> >
> > When I move this to production, and try to use, I get the error LIbrary
> > DEVOBJ not found as DEVOBJ is not in production.
> >
> > When I do a dspsrvpgm command, on the module listing screen, it shows
> the
> > LIbrary name(DEVOBJ) instead of *LIBL.
> >
> > Am I doing anything wrong.
> >
> > Praveen
> > --
> > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> >
> >
> > --
> > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> >
> >
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>