день добрый
используется delphi 7, firebird 2.0, Interbase компонента TIBQuery
если использовать у IBQuery свойство SQL и вставлять приведенный ниже запрос, то по IBQuery.Open он отрабатывает корректно.
Нужно переписать его через SQL.Add т.к. в зависимости от выбранного чекбокса к запросу будут добавляться дополнительные параметры
подскажите как правильно написать запрос
Код:
ZserachQ.Close;
ZserachQ.SQL.Clear;
ZserachQ.SQL.Add('select REG_UID, R_PP, R_DATE, R_TIME, MASS1, Z_NAME,');
ZserachQ.SQL.Add('PLACE_NAME,OTDEL_NAME, PROD_NAME,EXTRA_NAME, EXRTA_S');
ZserachQ.SQL.Add('MASS1 || " " || (select ED_NAME from ED_TYPE where ED1=ED_UID)) as abc ');
ZserachQ.SQL.Add('from REG_ZAYAV, ZAYAV, HARVEST_PLACE, OTDEL, PRODUCT_NAME, EXTRA_SEED, ED_TYPE');
ZserachQ.SQL.Add('where Z_UID=R_EXT_2_ZAYV and HARVESTER_UID=EXT_2_OTRG');
ZserachQ.SQL.Add(' and OTDEL_UID=R_EXT_2_OTDEL and PRODUCT_UID=R_EXT_P1 and EXRTA_S=EXTRA_UID and ED1=ED_UID' );
получаемая ошибка
Token unknown line 3, column 7 ||
замена || на #124#124
ZserachQ.SQL.Add('MASS1' + #124#124 + ' (select ED_NAME from ED_TYPE where ED1=ED_UID)) as abc ');
дает тот же результат