Re: Error when Creating a Service Program

This problem often happens when a binding directory is used to create a
service program and the service program itself is in the binding directory.

Besides using OPTION(*DUPPROC) or deleting the service program first, you
might consider using a separate binding directory for creating the service
program.


Keith


----- Original Message ----- 
From: <bacollins@xxxxxxxxxxxxxxx>
To: "Midrange Systems Technical Discussion" <midrange-l@xxxxxxxxxxxx>
Sent: Monday, August 02, 2004 4:09 PM
Subject: Error when Creating a Service Program


> I having fun creating Service Programs but I have hit a small snag. I can
> create the module and then the Service Program but if I go back and have
> to recreate the module and I try to create the service program I get this.
>
>
> Message . . . . :   Definition supplied multiple times for symbol
>   'INSERTTRAN'.
>
> Cause . . . . . :   Definition INSERTTRAN was found to be exported from
> both
>   *MODULE object TRANINS in library DPSACT and *SRVPGM object TRANINS in
>
>   library DPSACT.
> Recovery  . . . :   Try the Create Program (CRTPGM) or Create Service
> Program
>   (CRTSRVPGM) command again, supplying only one of these objects, or try
> the
>   CRTPGM or CRTSRVPGM command again, specifying one or both of
> OPTION(*DUPVAR)
>   and OPTION(*DUPPROC).
>
>
> If I delete the Service Program first I can then compile it with no
> problems.
>
>
>
>
> Bruce 'Hoss' Collins
>
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.
>
>