El problema viene por los par�metros. No s� cual es el motivo, pero si los
campos que usas como par�metros en el CALLP son los mismos que los que
tienes definido en el prototipo da ese error.
Yo har�a lo siguiente:
D Parm1 S 50 Const
D Parm2 S 3 Const
D Parm3 S 50 Const
D Parm4 S 50 Const
* Prototipo Programa de Ayudas
D CF005SA PR ExtPgm('CF005S')
D @Parm1 50
D @Parm2 3
D @Parm3 50
D @Parm4 50
CallP CF005SA(Parm1:Parm2:Parm3:Parm4)
Saludos.
Juan Carlos.
> -----Mensaje original-----
> De: Alfredo Reyes Moncayo [SMTP:[EMAIL PROTECTED]
> Enviado el: martes, 27 de julio de 2004 17:21
> Para: [EMAIL PROTECTED]
> Asunto: Procedimientos
>
> Hola a todos, estoy cambiando un call por un callp pero al compilar me
> genera
> un error que no reconoce el procedimiento.
>
> La definici�n es la siguiente:
>
> * Prototipo Programa de Ayudas
> D CF005SA PR ExtPgm('CF005S')
> D Parm1 50 Const
> D Parm2 3 Const
> D Parm3 50 Const
> D Parm4 50 Const
>
> El llamado es el siguiente:
> CallP CF005SA(Parm1:Parm2:Parm3:Parm4)
>
> El error de la compilaci�n es: The prototype for the call is not defined.
>
>
> Es necesario definir algo m�s ?
>
> Agradecer� cualquier comentarios.
>
> Gracias de antemano.
> Alfredo Reyes Moncayo
> ----------------------------------------------
> PFIZER Information Technology
> M � x i c o -- T l a l p a n -- S i t e
> Tel: (52) 55 5624-4807 Fax (52) 55 5677-6571
> Email: [EMAIL PROTECTED]
>
>
> _____________________________________________________
> 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]
_____________________________________________________
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]
