Запрос для подсчёта произвдения поля

[Asblue]

Пожалуйста, скажите как написать запрос для поля nalog, чтоб в нём считался налог: поле summa/100*19+summa.
При нажатии кнопки Добавить данные из заполненных полей переносятся в соответствующие поля таблицы и нужно, чтобы сразу подсчитывался и заносился налог.
Очень очень необходимо!!! Буду весьма благодарна
Безимени-1.jpg
Я что-то вот пыталась, но не получается...

Запрос SQL в ADOQuery

SELECT summa, nalog=summa/100*19+summa FROM schetfaktur

или так тоже пробовала:

SELECT summa, summa/100*19+summa AS nalog FROM schetfaktur

Писала процедуру для кнопки:

procedure TForm5.Button1Click(Sender: TObject);
begin
with ADOQuery1 do begin
active:=false;
SQL.Clear;
SQL.Add('SELECT summa, summa/100*19+summa AS nalog FROM schetfaktur');
active:=true;
end;

как-то всё безрезультатно...

[Dimasw]

Я бы рекомендовал поле nalog создать калькулируемым, а рассчитанный в этом калькулируемом поле налог в базу данных вносить по событию afterPost таблицы или вообще сделать отдельной процедурой внесение записи в базу (не навигатором).
Таким образом кнопка Добавить становится лишней (пусть налог автоматически рассчитывается при условии заполнения всех нужных полей).
Если все-таки идти строго по Вашему пути, то надо бы знать какой СУБД пользуетесь, чтобы SQL синтаксис проверить.

[_SERGEYX_]

как-то всё безрезультатно...

Как это безрезультатно? Отлично работает. Только я не вижу оператора Where

SELECT summa, summa/100*19+summa AS nalog FROM schetfaktur where <что-то> = <чему-то>

. Иначе будет выбираться первая строка.
Пример

procedure TForm1.Button2Click(Sender: TObject);
begin
  with ADOQuery1 do
  begin
    Close;
    SQL.Clear;
    SQL.Add('SELECT summa, (summa/100*19)+summa AS nalog FROM schetfaktur where id=1');
    Open;
  end;
  ShowMessage(ADOQuery1.FieldValues['nalog']);
end;

И еще я бы рекомендовал ставить скобки

SELECT summa, (summa/100*19) + summa AS nalog...

Понятно, что сначала умножение и так выполнится, но все равно это делает код более понятным.

[Asblue]

_SERGEYX_, а поле id=1 после слова WHERE - это т.е поле nomer в таблице schetfactur или какое? И что, если вдруг id не = 1?
У меня просто ошбку выводит.

И может быть тут нужен вообще другой запрос - не SELECT, а UPDATE?
У меня просто с этим вообще не получается разобраться.

Спасибо!

[Asblue]

Dimasw , а что значит поле nalog создать калькулируемым? И как налог в базу данных вносить по событию afterPost таблицы или сделать отдельной процедурой внесение записи в базу (не навигатором)?

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

Если все-таки идти строго по Вашему пути, то надо бы знать какой СУБД пользуетесь, чтобы SQL синтаксис проверить.

База на MS SQL Server 2008.

[Dimasw]

На компоненте ADODataSet через правую клавишу мыши добавляем новое поле (например Nalog) и назначаем ему свойство Calculated.

Затем в событии onCalcFields прописываем процедуру расчета налога.

DataSet.FieldByName('Nalog').AsFloat=DataSet.fieldbyname('summa').asfloat/100*19+DataSet.fieldbyname('summa').asfloat