Ver Mensaje Individual
  #3  
Antiguo 09-07-2005
Chocoslovaco Chocoslovaco is offline
Miembro
 
Registrado: jun 2005
Ubicación: Puebla, México
Posts: 66
Reputación: 19
Chocoslovaco Va por buen camino
Gracias por la observacion, es muy cierto el codigo correcto debe ser:
Código Delphi [-]
QInsertados.SQL.Clear;
 QInsertados.SQL.Text:='INSERT INTO [Abonos Pendientes] (Cliente,Importe,IdAbono) VALUES('+ Quotedstr(Cliente) + ',' + IntToStr(AbonoP) + ',' + IntToStr(prNoFactura) +')';
    QInsertados.ExecSQL;

Quizas no formule bien mi pregunta, lo que quiero saber si mi sintaxis es correcta, es decir; si hacer operaciones con los campos de esta forma:
FieldValues['Pagada']:=-1; FieldValues['PagadaE']:=-1;

ahora cuando llega la ejecucion hasta aqui:
Código Delphi [-]
  
....
QInsertados.SQL.Clear;
QInsertados.SQL.Text:='UPDATE Pedidos SET Pagada=-1,PagadaE=-1,ParcialE=0,ImporteE='+ FieldValues['Importe'] + ' WHERE IdPedido=' + FieldValues['IdCrédito'];
 QInsertados.ExecSQL;
...

Me envia un error de : "Could No Convert Variant of type (String) into type (Currency)"
Responder Con Cita