Ver Mensaje Individual
  #3  
Antiguo 07-08-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
Empezado por jorosmtz Ver Mensaje
que cuando haga el "ExecSQL" se actualicen todos los datos de un solo jalón, como en el ejemplo que puse
Hola Javier.

El equivalente al ejemplo que pusiste pero realizando una modificación, sería:
Código Delphi [-]
  with IBQuery do
  begin
    try
      Close; 
      SQL.Clear;
      SQL.Add('UPDATE TBPRODUCTO SET ');
      SQL.Add('FECHA = :FECHA,');
      SQL.Add('HORA = :HORA,');
      SQL.Add('CLAVEPRODUCTO = :CLAVEPRODUCTO,');
      SQL.Add('NOMBREPRODUCTO = :NOMBREPRODUCTO ');
      SQL.Add('WHERE CLAVEPRODUCTO = :OLD_CLAVEPRODUCTO');
      ParamByName('FECHA').AsDateTime:= Fecha.Date;
      ParamByName('HORA').AsString:= Hora.Text;
      ParamByName('CLAVEPRODUCTO').AsString:= EditClaveProducto.Text;
      ParamByName('NOMBREPRODUCTO').AsDateTime:= EditNombreProducto.Text;
      ParamByName('OLD_CLAVEPRODUCTO').AsString:= EditClaveProducto.Text; 
      ExecSQL;
      ...
  end;

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 07-08-2011 a las 07:29:55.
Responder Con Cita