SQL Server и Delphi

@tankwar · Регистрация: 12.04.2015

Студворк — интернет-сервис помощи студентам

Здравствуйте, помогите пожалуйста, я уже не знаю что с этим полем делать, надежда только на вас
Я использую Adoquery и datasource
SQL таблица Должность : Поля Дате, должность, оклад, премия, уральский коэффициент, процент
Задача: мне от оклада и процента через edit1 нужно вычислить премию
Причина ошибки: не выводить данные о премии( поле пустое)
Пытался использовать select Дате, должность, оклад, премия, уральский коэффициент, процент sum(oklad*procent)as premia from dolgnosti group by Дате, должность, оклад, премия, уральский коэффициент, процент
adoquery работает, а запрос почему не работает, но при этом ни каких ошибок не выводит.
этот же код я пытался использовать в самой базе SQL server там всё замечательно работает, всё суммируется
Потом я пытался использовать вот этот код:

Delphi
1
2
3
4
5
6
7
8
9
10
procedure TTF_Tarif.BitBtn1Click(Sender: TObject);
begin
dm_zarplata.q_tarif.active:=false;
dm_zarplata.q_tarif.Close;
dm_zarplata.q_tarif.SQL.Clear;
dm_zarplata.q_tarif.SQL.Add ('select* from dolgnosti UPDATE dolgnosti SET premia=Oklad*procent');
dm_zarplata.q_tarif.ExecSQL;
dm_zarplata.q_tarif.active:=true;
end;
end.

Тот же случай, не работает поле , но при этом ошибок не выводит
Вот скриншот программы и связи

@maybeTM · 13.05.2016, 21:49

tankwar, ExcecSql нужен для запросов на модификацию, Для запросов на выборку надо использоваться open;
Не надо использовать свойство active, так как потом вы всё равно вызываете метод close;

@tankwar · 13.05.2016, 21:54 **[ТС]**

maybeTM Здравствуйте,я уже пытался использовать Open ничего не вышло, тот же случай отстаётся

@maybeTM · 13.05.2016, 21:56

tankwar,
А разве синтаксис sql запроса верный?

SQL
1
2
3
UPDATE TABLE_NAME
SET column1=value1,column2=value2,...
WHERE some_column=some_value

http://www.w3schools.com/sql/sql_update.asp

@krapotkin · 13.05.2016, 22:02

вот же нормальный SQL

SQL
1
SELECT Дате, должность, оклад, премия, уральский коэффициент, процент SUM(oklad*procent)AS premia FROM dolgnosti GROUP BY Дате, должность, оклад, премия, уральский коэффициент, процент

что за SELECTOPDATE в коде вашем?

вот только перед Sum запятая должна быть

если нужно чтобы процент был параметром, заменить слово процент на

SQL
1
:p1

и перед
query.open;
делать
query.ParamByName('p1').AsFloat := SomeValue;

@tankwar · 13.05.2016, 22:19 **[ТС]**

maybeTM Спасибо большое я сейчас попробую

Добавлено через 10 минут
krapotkin, selectopkrapotkin, Прости , а что означает AsFloat := SomeValue ? я просто использую adoquery

@krapotkin · 13.05.2016, 22:30

там у ADO как-то вроде по-другому, не как у нормальных
поиском поищите
типа
query.parameters.paramByName('aaa').Data type:=ftFloat;
query.parameters.paramByName('aaa').Valu e:=14.5;

Добавлено через 44 секунды
someValue переводится какое-то значение
мне все рвано, что там будет стоять
это пример

@tankwar · 14.05.2016, 21:24 **[ТС]**

krapotkin, Здравствуйте, у меня даже проблема остается , поле пустое

@krapotkin · 14.05.2016, 21:59

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

поле пустое

tankwar, у меня тоже проблема - я не вижу ваш код
и данные тоже не вижу
соответственно не над чем подумать даже

Новые блоги и статьи Все статьи Все блоги /
Фото: Daniel Greenwood kumehtar 13.11.2025	Расскажи мне о Мире, бродяга kumehtar 12.11.2025 — Расскажи мне о Мире, бродяга, Ты же видел моря и метели. Как сменялись короны и стяги, Как эпохи стрелою летели. - Этот мир — это крылья и горы, Снег и пламя, любовь и тревоги, И бескрайние. . .	PowerShell Snippets iNNOKENTIY21 11.11.2025 Модуль PowerShell 5. 1+ : Snippets. psm1 У меня модуль расположен в пользовательской папке модулей, по умолчанию: \Documents\WindowsPowerShell\Modules\Snippets\ А в самом низу файла-профиля. . .	PowerShell и онлайн сервисы. Валюта (floatrates.com руб.) iNNOKENTIY21 11.11.2025 PowerShell функция floatrates-rub Примеры вызова: # Указанная валюта 'EUR' floatrates-rub -Code 'EUR' # Список имеющихся кодов валют floatrates-rub -Available function floatrates-rub {	PowerShell и онлайн сервисы. Погода (RP5.ru) iNNOKENTIY21 11.11.2025 PowerShell функция Get-WeatherRP5rss для получения погоды с сервиса RP5 Примеры вызова Get-WeatherRP5rss с указанием id 5484 — Москва (восток, Измайлово) и переносом строки:. . .
PowerShell и онлайн сервисы. Погода (wttr) iNNOKENTIY21 11.11.2025 PowerShell Функция для получения погоды с сервиса wttr Примеры вызова: Погода в городе Омск с прогнозом на день, можно изменить прогноз на более дней, для этого надо поменять запрос:. . .	PowerShell и онлайн сервисы. Валюта (ЦБР) iNNOKENTIY21 11.11.2025 # Получение курса валют function cbr (] $Valutes = @('USD', 'EUR', 'CNY')) { $url = 'https:/ / www. cbr-xml-daily. ru/ daily_json. js' $data = Invoke-RestMethod -Uri $url $esc = 27 . . .	И решил я переделать этот ноут в машину для распределенных вычислений Programma_Boinc 09.11.2025 И решил я переделать этот ноут в машину для распределенных вычислений Всем привет. А вот мой компьютер, переделанный из ноутбука. Был у меня ноут асус 2011 года. Со временем корпус превратился. . .	Мысли в слух kumehtar 07.11.2025 Заметил среди людей, что по-настоящему верная дружба бывает между теми, с кем нечего делить.	Новая зверюга volvo 07.11.2025 Подарок на Хеллоуин, и теперь у нас кроме Tuxedo Cat есть еще и щенок далматинца: Хочу еще Симбу взять, очень нравится. . .

@maybeTM 16 / 15 / 4 Регистрация: 30.10.2014 Сообщений: 175
	13.05.2016, 21:49
	tankwar, ExcecSql нужен для запросов на модификацию, Для запросов на выборку надо использоваться open; Не надо использовать свойство active, так как потом вы всё равно вызываете метод close; 0

@tankwar 0 / 0 / 0 Регистрация: 12.04.2015 Сообщений: 19
	13.05.2016, 21:54 [ТС]
	maybeTM Здравствуйте,я уже пытался использовать Open ничего не вышло, тот же случай отстаётся 0

@tankwar 0 / 0 / 0 Регистрация: 12.04.2015 Сообщений: 19
	13.05.2016, 22:19 [ТС]
	maybeTM Спасибо большое я сейчас попробую Добавлено через 10 минут krapotkin, selectopkrapotkin, Прости , а что означает AsFloat := SomeValue ? я просто использую adoquery 0

@krapotkin 6842 / 4670 / 1462 Регистрация: 14.04.2014 Сообщений: 20,645 Записей в блоге: 20
	13.05.2016, 22:30
	там у ADO как-то вроде по-другому, не как у нормальных поиском поищите типа query.parameters.paramByName('aaa').Data type:=ftFloat; query.parameters.paramByName('aaa').Valu e:=14.5; Добавлено через 44 секунды someValue переводится какое-то значение мне все рвано, что там будет стоять это пример 0

@tankwar 0 / 0 / 0 Регистрация: 12.04.2015 Сообщений: 19
	14.05.2016, 21:24 [ТС]
	krapotkin, Здравствуйте, у меня даже проблема остается , поле пустое 0

Опции темы

SQL Server и Delphi

Решение