Error al calcular una factura

[[Delphius]]

Empezado por Caral

Hola
No se si reir o llorar.
Saludos

¿Que pasa amigo?
No entiendo. ¿Porqué lo dices?

Saludos,

[[Caral]]

Hola
Por supuesto que me puedo equivocar y al ser novato con mas razón, pero casi podría asegurar que el código tiene un error y muy serio, mas sabiendo que esta sacado de un código que yo mismo hice.
Saludos

[Yensis22]

SI es del tutorial..

Es del tutoría pero es que tengo que adatárselo a mi from que muy diferente y es que no estoy untando frem en ese por que lo tengo todo en esa mismo from y es que tengo que terminar aplicación. y se lo mucho que me han ayudando por eso le doy las gracias pero es que soy nuevo en esto

[[Caral]]

Hola
Mira cuantos campos tienes en la tabla facturacion.
Ahora mira cuantos campos vas a insertar.
Ves algo diferente?.
Saludos

[[Delphius]]

Empezado por Caral

Hola
Por supuesto que me puedo equivocar y al ser novato con mas razón, pero casi podría asegurar que el código tiene un error y muy serio, mas sabiendo que esta sacado de un código que yo mismo hice.
Saludos

¿A que error te refieres amigo?

Para mi es muy claro y evidente que el error de invalid floating point value es que se trata de una confusión en el signo decimal.

Se está ingresando un punto y se espera una coma, o a la inversa... se está ingresando una coma y se espera un punto.

Fuera de eso no hay nada de malo. ¿O soy yo el que está equivocado y no veo donde está el error?

Saludos,

[[Caral]]

Hola
Perdona amigo, pensé que habías bajado el programa que puso Yensis22.
Si no lo bajaste no puedes ver el error.
Fue error mio creer que lo hiciste.
Disculpa.
Saludos

[Yensis22]

el campo comentario es que no estoy insertando

[[Delphius]]

Empezado por Caral

Hola
Perdona amigo, pensé que habías bajado el programa que puso Yensis22.
Si no lo bajaste no puedes ver el error.
Fue error mio creer que lo hiciste.
Disculpa.
Saludos

Lo he descargado pero no lo he visto con demasiada atención.
Si lo dices amigo, es posible que haya algo más que el error del separador decimal.

A ver... ya mi fijo de que se trata esto.

Saludos,

[[Delphius]]

Empezado por Caral

Hola
Voy a tratar de ser mas especifico:
Hay dos formas de insertar en una tabla.
1- La forma que ya tienes:
De esta manera la sentencia sql interpreta que se hará una inserción completa a la tabla, osea que contendrá TODOS los campos y ademas se insertaran en el mismo ORDEN en que están en la tabla.
2- Cuando se quieren insertar solo en algunos campos de la tabla:
En este caso se tendrá que indicar en cuales de los campos se querrá hacer la inserción.
Como ves hay una diferencia, ese es el error o por lo menos uno de ellos.
Saludos

Muy cierto Carlos!
Tienes razón. En caso de no insertar todos los campos se debe indicar que campos en la sentencia SQL:

Código SQL [-]
insert into tabla (listado_de_campos) values (tus_datos)

Y disculpen que sea pesadito, que vea el asunto del separador decimal.

Saludos,

[Yensis22]

rea

Le argue el campo comentario pero que lo inserte en la tabla pero , no me da resultado por

Código Delphi [-]
var
a,b,c,d,e,f,g,h :real;
begin
 a:= StrTofloat(Editcantidad.Text);
 b:= StrTofloat(EMonto.Text);
 d:= StrTofloat(EDesc.Text);
 f:= StrTofloat(EImp.Text);
 c:= a * b;
 e:= c * d / 100;
 g:= (c - e) * f / 100;
 h:= c - e + g;
 ESTotal.Text:= floatToStr(c);
 EDescuento.Text:=floatToStr(e);
 EImpuesto.Text:=floatToStr(g);
 ETotal.Text:= floatToStr(Round(h));
 Qfacturacion.SQL.Text := 'Insert into Facturacion Values ('+QuotedStr(ECodFactura.Text)+', '+
 QuotedStr(EdiCliente.Text)+ ', '+ LabDireccion.Caption+ ' :FechaFactura, '+QuotedStr(Editequipo.Text)+ ', '+
 QuotedStr(EditRNC.Text)+ ', '+QuotedStr(DBComboBox2.Text)+', '+QuotedStr(EMonto.Text)+', '+
 QuotedStr(Editcantidad.Text)+', '+QuotedStr(ETotal.Text)+', '+QuotedStr(EImp.Text)+', '+
 QuotedStr(EDesc.Text)+', '+QuotedStr(DBComboBox3.Text)+ ', '+QuotedStr(ESTotal.Text)+ ', '+
 QuotedStr(EDescuento.Text)+', '+QuotedStr(EImpuesto.Text)+')', '+QuotedStr(DBMemo1.Text)+')';
 Qfacturacion.Parameters.ParamByName('FechaFactura').Value:= DateToStr(DateTimePicker1.Date);
 Qfacturacion.ExecSQL;

end;

[[Caral]]

Hola
Voy a tratar de ser mas especifico:
Hay dos formas de insertar en una tabla.
1- La forma que ya tienes:
De esta manera la sentencia sql interpreta que se hará una inserción completa a la tabla, osea que contendrá TODOS los campos y ademas se insertaran en el mismo ORDEN en que están en la tabla.
2- Cuando se quieren insertar solo en algunos campos de la tabla:
En este caso se tendrá que indicar en cuales de los campos se querrá hacer la inserción.
Como ves hay una diferencia, ese es el error o por lo menos uno de ellos.
Saludos

[tcp_ip_es]

uhmmmm que raaaaaaaaaaro ok0510 ha escrito lo mismito que dec en su primera respuesta al hilo...

Por favor, edita tu mensaje de manera que no "rompa" la página del foro. ¿Y qué es eso de "facruta"? Quisiste decir factura, claro. Presta más atención al título de los hilos, porque, es importante a la hora de realizar búsquedas en el futuro, entre otras cosas. Gracias.

... y es el primer mensaje de ok0510 .... yo ya no entiendo nada

[[coso]]

es un bot, tcp_ip, para ganar clicks a las paginas de abajo