Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите написать запрос без вложенного подзапроса. [D6, MSSQL]


ioSan ©   (2002-12-05 01:00:00) 

Час добрый, Мастера!

D6+ADO(Stored procedure)+MSSQL2000

CREATE procedure AP_KSP_QualifierGroup
@CurrentDate int,
@KodClass varchar(2)
as
SELECT a.ID_AUTO,
a.[Код услуги],
a.[Наименование услуги],

(a.[Код услуги]+" "+
a.[Наименование услуги]+" ("+
(SELECT LTRIM( STR( COUNT(b.ID_AUTO) ) )
FROM A_KSP_QualifierTypes b
WHERE b.[Код услуги]=a.[Код услуги])
+")") as [Услуга]


FROM A_KSP_QualifierGroup a
WHERE a.[Код класса]=@KodClass
ORDER BY a.[Код услуги]

Возвращает:
-----------
12345
"001"
"Наем жилья"
"001 Наем жилья (4)"
-----------
12345
"002"
"Техническое обслуживание"
"002 Техническое обслуживание (26)"
-----------

Помогите написать запрос без вложенногоподзапроса.
Благодарю, всех кто откликнется.


ЮЮ   (2002-12-05 04:03:00) [1]

select a.[Код услуги]+" "+ a.[Наименование услуги]+" ("+
LTRIM( STR( COUNT(b.ID_AUTO) ) ) +")" as [Услуга]
from
A_KSP_QualifierGroup a
left join A_KSP_QualifierTypes b
on b.[Код услуги]=a.[Код услуги]
group by a.[Код услуги],a.[Наименование услуги], b.ID_AUTO
ORDER BY a.[Код услуги]


Наверх

Титульная страница Поиск, карта сайта Написать письмо