Как прередать параметры оператору SQL "IN"

[tarakan1983]

Есть запрос
SELECT * FROM DOC WHERE DOC.ID NOT IN (:ID)
Есть компонент FibPlus “TpFibDataset”
Делаю так :

S := ‘1,2,3,4’
with TpFibDataset1 do
begin
  Active := False;
  SQLs.SelectSQL.Clear;
  SQLs.SelectSQL.Add(’ SELECT * FROM DOC WHERE DOC.ID NOT IN (:ID)’); 
  ParamByName('ID').Asstring := S;
  Active := True;
end;

При Active := True ругается на ошибку конвертации данных
Подскажите как правильно передать параметры в «IN».
Спасибо.

[Stilet]

S := QuotedStr('1,2,3,4')

Не?

[Аватар]

QuotedStr не нужен. Да и вообще съест ли

ParamByName('ID').Asstring := '1,2,3,4';

Я бы просто так сделал

SQLs.SelectSQL.Add(Format(’SELECT * FROM DOC WHERE ID NOT IN (%s)’,[s]));

[tarakan1983]

Сообщение от Stilet

S := QuotedStr('1,2,3,4')

Не?

Не хавает.

SQLs.SelectSQL.Add(Format(’SELECT * FROM DOC WHERE ID NOT IN (%s)’,[s]));

Я написал простой пример, у меня запрос большой.
Не хочется его в коде прописывать, потому что для данной таблицы может быть обновление, а я забываю что запрос прописан в коде и пол дня потом долбаюсь над ошибкой, пока не вспомню, что запрос в коде.
Если бы хотел прописать все в коде, то и вопроса бы не было как передать параметром.

[Toxa]

храни запрос отдельно, а перед открытием подменяй в датасете
можно даже на beforeopen