Ver Mensaje Individual
  #6  
Antiguo 11-07-2005
Chocoslovaco Chocoslovaco is offline
Miembro
 
Registrado: jun 2005
Ubicación: Puebla, México
Posts: 66
Reputación: 21
Chocoslovaco Va por buen camino
No se Actualizan los campos...

Aqui de nuevo....Gracias por las respuestas me han sido de muchisima ayuda, ya existe ningun error al compilar...pero ahora me surge otro problema
cuando ejecuto el programa al llegar a esta parte...(donde FieldValues['Pagada']:=true; FieldValues['PagadaE']:=true;...) ..
Código Delphi [-]
....
with QKardex do begin
Close; SQL.Clear;
SQL.Text:='SELECT IdCrédito,Pagada,PagadaE,Parcial,Parcia.. FROM Tabla7 '+
                'WHERE ((Pedido="Cargo") OR (Pedido="Nota de Cargo")... '+
                'AND NoFactura=' + IntToStr(prNoFactura) + 'AND NombreCompañía='+ Quotedstr(Cliente);
      Open;
....
FieldValues['Pagada']:=true; FieldValues['PagadaE']:=true;
          FieldValues['Parcial']:=false; FieldValues['ParcialE']:=false;
          FieldValues['Importe']:=CurrToStr(FieldValues['ImporteE']);
          Update;
          QInsertados.SQL.Clear;
          QInsertados.SQL.Text:='UPDATE Pedidos SET Pagada=-1,PagadaE=-1,ParcialE=0,ImporteE='+ CurrToStr(FieldValues['Importe']) + ' WHERE IdPedido=' + IntToStr(FieldValues['IdCrédito']);
          QInsertados.ExecSQL;
          QInsertados.Close;
....

No sucede nada en la tabla afectada, despues de hacer el Update...¿Alguien podria decirme cual es el problema? los campos Pagada, Parcial, ParcialE, PAgadaE son de tipo Si/No, ya intente colocando los valores 0 y -1, pero tampoco se actualizan...Por sus comentarios Gracias
Responder Con Cita