FiveTech Support Forums

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 importe de iva

  nBase  := Round( nBase, 2 )

  nIva   := Round( nIva, 2 )

y se comprueba todo

  nIva1  := nValor - nBase

  nTotal := nBase + nIva

Hasta ahí todo bien. Ahora en la base de datos guardo los 3 valores
base 5.79€ iva 1.21€ y total 7€

ahora el cliente se mete en la ficha del articulo y le salen los 3 valores, pero cambia el precio base a 25€. El programa ha de recalcular el importe de iva y final. Más tarde se da cuenta de que el precio correcto eran 5.79€ de base. Lo modifica y el programa recalcula la base y el total.
Ha ciendo las operaciones al revés:
si base=5.79
iva=base0.21 => 1.2159€ que redondeando a 2 decimales son 1.22€
para el total podemos hacer: base1.21 => 7.0059€ => 7.01€ o también: base+iva => 5.79 + 1.2159 => 7.01€

Por eso la única solución que he encontrado es indicar en la base de datos que este artículo se vende a 7 € fijo y calcular la base y el iva hacia atrás, como lo calcula cristobal anteriormente, o indicar que este artículo tiene una base fija de 5.79€ y calcular el iva y el total hacia adelante.

jaja, os imaginais que nos paran por la calle y nos entrevistan para la tele y te preguntan ¿usted sabe calcular el iva de cabeza? a ver, ¿cuanto es el iva de 7€? y le suelto todo este rollo, jaja.

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.

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 ) tendría el importe del iva

ahora si guardo estos tres valores en la base de datos, 7€, 1,21€ y 5,79€, tendría que poder tomas estos valores de la base de datos posteriormente y hacer la operación a la inversa.
Así pues, con el sistema de redondeos de xround:

MsgInfo(xround( xROUND(5.79*1.21,3),2 ) ) ya sale 7,01€.
Por eso he llegado a la conclusión de que no es por el redondeo, si no que es imposible matemáticamente encontrar un valor de 2 decimales que al aplicarle un 21% nos salga 7,00€, y si lo consigo truncando valor a partir del tercer , cuarto o quinto decimal, sale bien, pero falla con 8€ de precio final, ya que entonces me sale 8.01€ o 7,99€.

En otros programas demo que he probado, al hacer esto, siempre preguntan si el precio introducido es PVP con iva incluido o sin iva, y a partir de entonces hasta cambia el formato de ventana para la introducción de datos.

Muchas gracias. por vuestro interés. Un saludo.

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 - 6.61 = 1.39
6.61 + 1.39 = 8.00

Seguramente, en algunos casos, el IVA no es exacto por las razones que ya sabemos, sin embargo, no
olvidemos que el IVA es provisional y al hacer la declaración correspondiente entre IVA cobrado e IVA
pagado se hará el ajuste correspondiente. Los colegas contadores nos pueden aclarar un poco mas este
tema.

Saludos