Me ayudas bastante. Muchas gracias.
----- Mensaje Original -----
De: "Juan Antonio Orta" <[EMAIL PROTECTED]>
Fecha: Martes, Febrero 18, 2003 7:07 pm
Asunto: RE: Calculo del seno
> Hola te adjunto un ejemplo que calcula el Seno de 45 grados en
> radianes...Espero que te sirva de ayuda.
>
> C* -------------------------------------
> C* CALCULO SENO DE UN ANGULO EN RADIANES
> C* NOTA: Compilar con DFTACTGRP(*NO)
> C* -------------------------------------
> D �ANGULO S 4F
> D �SENO S 4F
> D MSG S 52A
>
> C CALLB 'CEESSSIN'
> C PARM 45 �ANGULO
> C PARM �SENO
>
> C EVAL MSG='SENO(' +
> C %TRIM(%EDITFLT(�ANGULO)) + ')=' +
> C %TRIM(%EDITFLT(�SENO))
> C MSG DSPLY
> C Eval *INLR = *on
>
> Saludos.
>
> Departamento T�cnico
> EKAMAT, S.A.
>
>
> -----Mensaje original-----
> De: LANJARONAS400 [mailto:[EMAIL PROTECTED]]
> Enviado el: martes, 18 de febrero de 2003 18:17
> Para: [EMAIL PROTECTED]
> Asunto: Calculo del seno
>
>
> Buenas tardes.
> �Alguien sabe si existe el codigo de operaci�n Sin
> o algo para calcular el seno en RPG?
>
>
>
> _____________________________________________________
> 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]?body=AVE
>
> _____________________________________________________
> 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]?body^AVE
>
_____________________________________________________
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]?body=LEAVE
