Cформировать SQL запрос

[Al Prad]

Добрый день!
Помогите, плиз, составить SQL-запрос.

В базе данных есть поля: a, b, c, d, e

В зависимости от переменной а надо вычислить в каждой записи:

если а="Вася", то var1 = a*b
если а="Петя", то var2 = a*c
если а="Зина" или "Кондолиза" , то var3 = a*d

и по всей базе вычислить sum(var1)/sum(e); sum(var2)/sum(e); sum(var3)/sum(e)

Спасибо.

[iGrok]

А в чем трудность?
К примеру, var'ы получить подзапросами вроде:
select (a * d) as var3 from table where a = 'Зина' or a = 'Кондолиза'

А дальше запросом просуммировать поля...

[alibek]

Лучше использовать не OR, а IN.

[iGrok]

Да, пожалуй )

[Al Prad]

Мешает то, что я уже натолкнулся на то, что не могу заставить работать подзапросы в vb6 вот здесь http://bbs.vbstreets.ru/viewtopic.php?p ... 99545052ab

[iGrok]

Ок. Тогда не подзапросом.

Код: Выделить всё

SELECT SUM(a*b)/SUM(e) as var1, 0 as var2, 0 as var3 FROM table WHERE a = 'Вася'
UNION
SELECT 0 as var1, SUM(a*c)/SUM(e) as var2, 0 as var3 FROM table WHERE a = 'Петя'
UNION
SELECT 0 as var1, 0 as var2, SUM(a*d)/SUM(e) as var3 FROM table WHERE a IN ('Зина','Кондолиза')

[HandKot]

В базе данных есть поля: a, b, c, d, e

В зависимости от переменной а надо вычислить в каждой записи:

если а="Вася", то var1 = a*b
если а="Петя", то var2 = a*c
если а="Зина" или "Кондолиза" , то var3 = a*d

и по всей базе вычислить sum(var1)/sum(e); sum(var2)/sum(e); sum(var3)/sum(e)

Код: Выделить всё

select
  sum(case when a in ('Вася') then a*b else 0 end)/ sum(e) as var1,
  sum(case when a in ('Петя') then a*c else 0 end)/ sum(e) as var2,
  sum(case when a in ('Зина', 'Кондолиза') then a*d else 0 end)/ sum(e) as var3
from
  table

PS: вопрос в следующем, если у Вас поле "а" текстовое (либо 'Вася', либо 'Петя' и т.д), то как Вы собираетесь его умножать a*b ?

[iGrok]

Хм.. Это даже получше будет, т.к. у меня лишних нулей много получается )

Вот только Ado скорей всего пошлет на case when...
Т.е. будет:
sum(iif(a in ('Вася'), a * b, 0) / sum(e) as var1 ...

Правда не на 100% уверен в срабатывании конструкции
iif( a in (...

[alibek]

Если пошлет, то не ADO, а конкретный провайдер.
Приведенный синтаксис будет работать для MSSQL. Для Access надо заменить на iif.

[Al Prad]

PS: вопрос в следующем, если у Вас поле "а" текстовое (либо 'Вася', либо 'Петя' и т.д), то как Вы собираетесь его умножать a*b ?

Очепфятка. Конечно, буду перемножать числовые поля.
Коды запросов еще не пробовал - загружен на других объектах

[Al Prad]

Пробую варианты. Проверку текстового поля заменил на числовое, чтобы не нарваться на грабли с кавычками, апострофами, двойными кавычками для переменной типа string. И имена полей, извините. приведу реальные.

1 вариант:
sSQL = "SELECT "
sSQL = sSQL & " sum(iif( S1>0 then PeredanoNaProizv*S1, 0 ))/ sum(PeredanoNaProizv) as var1 "
sSQL = sSQL & " FROM LabDataSun"

2 вариант
sSQL = "SELECT "
sSQL = sSQL & " sum(case when S1>0 then PeredanoNaProizv * S1 else 0 end ))/ sum(PeredanoNaProizv) as var1 "
sSQL = sSQL & " FROM LabDataSun"

Оба варианта дают run-time error '3075': syntax error (missing operator) in query expression 'sum... и т.д.'

[Al Prad]

Ок. Тогда не подзапросом.

Код: Выделить всё

SELECT SUM(a*b)/SUM(e) as var1, 0 as var2, 0 as var3 FROM table WHERE a = 'Вася'
UNION
SELECT 0 as var1, SUM(a*c)/SUM(e) as var2, 0 as var3 FROM table WHERE a = 'Петя'
UNION
SELECT 0 as var1, 0 as var2, SUM(a*d)/SUM(e) as var3 FROM table WHERE a IN ('Зина','Кондолиза')

Такая конструкция ошибки не выдает, но и правильно не работает. Последний select вычисляет var3, но обнуляет var1 и var2

[iGrok]

Чего??? Куда обнуляет?

У тебя по этому запросу должна выдаваться таблица в 3 строки и 3 столбца, где значения будут по диагонали.

[HandKot]

1 вариант:
sSQL = "SELECT "
sSQL = sSQL & " sum(iif( S1>0 then PeredanoNaProizv*S1, 0 ))/ sum(PeredanoNaProizv) as var1 "
sSQL = sSQL & " FROM LabDataSun"

1 вариант:

Код: Выделить всё

sSQL = "SELECT "
sSQL = sSQL & " sum(iif( S1>0, PeredanoNaProizv*S1, 0 ))/ sum(PeredanoNaProizv) as var1 "
sSQL = sSQL & " FROM LabDataSun"

а так?

[Al Prad]

Чего??? Куда обнуляет?

У тебя по этому запросу должна выдаваться таблица в 3 строки и 3 столбца, где значения будут по диагонали.

А, пардон. Это я посмотрел только в последнюю строку.

[Al Prad]

1 вариант:
sSQL = "SELECT "
sSQL = sSQL & " sum(iif( S1>0 then PeredanoNaProizv*S1, 0 ))/ sum(PeredanoNaProizv) as var1 "
sSQL = sSQL & " FROM LabDataSun"

1 вариант:

Код: Выделить всё

sSQL = "SELECT "
sSQL = sSQL & " sum(iif( S1>0, PeredanoNaProizv*S1, 0 ))/ sum(PeredanoNaProizv) as var1 "
sSQL = sSQL & " FROM LabDataSun"

а так?

Ёпрст! Как туда затесалась эта then?!

Всё работает, большое всем спасибо!