Re: Advantages of Service program

["Richard ECUYER" <recuyer@xxxxxxx>]

yes, you are right.

*srvpgm is not include into PGM1, you have a link to the service pgm include
in pgm1.
in addition, you can add a new procedure to SRVPGM1 and with the exported
source (QSRVSRC) you can without recompiling let PGM use the previous
exported procedures and when you compil a pgm using the SRVPGM1 use the new
procedure.

You can see that like a level control on file.

i add a proc proc3, create the module, update SRVSRC and after that create
the *SRVPGM
each PGM use (until they are recompiled) the *PRV list of procedures

STRPGMEXP PGMLVL(*CURRENT)
  EXPORT SYMBOL("proc1")
  EXPORT SYMBOL("proc2")
  EXPORT SYMBOL("proc3")
ENDPGMEXP

STRPGMEXP  PGMLVL(*PRV)
  EXPORT SYMBOL("proc1")
  EXPORT SYMBOL("proc2")
ENDPGMEXP


----- Original Message -----
From: <ganeshkumar.murugesan@xxxxxxxxx>
To: <rpg400-l@xxxxxxxxxxxx>
Sent: Monday, February 07, 2005 11:27 AM
Subject: RE: Advantages of Service program


>
> Do you mean to say that the program objects need to be updated or
> re-created everytime a module(directly included in the program object)
> is changed. And this updation or re-creation is not necessary if the
> same module is present inside the service program and this service
> program in turn is embedded inside the program object.
>
> For ex:
> I have two program objects and they contain the following
> modules/service programs.
> When I change MOD3, I need to recreate PGM2 again but that is no needed
> for PGM1. Am I Right ??
>
> PGM1 includes the following
> -----------
> MOD1
> MOD2
> SRVPGM1
> -----------
>
>
> PGM2 includes the following
> ------------
> MOD1
> MOD2
> MOD3
> ------------
>
>
> SRVPGM1 includes the following
> ------------
> MOD3
> MOD4
> MOD5
> ------------
>
>
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Richard ECUYER
> Sent: Monday, February 07, 2005 3:33 PM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: Advantages of Service program
>
> maintenance, it is bound by reference not copy.
> So if you change one module from your service pgm, all pgm using this
> module will work with the new object.
>
> Other answers will come soon i think
>
> ----- Original Message -----
> From: <ganeshkumar.murugesan@xxxxxxxxx>
> To: <rpg400-l@xxxxxxxxxxxx>
> Sent: Monday, February 07, 2005 10:57 AM
> Subject: Advantages of Service program
>
>
> >
> > Why to include modules in a service program instead of directly
> > including the modules in the program object using CRTPGM command. What
>
> > is the advantage of using service program apart from the initial load
> > performance point of view?
> >
> >
> >
> >
> >
> > Confidentiality Notice
> >
> > The information contained in this electronic message and any
> > attachments
> to this message are intended
> > for the exclusive use of the addressee(s) and may contain confidential
>
> > or
> privileged information. If
> > you are not the intended recipient, please notify the sender at Wipro
> > or
> Mailadmin@xxxxxxxxx immediately
> > and destroy all copies of this message and any attachments.
> >
> > --
> > 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.
>
>
>
>
> Confidentiality Notice
>
> The information contained in this electronic message and any attachments
to this message are intended
> for the exclusive use of the addressee(s) and may contain confidential or
privileged information. If
> you are not the intended recipient, please notify the sender at Wipro or
Mailadmin@xxxxxxxxx immediately
> and destroy all copies of this message and any attachments.
>
> --
> 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.
>
>