Se me tilda el programa al actualizar

[JairoC]

Hola!!! Quiero actualizar los Id_cierrez de cada factura... Y cuando hago el open; se tilda el programa... Este es parte del codigo... NO se si está bien... Gracias!

Código Delphi [-]
num_cierre:=DM2.IBDataSet_CierreZID_CIERREZ.Value;
 DM2.IBDataSet_CierreZ.Post;
 with(dm.IBQuery_general)do
      begin
        FieldDefs.Clear;
        SQL.Clear;
        SQL.Add('update facturas_de_ventas set id_cierrez=:cierre where id_cierrez is null');
        ParamByName('cierre').AsInteger:=num_cierre;
        Open;// Lo debugueo y se tilda acá...
      end;

[[oscarac]]

disculpame.. pero tildar.. en mi region significa acentuar (colocar acentos)
no sera que se te cuelga????
o es otra cosa

[JairoC]

Si, se cuelga. Y no pasa nada

[olbeup]

Empezado por JairoC

Hola!!! Quiero actualizar los Id_cierrez de cada factura... Y cuando hago el open; se tilda el programa... Este es parte del codigo... NO se si está bien... Gracias!

Código Delphi [-]
num_cierre:=DM2.IBDataSet_CierreZID_CIERREZ.Value;
 DM2.IBDataSet_CierreZ.Post;
 with(dm.IBQuery_general)do
      begin
        FieldDefs.Clear;
        SQL.Clear;
        SQL.Add('update facturas_de_ventas set id_cierrez=:cierre where id_cierrez is null');
        ParamByName('cierre').AsInteger:=num_cierre;
        Open;// Lo debugueo y se tilda acá...
      end;

¿Que es, se tilda?, sera que te tira del programa o se cierra inesperadamente.
¿Porque pones FieldDefs.Clear?, estas borrando todos los campos que tiene la table, ¿Sera por eso?, nose quita la línea y prueba de nuevo.

Un saludo.

[JairoC]

Se clava el programa, no se cierra... Uso FieldDefs.Clear; porque a este query lo uso en distintas consultas... Y le borro los campos... Probé quitandole esa línea, pero sigue igual...

[[oscarac]]

y has verificado si se cuelga realmente?
o es que la computadora esta actualizando y son muchos registros.. pq la otra condicion es
id_cierrez is null

[look]

Empezado por JairoC

Hola!!! Quiero actualizar los Id_cierrez de cada factura... Y cuando hago el open; se tilda el programa... Este es parte del codigo... NO se si está bien... Gracias!

Código Delphi [-]
num_cierre:=DM2.IBDataSet_CierreZID_CIERREZ.Value;
 DM2.IBDataSet_CierreZ.Post;
 with(dm.IBQuery_general)do
      begin
        FieldDefs.Clear;
        SQL.Clear;
        SQL.Add('update facturas_de_ventas set id_cierrez=:cierre where id_cierrez is null');
        ParamByName('cierre').AsInteger:=num_cierre;
        Open;// Lo debugueo y se tilda acá...
      end;

Código Delphi [-]
num_cierre:=DM2.IBDataSet_CierreZID_CIERREZ.Value;
 DM2.IBDataSet_CierreZ.Post;
 with(dm.IBQuery_general)do
      begin
        FieldDefs.Clear;
        SQL.Clear;
        SQL.Add('update facturas_de_ventas set id_cierrez=:cierre where id_cierrez is null');
        ParamByName('cierre').AsInteger:=num_cierre;
        execsql  //// deberia de ir esto
      end;