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 Buscar Temas de Hoy Marcar Foros Como Leídos

Conexión con bases de datos

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo Hace 3 Semanas
viverosjosem viverosjosem is offline
Registrado
 
Registrado: Dec 2017
Posts: 9
Poder: 0
viverosjosem Va por buen camino
Unhappy Nuevamente problemas con UPDATE SQL

Hola Amigos.
Hace dias hice una consulta en este foro, y me respondieron muy bien y logre resolver mi problema. Pero ahora estoy en una situacion similar y no logro dar con la solucion:

Como dije en la consulta anterior, soy nuevo en todo lo referenta a SQL y Firebird.

Anteriormente tenia que actualizar un campo "cantidad" de la base de datos que ya tenia un valor, con una nueva cantidad. (el problema lo resolvi con la generosa ayuda de los integrantes del foro).

Ahora tengo un problema similar: Luego de actualizar el campo cantidad con su nuevo valor, debo actualizar el campo Total.

Tengo como ejemplo:
Variables de programa:
iCantidad = 5.
iPrecio = 1500.

En la base de datos ya existe: "Cantidad = 2". Por lo tanto el valor del campo: "Total", deberia ser: Total = 10.500.- (7 * 1500).

Pero el problema es que no logro actualizar el campo "Total".
Me sale un error: SQLDataSet1.Parameters "Total" not found

E probado con todas las combinaciones que se me han ocurrido y nada.

Les dejo el codigo con el que estoy trabajando en las pruebas.

Código Delphi [-]
      iCantidad := StrToFloat(EdCantidad.Text);
      iPrecio   := StrToFloat(EdPrecio.Text);
      iTotal    := iCantidad * iPrecio;

      SQLDataSet1.Close;
      SQLDataSet1.CommandText :=  'UPDATE ' + ' Comanda ' +
                                   'SET ' +
                                       'Cantidad  = (Cantidad + :iCantidad), ' +
                                       'Precio    = :Precio, ' +
                                       'Total     = (Cantidad * :iPrecio) ' +
                                   'WHERE ' +
                                       'Salon  = ' + QuotedStr(EdSalon.Text) + ' AND ' +
                                       'Numero = ' + QuotedStr(EdMesa.Text)  + ' AND ' +
                                       'Codigo = ' + QuotedStr(EdCodigo.Text)+ ';';

      SQLDataSet1.ParamByName('iCantidad').AsFloat := iCantidad;
      SQLDataSet1.ParamByName('Precio').AsFloat    := iPrecio;
      SQLDataSet1.ParamByName('Total').AsFloat     := iTotal;

      SQLDataSet1.ExecSQL(False);

Todo lo demas funciona a la perfeccion. Solo el campo total, es el que me da problemas.

De antemano gracias por la ayuda.

Y felices Fiestas de Año Nuevo.
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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
Problemas con UPDATE golf2008 MySQL 5 04-11-2008 15:48:27
problemas con Update. sargento elias Firebird e Interbase 14 12-06-2008 19:30:16
problemas con el UPDATE huwabe78 SQL 7 30-11-2006 14:44:48
Problemas de con UPDATE jmlifi Varios 3 20-05-2005 22:59:42
Problemas con Update ramonibk MS SQL Server 2 01-09-2004 15:40:32


La franja horaria es GMT +2. Ahora son las 18:27:07.


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