Hola a todos: Ahora también me he encontrado con la necesidad de obtener el resto de una división con decimales y en formato libre. Después de evaluar las opciones aportadas anteriormente, sin resultados muy satistactorios he encontrado la siguiente solución:
D = A - (%dec((A/B):6:2) * B); // A y B son de 6,2 y B es de 6,0 D = A - %dec((%dec((A/B):6:2) * B):6:2); // A, B y D son de 6,2 He efectuado varias pruebas y en amdos casos me funciona correctamente (debeis tener en cuenta los decimales que deseas para las operaciones %dec) Saludos. ----Mensaje original---- De: [EMAIL PROTECTED] Recibido: 17/01/2007 18:54 Para: "forum.help400"<[email protected]> Asunto: Re: resto de una division Saludos : Eval(h) Ax = a * 10000 (tantos 0 como decimales tengas) Eval(h) Bx = b * 10000 Eval(h) Resto = %Rem(ax:bx)/10000 Espero te sirva > Buenas,... > ahí està el tema. > Segun tu ejemplo Ax y Bx son variables sin decimales, y mi pregunta se > referia a que necesito que Ax y Bx tengan decimales... > > ejemplo > Ax = 3,5 > Bx = 3,5 > %Rem(Ax:Bx), para que me dé 0. > > > Albert López > IT Department. Helpdesk Consultant > > ? [EMAIL PROTECTED] > É +34 93 724 39 00 > Ê +34 93 723 86 65 > > Aquapoint S.A. > C/ Filadors, 35 4a planta > 08208 Sabadell BCN (Spain) > > > > > [EMAIL PROTECTED] > Enviado por: [EMAIL PROTECTED] > 17/01/2007 18:29 > Por favor, responda a > "forum.help400" <[email protected]> > > > Para > "forum.help400" <[email protected]> > cc > > Asunto > Re: resto de una division > > > > > > > > Por ejemplo hacer un > Eval(h)Ax=A > Eval(h)Bx=B > Eval Resto = %Rem(Ax:Bx) > Siendo Ax y Bx dos variables sin decimales. Supongo que ya se te habia > ocurrido. > Hombre, esta funcion va bien si por ejemplo tienes que hacer un: > If %Rem(Ax:Bx) <>0; > exsr subrutina; > Endif; > > > > > Albert López <[EMAIL PROTECTED]> > Enviado por: [EMAIL PROTECTED] > 17/01/2007 18:01 > > Por favor, responda a > "forum.help400" <[email protected]> > > > Para > [email protected] > cc > > Asunto > resto de una division > > > > > > > > > > Hola a todos, > una pregunta para los ILEros,... > > quiero hacer un Eval Resto = %Rem(A:B), > > el problema es que tanto la variable A como B pueden tener decimales y al > compilar da error. > Que solución hay sin tener que recurrir a la antigua usanza del DIV y el > MVR ? > > Gracias de antemano. > > Albert López > IT Department. Helpdesk Consultant > > ? [EMAIL PROTECTED] > É +34 93 724 39 00 > Ê +34 93 723 86 65 > > Aquapoint S.A. > C/ Filadors, 35 4a planta > 08208 Sabadell BCN (Spain) > > This e-mail may contain confidential or priviliged information. If you are > not the intended recipient please advise by return email and delete > immediately without regarding or fowarding to others. > __________________________________________________ > 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 visita la siguente URL: > http://listas.combios.es/mailman/listinfo/forum.help400 > __________________________________________________ > 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 visita la siguente URL: > http://listas.combios.es/mailman/listinfo/forum.help400 > > This e-mail may contain confidential or priviliged information. If you are > not the intended recipient please advise by return email and delete > immediately without regarding or fowarding to others. > __________________________________________________ > 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 visita la siguente URL: > http://listas.combios.es/mailman/listinfo/forum.help400 __________________________________________________ Forum.HELP400 es un servicio m&#225;s de NEWS/400. &#169; 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 Toni Tort Sistemes d'Informació. Vives Vidal, Vivesa, S.A
__________________________________________________ Forum.HELP400 es un servicio m&#225;s de NEWS/400. &#169; 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
