Не пойму с запросом

← →
petvv (2009-10-28 09:33) [0]

Есть запрос

select Fuel.Marka, Osnovan.Name, TotOsnov.ShiftFrom, TotOsnov.ShiftTo, TotOsnov.Lit, TotOsnov.Cur from Fuel, Osnovan, TotOsnov where TotOsnov.ShiftTo>=:QDatBeg and TotOsnov.ShiftTo<=:QDatEnd and TotOsnov.Product=Fuel.Num and TotOsnov.Osnovanye=Osnovan.Num having TotOsnov.Cur<>0 union select Fuel.Marka, Osnovan.Name, TotOsnov.ShiftFrom, TotOsnov.ShiftTo, TotOsnov.Lit, TotOsnov.Cur from Fuel, Osnovan, TotOsnov where TotOsnov.ShiftTo>=:QDatBeg and TotOsnov.ShiftTo<=:QDatEnd and TotOsnov.Product=Fuel.Num and TotOsnov.Osnovanye=Osnovan.Num having TotOsnov.Cur=0

И есть код

qRas.Close; qRas.Prepare; qRas.Params[0].AsDateTime := DatBeg; qRas.Params[1].AsDateTime := DatEnd; qRas.Params[2].AsDateTime := DatBeg; qRas.Params[3].AsDateTime := DatEnd; qRas.Open;

Вот в этом месте
qRas.Prepare;
отваливается с ошибкой

Capability not supported

Где у меня кривые руки?

← →
RWolf © (2009-10-28 09:39) [1]

ParamByName не поможет?

← →
petvv (2009-10-28 09:42) [2]

Сам дурак, всё разобрался

← →
Сергей М. © (2009-10-28 09:47) [3]

Статья HAVING применима только к агрегатным запросам.

И в чем, кстати, тайный смысл такого несуразного запроса ?
Чем он должен принципиально отличаться от

select Fuel.Marka, Osnovan.Name, TotOsnov.ShiftFrom, TotOsnov.ShiftTo,
TotOsnov.Lit, TotOsnov.Cur
from Fuel, Osnovan, TotOsnov
where
TotOsnov.ShiftTo>=:QDatBeg
and
TotOsnov.ShiftTo<=:QDatEnd
and
TotOsnov.Product=Fuel.Num
and
TotOsnov.Osnovanye=Osnovan.Num
order by TotOsnov.Cur descending

?

отсортировать записи с TotOsnov.Cur=0 вниз, видимо.

> RWolf © (28.10.09 09:49) [4]

Порядок сортировки задается только с помощью ORDER BY, других методов не существует, другие это рулетка.

Не пойму с запросом Найти похожие ветки