Hola,
Uso delphi 6, interbase 7, dialecto3.
Estoy intentando usar el siguiente código SQL, en un IBDataSet.
Cita:
select NUMALU,SUM(0 - econo.impdebe + econo.imphaber) IMPORTE
from econo
WHERE NUMALU =:alumnos.numalu
GROUP BY NUMALU
ORDER BY NUMALU
|
Se lo estoy intentando pasar de la siguiente forma:
Cita:
TRY
dbPos := FrmDmodule.TbEcono.Getbookmark;
FrmDmodule.TbEcono.Disablecontrols;
FrmDModule.TbEcono.Close;
//borramos el contenido de la propiedad SelectSQL
FrmDModule.TbEcono.SelectSQL.Clear;
//le asignamos el SQL que tenía al inicio la tabla
FrmDModule.TbEcono.SelectSQL.Add('select NUMCLI, SUM(0 - econo.impdebe + econo.imphaber) IMPORTE');
FrmDModule.TbEcono.SelectSQL.Add('from econo');
FrmDModule.TbEcono.SelectSQL.Add('WHERE NUMCLI =:NUMCLI’);
FrmDModule.TbEcono.SelectSQL.Add('GROUP BY NUMCLI’);
FrmDModule.TbEcono.SelectSQL.Add('ORDER BY NUMCLI ');
FrmDModule.TbEcono.Open;
nAux2 := FrmDModule.TbEconoIMPORTE.value;
lblSaldo.Caption := formatFloat('#,##0.00 €',nAux2);
FINALLY
FrmDmodule.TbEcono.GotoBookmark(dbPos);
FrmDmodule.TbEcono.FreeBookmark(dbpos);
FrmDmodule.TbEcono.EnableControls;
END;
|
El problema es que al compilar me da fallo, por que me pide unos campos que necesito tener declarados en la tabla, pero que aquí no se como incluir.
¿alguna idea?
Muchas gracias a todos por la ayuda.
Virginia