Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Firebird e Interbase (https://www.clubdelphi.com/foros/forumdisplay.php?f=19)
-   -   Error Firebird en Aplicacion MDI (https://www.clubdelphi.com/foros/showthread.php?t=56435)

Mosis2k2 16-05-2008 23:43:09

Error Firebird en Aplicacion MDI
 
Hola, espero que me puedan ayudar.
Tengo una aplicacion en la cual tengo un modulo de datos con componentes DBX:
JsqlDataBase: TSQLConnection;
JQryConsulta: TSQLQuery;
Del formulario principal mando llamar un formulario el cual hace consultas y actualizaciones a la base de datos.
Cuando el formulario lo muestro de forma Modal, hace todo correctamente.
Pero ultimamente estoy haciendo modificaciones para que la aplicacion sea MDI. llamo el mismo formulario y lo
muestra y hasta ahi todo bien.
Cuando se hacen consultas funciona correctamente, pero cuando intento insertar algun nuevo registro me manda un
mensaje de error y no guarda nada.
Este es el codigo que manda el error:

with DataModule.JQryConsulta do begin
Close;
SQL.Clear;
SQL.Add('INSERT INTO ventas (areaventa, caja, numero, fecha, hora, iva,');
SQL.Add('total, cambio, redondeo, estatus, cliente, usuario, ventaref, vendedor) VALUES(');
SQL.Add(sAreaVenta + ',' + IntToStr(iCaja) + ',' + IntToStr(iConsec) + ',''' + sFecha + ''',');
SQL.Add('''' + sHora + ''',' + FloatToStr(rIva) + ',' + FloatToStr(rTotal) + ',');
SQL.Add(FloatToStr(rCambio) + ',' + FloatToStr(rRedondeo) + ',');
SQL.Add('''A'',' + sCliente + ',' + IntToStr(iUsuario) + ',' + sVentaRef + ',' + sVendedor + ')');
ExecSQL; // <---------- aqui se presenta el error------------------
Close;
end;

De antemano les agradesco su ayuda.

celades1 17-05-2008 10:19:17

Hola


Dinos que error te lanza

Mosis2k2 17-05-2008 17:20:34

Cita:

Empezado por celades1 (Mensaje 287376)
Hola


Dinos que error te lanza


el mensaje de error que manda es:
"DBX Error: No Mapping for Error Code Found"
y la verdad no se a que se refiera.

RolphyReyes 19-05-2008 16:00:04

Saludos.

Trata a realizar un SP en la BD y luego ejecutarlo en tu aplicación vía el componente de SP.

Hasta luego.

juanelo 19-05-2008 16:11:46

Cita:

Empezado por Mosis2k2 (Mensaje 287406)
el mensaje de error que manda es:
"DBX Error: No Mapping for Error Code Found"
y la verdad no se a que se refiera.

Que tal que tomes la query resultante y la ejecutes por ejemplo con IBExpert o algun otro DBAdmin, para ver si es problema de la query o bien problema del driver que usas.
Saludos


La franja horaria es GMT +2. Ahora son las 18:34:58.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi