Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 16-08-2004
Avatar de nefy
nefy nefy is offline
No confirmado
 
Registrado: nov 2003
Posts: 171
Poder: 0
nefy Va por buen camino
Invalid parameter en run-time pero no en IDE

Estando en el IDE de delphi ejecuto la siguiente sentencia SQL en un TQuery:

Código SQL [-]
 INSERT INTO MovimientoCuentaBancaria 
(NoMovimiento, CuentaBanco, NoCheque, Concepto,  Abono) 
 VALUES(5268.0,   1, '11' , 'Cheque al portador', 3.5)

Obviamente solo marca la excepcion "Error creating cursor handle", pero si inserta el registro en la tabla. Pero cuando esto lo envio a codigo para tomar valores de variable y tablas de esta manera me marca el error invalid parameter:

Código SQL [-]
  Qry.SQL.Text:='INSERT INTO MovimientoCuentaBancaria 
 (NoMovimiento, CuentaBanco, NoCheque, Concepto,
 '+' Abono) VALUES '+
     '('+FloatToStr(NoMov)+', '+CuentaBanco+', '+
     QuotedStr(DM.DetDeposito.Fields[1].AsString)+
     QuotedStr('Aportación de Beneficiarios')+', '+
     FloatToStr(DM.DetDeposito.Fields[3].AsFloat)+')';

Nota: Uso Delphi 6, Firebird 1.5 y pdx, estoy insertando registros a tablas paradox , pero tomando datos de una base de datos de Firebird.

Salu2.

Última edición por santana fecha: 16-08-2004 a las 22:11:07. Razón: Edición correcta de las etiquetas de código sql
Responder Con Cita
  #2  
Antiguo 18-08-2004
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Poder: 26
delphi.com.ar Va por buen camino
¿Cómo estas ejecutando este SQL en Runtime? ¿Porqué no nos muestras el valor que toma el SQL una vez asignado?

Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita
  #3  
Antiguo 18-08-2004
Avatar de nefy
nefy nefy is offline
No confirmado
 
Registrado: nov 2003
Posts: 171
Poder: 0
nefy Va por buen camino
Bueno estoy usando ExecSQL pues obviamente esta sentencia no devuelve ningun Dataset. Y pues finalmente solucione el problema, lo que hice fue ir eliminando posibilidades (omitir campos), despues de q no me marcaba error y me permitia hacer las inserciones la sentencia quedo asi:

Código:
Qry.SQL.Text:=
'INSERT INTO MovimientoCuentaBancaria(NoMovimiento, CuentaBanco, NoCheque, Concepto, Abono)'+
' VALUES '+
'('+FloatToStr(NoMov)+', '+CuentaBanco+', '+
QuotedStr(DM.DetDeposito.Fields[1].AsString)+', '+//NoCheque es decir NoRecibo
QuotedStr('Concepto cualquiera')+', '+//Concepto
FloatToStr(DM.DetDeposito.Fields[3].AsFloat)+')'; //Abono
    ExecSQL;
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 15:21:33.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi