Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 09-11-2012
webmasterplc webmasterplc is offline
Miembro
 
Registrado: mar 2008
Posts: 274
Poder: 17
webmasterplc Va por buen camino
Error Al Eliminar Registro

Buenas, estoy tratando de ejecutar una consulta para eliminar unos registros y me da el siguiente error

https://www.dropbox.com/s/nteegq0k1z...error11949.jpg

el código que uso es este.

Código Delphi [-]
procedure TFormEliminarPago.btn1Click(Sender: TObject);
var
codigo,factura,sqleliminar1,tipo:string;
begin
codigo:='0000';
factura:='100';
tipo:='54';
sqleliminar1:= 'delete * from Scuentasxcobrar where FCC_CODIGO= :fcccodigo and FCC_TIPOTRANSACCION=:fcctipo and FCC_NUMERO2=:fccnumero2';
if messagedlg ('Usted Va a Eliminar Los Registros de Pagos Relacionados Con ' +
  'esta factura. Este Procedimiento no se puede revertir, y tiene que registrar el Pago nuevamente desde cuentas por cobrar.. ¿Esta Usted Seguro?',mtconfirmation,[mbok,mbcancel],0)=mrok then
with datos.SQcxc do
      begin
      DatabaseName:='a2Utilitario';
      SQL.Clear;
      SQL.Text := sqleliminar1;
      ParamByName('fcccodigo').AsString:=codigo;
      ParamByName('fccnumero2').AsString:=factura;
      ParamByName('fcctipo').AsString:=tipo;
      Open;
      end;


end;

Uso Base de Datos DBISAM
Imágenes Adjuntas
Tipo de Archivo: jpg error11949.jpg (30,7 KB, 7 visitas)
Responder Con Cita
  #2  
Antiguo 09-11-2012
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.042
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
El open es para los select, debes usar execsql
Además de que te sobra el asterisco (*)

No estaría de más que echaras un vistazo a un simple tutorial de lenguaje sql.
Responder Con Cita
  #3  
Antiguo 10-11-2012
webmasterplc webmasterplc is offline
Miembro
 
Registrado: mar 2008
Posts: 274
Poder: 17
webmasterplc Va por buen camino
Ya lo revise se me habia pasado pero me da este error
https://www.dropbox.com/s/5kfxg8h6lj...rrordbisam.jpg

Cita:
Empezado por Casimiro Notevi Ver Mensaje
El open es para los select, debes usar execsql
Además de que te sobra el asterisco (*)

No estaría de más que echaras un vistazo a un simple tutorial de lenguaje sql.
Responder Con Cita
  #4  
Antiguo 10-11-2012
webmasterplc webmasterplc is offline
Miembro
 
Registrado: mar 2008
Posts: 274
Poder: 17
webmasterplc Va por buen camino
si la coloco hasta aqui correo bien
Código Delphi [-]
with datos.SQcxc do
      begin
      DatabaseName:='a2Utilitario';
      SQL.Clear;
      SQL.Add('DELETE FROM Scuentasxcobrar');
      SQL.Add('where FCC_CODIGO=:fcccodigo');
      ParamByName('fcccodigo').AsString:=codigo;
      ExecSQL;
      end;

Pero al agrgarle otra condicio me da el error
Código Delphi [-]
with datos.SQcxc do
      begin
      DatabaseName:='a2Utilitario';
      SQL.Clear;
      SQL.Add('DELETE FROM Scuentasxcobrar');
      SQL.Add('where FCC_CODIGO=:fcccodigo');
      SQL.Add('and FCC_TIPOTRANSACCION=:fcctipo');
      ParamByName('fcccodigo').AsString:=codigo;
      ParamByName('fcctipo').AsString:=tipo;
      ExecSQL;
      end;
Responder Con Cita
  #5  
Antiguo 10-11-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 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
Hola webmasterplc.

En el soporte técnico de la página, encontre TDBISAMParam, revisando el enlace AsString dice:
Cita:
Use the AsString property to access or specify the current value of the parameter as a String type.
Setting the value of the parameter using the AsString method will set the DataType property to ftString.
Yo probaría cambiando la propiedad AsString por la que corresponda al tipo del campo FCC_TIPOTRANSACCION (si este fuera de un tipo diferente a ftString). Pero estoy dando palos a ciegas por que no conozco en absoluto esos componentes.

Por otro lado no pude encontrar un error significativamente semejante al que comentas usando esos componentes y tampoco hay mucho material:Como último recurso podés comunicarte con el Soporte Técnico via emáil o telefónica.

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
  #6  
Antiguo 10-11-2012
webmasterplc webmasterplc is offline
Miembro
 
Registrado: mar 2008
Posts: 274
Poder: 17
webmasterplc Va por buen camino
Muchas Gracias era que le estaba pasando un String a un Integer saludos
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Eliminar Registro agustin173 Varios 9 13-10-2010 06:32:41
eliminar un registro pronto7 SQL 1 21-06-2010 20:33:21
Error al eliminar un registro bothy Varios 10 27-04-2010 10:06:01
Eliminar registro Zakio14 Firebird e Interbase 5 20-03-2008 07:07:07
error al querer eliminar un registro pablito23 Conexión con bases de datos 0 05-07-2005 08:25:07


La franja horaria es GMT +2. Ahora son las 13:29:15.


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