Insertar registros en Firebird

[GustavoCruz]

veras, yo conecto la base de datos y pongo el SQLtransaction. luego pongo el SQLQuery y en la propiedad de InsertSQL pongo la sentencia adecuada.

el problema es que cuando cierro la conección, se pierden los registro.

Al finalizar la inserción yo pongo

Código SQL [-]
SQLTransaction.CommintRetaing

y eso debería ser suficiente pero no...

De antemano mil gracias por vuestro tiempo y aportes

[Casimiro Noteví]

¿No habrás olvidado hacer 'post' después del insert?

[marcoszorrilla]

Haz caso a Casimiro:

Código Delphi [-]
procedure TfrProveedores.BitBtn1Click(Sender: TObject);
begin
 if DmProv.IBDTsProv.State in [dsInsert, dsEdit] then
 DmProv.IBDTsProv.Post;

Código Delphi [-]
procedure TDmProv.IBDTsProvAfterPost(DataSet: TDataSet);
begin
DmConex.IBTransaction.CommitRetaining;
end;

Un Saludo.

[GustavoCruz]

hola amigos, yo en lazarus escribo asì:

Código Delphi [-]
with SQLQuery1 do
begin
  insertSQL.Clear;
  insertSQL.Add('insert into tabla(campos) values(valores)');
  ...
end;

y eso debería ser suficiente para insertar los registros...

pero no funciona

[Casimiro Noteví]

¿No has leído el código que te ha puesto marcoszorrilla? , no es suficiente con que hagas el 'insert', debes hacer 'post' y luego 'commit', te falta el 'post' que viene a ser el comando que realmente graba los datos, luego el 'commit' confirma que se graben, pero te falta el post.

En tu código debes escribir algo así como:

with SQLQuery1 do
begin
  insertSQL.Clear;
  insertSQL.Add('insert into tabla(campos) values(valores)');

  SQLQuery1.Post;   <<-------------<

end;

[GustavoCruz]

Definitivamente no...

Código Delphi [-]
with SQLQuery1 do
        begin
          InsertSQL.Clear;
          InsertSQL.Add('insert into detable values('+Dbf1.Fields[0].AsString
          +','''+Dbf1.Fields[1].AsString+''')');
          ExecSQL;
          Post;
        end;

Gracias por vuestro tiempo


Gustavo Cruz

[GustavoCruz]

Tal vez el problema se encuentre en SQLTransaction

el tiene una Params, ¿Qué de se debe colocar?.

yo ahí no tengo nada.


Gracias de Antemano por vuestro tiempo


GustavoCruz

[Casimiro Noteví]

Amigo GustavoCruz, el problema es que no somos adivinos, debes contarnos lo más detallado posible la situación de lo que estás haciendo, porque así, con lo parco en palabras que estás siendo... es bastante difícil poder ayudarte, cuéntanos en detalle los componentes que usas, cómo están enlazados, qué procesos haces, pasos que das hasta llegar a esa función, mensajes de error o aviso que te salgan, resultados obtenidos, etc.