Actualizo registro con problemas

[[Lepe]]

¿Por qué tenemos que adivinar las tablas, los campos y los datos que tiene él?

Chico, pon ejemplito de todo y así queda claro lo que quieres hacer y por qué.

Pero por favor, usa las etiquetas delphi y sql:


[delphi]
tu codigo delphi aqui
[/delphi]


[sql]
tu codigo sql aqui
[/sql]

para que podamos verlo con identado y resaltado de sintaxis.

No suele ser normal 3 días para resolver una duda de este tipo, (a menos que sea un bug del motor, o algo similar).

Saludos

[comba]

Primero disculparme por no haber contestado antes, pero no he podido.
Os muestro un ejemplo más claro de lo que me ocurre y no entiendo el porque.

Intento hacer esto
try
Data.ConTipsaSer.BeginTrans;
Data.Sql.CommandText:='Delete from Bultos where Cli ='+#39+cliente+#39;
Data.Sql.Execute;
Data.ConTipsaSer.CommitTrans;
except
Data.ConTipsaSer.RollbackTrans;
end;

Y me sigue borrando el primero.

Lo que he hecho ha sigo generar un pequeño ejecutable con el mismo ADOConnection1 y el mismo ADOCommand1

procedure TForm1.Button1Click(Sender: TObject);
var
cliente:String;
begin
cliente:='01504';
ADOConnection1.Connected;
ADOCommand1.CommandText:='Delete from Bultos where cli ='+#39+cliente+#39+')
ADOCommand1.Execute;
ADOConnection1.Connected:=False;
end;
Y me funciona. ¿No se por donde mirar?

[Neftali [Germán.Estévez]]

¿Y estás seguro de que en el primer caso la variable cliente vale lo que debe valer?

Código Delphi [-]
try
  Data.ConTipsaSer.BeginTrans;
  MessageDlg(Format('Voy a borrar el cliente <%s>',[cliente]), mtWarning, [mbOK], 0);
  Data.Sql.CommandText:='Delete from Bultos where Cli ='+#39+cliente+#39;
  MessageDlg(Format('SQL:%s',[Data.Sql.CommandText]), mtWarning, [mbOK], 0);
  Data.Sql.Execute;
  Data.ConTipsaSer.CommitTrans;
except
  Data.ConTipsaSer.RollbackTrans;
end;

Ya se que es un poco "rustico", pero es para asegurarte, porque lo que te está pasando está claro que es raro...

[comba]

Gracias Neftali, pero si que me muestra el cliente correctamente.

Creo que el problema no es de la base de datos, sino de las transcaciones o de algo que se queda abierto. También lo he probado con un procedimiento almacenado y lamentablemente solo me borra un registro.

Voy a probar a crear otra conexión para borrar y actualizar haber que ocurre?

Gracias

[comba]

Gracias por ayudarme, lo he solucionado pero me gustaria saber por que no me hacer los delete o los update.

Bueno lo que he hecho ha sido abrir otra conexión y hacer la sentencia de sql.
Y funciona a la primera.

Un saludo y gracias.