Search found 32 matches: redondeo

Return to advanced search

Redondear centena

Hola buenas tardes ? De nuevo por aquí molestando, surge la necesidad de poder hacer el redondeo a la centena, con el fin de evitar problemas con el cambio cuando pagan en efectivo. E intentando con la función round(), pero esta parece que aplica solo para los decimales. ...
by leandro
Sat May 07, 2022 6:31 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Redondear centena
Replies: 8
Views: 643

Re: FWMARIA FIELDPUT

Armando No es problema de redondeo, porque la variable que contiene el resultado es de tipo double(12,2) deberia grabar sin inconveniente. Es un problema aleatorio que se me presenta de tiempo en tiempo con FWMARIA y que uso en otro sistema ...
by cjcardoza
Sun Jun 21, 2020 12:38 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: FWMARIA FIELDPUT
Replies: 5
Views: 1009

Sugerencia de cambio a clase: TRibbonBar

... Asi, que si a Antonio le parece agregar el pequeño cambio que hice a la clase TRibbonBar, para escoger entre el redondeo en las pestañas de los tabs, les copio los cambios que hice en esta clase para tener esta funcionalidad en la TRibbonBar: Agregue la variable ...
by csincuir
Sat Jun 11, 2016 1:19 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Sugerencia de cambio a clase: TRibbonBar
Replies: 4
Views: 1059

Re: Problema con redondeo

Eloy: Tal vez voy a escribir una tontería pero en vista de que matemáticamente no es posible obtener la cifra que deseas, esta podría ser una alternativa: 7.00 / 1.21 = 5.78 // Obtenemos la base gravable 7.00 - 5.785 = 1.22 // Obtenemos el IVA 5.78 + 1.22 = 7.00 Otro ejemplo 8.00 / 1.21 = 6.61 8.00 ...
by Armando
Sat Jan 25, 2014 5:05 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problema con redondeo
Replies: 19
Views: 4588

Re: Problema con redondeo

Hola Rubén, he probado con tu función xround haciendo dos redondeos, pero para lo que quiero tendría que funcionar de dos maneras: si tengo el precio final 7€ MsgInfo(xround( xROUND(7/1.21,3),2 ) ) y con esto me calcula la base, y con 7-xround( xROUND(7/1.21,3),2 ...
by informaticaeloy
Sat Jan 25, 2014 3:48 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problema con redondeo
Replies: 19
Views: 4588

Re: Problema con redondeo

Hola Eloy:

Por favor, prueba lo que te mande funciona aqui para mi.

Son 2 xRound()...La explicacion esta en un mensaje nuevo...antes de estos.

Saludos.
by D.Fernandez
Sat Jan 25, 2014 2:06 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problema con redondeo
Replies: 19
Views: 4588

Re: Problema con redondeo

Hola compañeros, en todos los ejemplos los cálculos son correctos y los hace bien. Por ejemplo, el último de cristobal, le pasas 7€ y calcula la base con nBase := ROUND( nValor / 1.21, 8 ) una vez que sabemos la base, se calcula el iva nIva := ROUND( nBase * 0.21, 8 ) se redondean la base y el impor...
by informaticaeloy
Sat Jan 25, 2014 12:35 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problema con redondeo
Replies: 19
Views: 4588

Re: Problema con redondeo

Eloy, calcula el IVA sin redondear la base y después antes de grabar redondeas a 2 decimales. Prueba estos ejemplos a ver que tal Function Eloy()local nValor    Calcula( 7 )    Calcula( 17.37 )    Calcula( 13.53 )    Calcula(...
by cnavarro
Sat Jan 25, 2014 12:07 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problema con redondeo
Replies: 19
Views: 4588

Re: Problema con redondeo

Eloy: La funcion que pongo funciona bien. Fíjate que hago 2 redondeos. xRound( xRound()) el xRound() de adentro a 3 decimales y el de afuera a 2 decimales. Primero a 3 decimales y luego a dos, me funciona bien aquí. MsgInfo(xround( xROUND(7/1.21,3),2 ) ) MsgInfo(xRound( xROUND(7/1.21,3),2 )) MsgInfo...
by D.Fernandez
Sat Jan 25, 2014 10:42 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problema con redondeo
Replies: 19
Views: 4588

Re: Problema con redondeo

...        Set( _SET_DECIMALS, nDeci )Return x  he encontrado por internet esta ayuda: https://www.dropbox.com/s/09lxy65zhd2v2z3/redondeo.png donde sugiere hacer redondeos a la alza o a la baja dependiendo de si la parte a discriminar se par o impar. pero por no liarme y que ...
by informaticaeloy
Sat Jan 25, 2014 12:03 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problema con redondeo
Replies: 19
Views: 4588

Re: Problema con redondeo

Hola Eloy: A ver si con esta sale: La funcion xRound(), la pongo al final de estas lineas. MsgInfo(xround( xROUND(7/1.21,3),2 ) ) MsgInfo(xRound( xROUND(7/1.21,3),2 )) MsgInfo(xRound( xROUND(7/1.21,3),2 ) - 7 ) MsgInfo(xround( xROUND(8/1.21,3),2 ) ) MsgInfo(xRound( xROUND(8/1.21,3),2 )) MsgInfo(xRou...
by D.Fernandez
Fri Jan 24, 2014 1:28 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problema con redondeo
Replies: 19
Views: 4588

Re: Problema con redondeo

... donde guardo los importes es n 15,6. He probado a guardar 2 decimales, 3, 4, 5 ... y si sale bien con 8€ falla con 7€ y si hago cambios en los redondeos con todos los códigos que me sugerís, si funciona con 7€ falla con 8€. He probado con lo que me sugiere Willi Quintana y me pasa lo mismo. ...
by informaticaeloy
Fri Jan 24, 2014 12:51 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problema con redondeo
Replies: 19
Views: 4588

Re: Problema con redondeo

Eloy, esto me funciona perfectamente    SET DECIMALS TO 2   Msginfo( "Valor inicial : "+Str( 8.00, 5,2 ) + CRLF + ;            "Base Imponible: "+Str( Round( 8/1.21 , 2 ) , 5 , 2 ) + CRLF + ;  &nbs...
by cnavarro
Wed Jan 22, 2014 2:08 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problema con redondeo
Replies: 19
Views: 4588

Re: Problema con redondeo

Hola amigazo,,, prueba con esta función.... Salu2 Willi Quintana ********************************************* Function FRound( x, y ) Local nDeci := 2 // error en el compilador Default y := 2 nDeci := Set(3, y ) If x >= 0 x := Val( Str( Int( x * 10 ** y + 0.5000001 ) ) ) / 10 ** y Else x := Val(...
by Willi Quintana
Wed Jan 22, 2014 1:19 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problema con redondeo
Replies: 19
Views: 4588

Re: Problema con redondeo

Hola. El problema es si quieres vender algo que no esta en la bd, sino que quieres vender un concepto a 8€. Me es imposible calcular una base y guardarla en la bd que al sumarle el 21% vuelva a ser 8€. Siempre sale o 7,9999... o 8,01 No se por donde tirar.

Gracias. Un saludo.
by informaticaeloy
Tue Jan 21, 2014 11:38 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problema con redondeo
Replies: 19
Views: 4588
Next

Return to advanced search