PDA

Ver la Versión Completa : Como asigno los datos SQL a un IBDataSet


Gigabyte1024
03-02-2007, 00:23:38
Hola, quisiera saber si es posible que alguien ayudara ya que necesito asignarle los campos SQL en tiempo de ejecucion a un IBDataSet este es el codigo que estoy tratando de usar:


dataset.SelectSQL.Add('select * from MESA');
dataset.RefreshSQL.Add('select * from MESA');
dataset.InsertSQL.Add('insert into MESA (CANT, PLATO, PCIO, HORA, MESNO, COM) values (:CANT, :PLATO, :PCIO, :HORA, :MESNO, :COM)');
dataset.DeleteSQL.Add('delete from MESA where CANT = :OLD_CANT and PLATO = :OLD_PLATO and PCIO = :OLD_PCIO and HORA = :OLD_HORA and MESNO = :OLD_MESNO and COM = :OLD_COM');
dataset.ModifySQL.Add('update MESA'+
'set'+
' CANT = :CANT,'+
' PLATO = :PLATO,'+
' PCIO = :PCIO,'+
' HORA = :HORA,'+
' MESNO = :MESNO,'+
' COM = :COM'+
'where'+
' CANT = :OLD_CANT and'+
' PLATO = :OLD_PLATO and'+
' PCIO = :OLD_PCIO and'+
' HORA = :OLD_HORA and'+
' MESNO = :OLD_MESNO and'+
' COM = :OLD_COM');

(El problema no cambia si en lugar de Add() uso Text:=)

lo compila y parece que no estuviera masl pero cuando se llega a ejecutar esa parte del programa me marca un error: Dynamic SQL Error SQL Error code = -104 Token Unknown - line 1 char 22 ='

De antemano agradesco su ayuda

luisgutierrezb
03-02-2007, 01:29:10
pues a simple vista veo esto:
dataset.ModifySQL.Add('update MESA'+
'set'+

con lo cual la instruccion quedaria:
update MESAset

Gigabyte1024
03-02-2007, 01:35:42
wow muchas gracias en verdad no lo habia notado
gracias