CArlos por lo que entiendo en el ejemplo que mandas tu quieres simpre aumentar un uno en los decimos sin importar que traiga en los centesimos y milesimos es decir hablamos despues del punto decimal. Si es asi te mando una rutina que hice para resolver tu probela, espero que sea lo que necesitas z-add 145.799 campo 11 3 move campo dec2 2 2 move dec2 dec3 3 3 campo sub dec3 valor1 11 3 eval valor1 = valor1 + .100 eval *inlr = *on
Carlos Pedrozo escribió: Hola Foro; por si acaso alguien no tiene una rutina de ajustar importe. Me estan pidiendo para desarrollar una rutina para ajustar 100 en resultado de calculo : Por ejemplo si el importe es 145.711; solicitan 145.800. Disculpen la molestia y feliz fin de semana. Carlos Pedrozo Hotmail: Trusted email with powerful SPAM protection. Sign up now. ____________________________________________________Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )Forum.Help400 © Publicaciones Help400, S.L. -----Inline Attachment Follows----- ____________________________________________________ Ú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.
