No es necesario recompir el programa de servicio.
El fuente que te mando especifica las llamadas que hacia antes el programa de servicio y las que hace ahora. Si a�ades las llamadas al final no tienes problemas.
as . . : 1 71 Edici�n AULIBD/QSRVSRC
AUSERV
...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
STRPGMEXP PGMLVL(*PRV)
/********************************************************************/
/* *MODULE AUSERV AULIBD 200601 */
/********************************************************************/
EXPORT SYMBOL("AUSERV")
EXPORT SYMBOL("AUCONT")
EXPORT SYMBOL("AUMAMI")
EXPORT SYMBOL("AUSACE")
EXPORT SYMBOL("VALFEC")
EXPORT SYMBOL("CALFEC")
EXPORT SYMBOL("EDTNUM")
EXPORT SYMBOL("PRCENT")
EXPORT SYMBOL("DIV365")
ENDPGMEXP
STRPGMEXP PGMLVL(*CURRENT)
/********************************************************************/
/* *MODULE AUSERV AULIBD 291101 */
/********************************************************************/
EXPORT SYMBOL("AUSERV")
EXPORT SYMBOL("AUCONT")
EXPORT SYMBOL("AUMAMI")
EXPORT SYMBOL("AUSACE")
EXPORT SYMBOL("VALFEC")
EXPORT SYMBOL("CALFEC")
EXPORT SYMBOL("EDTNUM")
EXPORT SYMBOL("PRCENT")
EXPORT SYMBOL("DIV365")
ENDPGMEXP
****************** Fin de datos ***************************************
Luego al crear programa de servicio:
Crear Programa de Servicio (CRTSRVPGM) Nivel: 2
Teclee elecciones, pulse Intro.
Etiqueta . . . . . . . . . . . .
Programa de servicio . . . . . . > auserv Nombre
Biblioteca . . . . . . . . . . > &BIBLI Nombre, *CURLIB
M�dulo . . . . . . . . . . . . . > *SRVPGM Nombre, gen�rico*, *SRVPGM...
Biblioteca . . . . . . . . . . Nombre, *LIBL, *CURLIB...
+ para m�s valores
Exportar . . . . . . . . . . . . > *SRCFILE *SRCFILE, *ALL
Exportar archivo fuente . . . . > QSRVSRC Nombre, QSRVSRC
Biblioteca . . . . . . . . . . > &BIBLI Nombre, *LIBL, *CURLIB
Exportar miembro fuente . . . . *SRVPGM Nombre, *SRVPGM
Texto descriptivo . . . . . . . *BLANK
Espero que esto te ayude.
> -----Mensaje original-----
> De: Jaime Villa Torres [mailto:[EMAIL PROTECTED]]
> Enviado el: jueves, 04 de septiembre de 2003 02:24
> Para: [EMAIL PROTECTED]
> Asunto: Service Program
>
>
> Como siempre un favor, como puedo compilar un programa que
> utiliza un service program, pero que lo ejecute como un
> llamado, que no sea parte del objeto del programa llamador,
> esto es necesario ya el service program es utilizado por
> muchos otros programas, pero cuando se cambia el service
> program hay que recompilar nuevamente todos los programas.
>
> De antemano gracias.
>
> Jaime Villa T.
>
>
>
> _____________________________________________________
> Forum.HELP400 es un servicio m�s de NEWS/400.
> � Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es _____________________________________________________
Para darte de baja, env�a el mensaje resultante de pulsar mailto:[EMAIL PROTECTED]
_____________________________________________________________________
AMCOR FLEXIBLES EUROPE - LEADING THROUGH INNOVATION
_____________________________________________________________________
CAUTION - This message may contain privileged and confidential information intended only for the use of the addressee named above. If you are not the intended recipient of this message you are hereby notified that any use, dissemination, distribution or reproduction of this message is prohibited. If you have received this message in error please notify AMCOR FLEXIBLES EUROPE immediately. Any views expressed in this message are those of the individual sender and may not necessarily reflect the views of AMCOR FLEXIBLES EUROPE.
