Ya he dado con la tecla, gracias de todos modos. Os envío el ejemplo por si a alguien le pueda servir.
*-------------------------------------------------------------------* * Rutina decimales *-------------------------------------------------------------------* C decimal1 begsr c z-add 0 Nvopre4 9 0 c eval Nvopre4=Nvopre2*100 C Nvopre4 div 5 resul 9 0 C Resul mult 5 resul C Resul div 100 resul2 9 2 C ENDSR resul2 seria el resultado correcto. Ejemplos: Nvopre2 Resul2 13,95 13,95 10,46 10,45 16,79 16,75 12,86 12,85 Saludos y buen fin de semana. Paco Medina DEPT. INFORMÁTICA Exclusivas Camacho, S. Ltd. CIF B29145240 Av. J. Ortega y Gasset, 301 (Pol. San Luis) Málaga, España Tel. +34 952 322 900 Fax +34 952 314 900 www.e-camacho.com [email protected] Este mensaje se dirige exclusivamente a su destinatario y puede contener información privilegiada o confidencial. Si no es vd. el destinatario indicado, queda notificado de que la utilización, divulgación y/o copia sin autorización está prohibida en virtud de la legislación vigente. Si ha recibido este mensaje por error, le rogamos que nos lo comunique inmediatamente por esta misma vía y proceda a su destrucción. Gracias. This message is intended exclusively for its addressee and may contain information that is CONFIDENTIAL and protected by professional privilege. If you are not the intended recipient you are hereby notified that any dissemination, copy or disclosure of this communication is strictly prohibited by law. If this message has been received in error, please immediately notify us via e-mail and delete it. Thank you. _____ De: [email protected] [mailto:[email protected]] En nombre de Paco Medina Enviado el: viernes, 22 de mayo de 2009 17:42 Para: 'forum.help400' Asunto: tema redondeo en función de decimales Buenas compañeros, Como podría solucionar teniendo estos precios de tarifa como puedo obtener estos resultados. 4,20 que sea 4,20 4,21 que sea 4,20 4,22 que sea 4,20 4,23 que sea 4,20 4,24 que sea 4,20 4,25 que sea 4,20 4,26 que sea 4,25 427 que sea 4,25 428 que sea 4,25 4,29 que sea 4,25 4,30 que sea 4,30 Y en los casos que sea 00 lo tengo es precio-0,05 4,00 que sea 3,95 Gracias, Paco Medina DEPT. INFORMÁTICA Exclusivas Camacho, S. Ltd. CIF B29145240 Av. J. Ortega y Gasset, 301 (Pol. San Luis) Málaga, España Tel. +34 952 322 900 Fax +34 952 314 900 www.e-camacho.com [email protected] Este mensaje se dirige exclusivamente a su destinatario y puede contener información privilegiada o confidencial. Si no es vd. el destinatario indicado, queda notificado de que la utilización, divulgación y/o copia sin autorización está prohibida en virtud de la legislación vigente. Si ha recibido este mensaje por error, le rogamos que nos lo comunique inmediatamente por esta misma vía y proceda a su destrucción. Gracias. This message is intended exclusively for its addressee and may contain information that is CONFIDENTIAL and protected by professional privilege. If you are not the intended recipient you are hereby notified that any dissemination, copy or disclosure of this communication is strictly prohibited by law. If this message has been received in error, please immediately notify us via e-mail and delete it. Thank you.
__________________________________________________ Forum.HELP400 es un servicio más de ServerNEWS. © Publicaciones Help400, S.L. - Todos los derechos reservados http://www.help400.es _____________________________________________________ Para darte de baja visita la siguente URL: http://listas.combios.es/mailman/listinfo/forum.help400
