Funcionó poniendo

EVAL(*R*)      RCIMPO=(RCVALREUR/(1-(RCDTO2/100)))

en vez de H una R

Gracias a todos,



-------- Mensaje original --------
Asunto:         RE: Calculo truncado
Fecha:  Fri, 21 Jan 2011 13:19:21 +0100
De:     Juan Carlos Paredes <[email protected]>
Para: <[email protected]>, "forum.help400" <[email protected]>



EVAL(H)      RCIMPO=(RCVALREUR/(1-(RCDTO2/100)))

-----Mensaje original-----
De: Pablo Sanchez Marquez [mailto:[email protected]]
Enviado el: viernes, 21 de enero de 2011 12:35
Para: forum.help400
Asunto: Calculo truncado

Buenas,

Estoy un poco perdido, se que hago algo mal pero ahora mismo no se me
ocurre.

Estoy haciendo esta operación:
RCIMPO es de 13 digitos con 4 decimales
RCVALEUR es de 11 digitos con 2 decimales
RCDTO2 es de 5 digitos con 2 decimales

EVAL      RCIMPO=(RCVALREUR/(1-(RCDTO2/100)))

como ejemplo, los valores de las variables son:

RCDTO2=0
RCVALREUR=650,25

Esperaba que RCIMPO fuera igual a 650,25 pero me trunca a 650,00

Se que el error esta en la operación matemática pues he probado a poner
RCIMPO=RCVALREUR directamente y lógicamente lo pone bien

¿que hago mal, o que me falta?

Un saludo,

--
        Pablo Sánchez Márquez   

        (Dpto.Administración/Dpto.TIC)

        FABRICANTES LINEA BLANCA, S.A.

=========================================================================
                              - AVISO LEGAL  -

        La presente comunicación y sus anexos  tiene como destinatario la 
persona a la que

le va dirigida, por lo que si usted lo recibe por error debe notificarlo al 
remitente y

eliminarlo de su sistema, no pudiendo utilizarlo, total o parcialmente, para 
ningún fin.

Su contenido puede tener información confidencial o protegida legalmente y 
únicamente

expresa la opinión del remitente. El uso del correo electrónico vía Internet no 
permite

asegurar ni la confidencialidad de los mensajes ni su correcta recepción. En el 
caso de

que el destinatario no consintiera la utilización del correo electrónico, 
deberá ponerlo en

nuestro conocimiento inmediatamente.

=========================================================================



____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.




____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Responder a