Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];




Вниз

вопрос по запросу 


SOFTMASTER   (2001-12-09 19:54) [0]

Всем привет!
Столкнулся с проблемой:
есть у меня база данных, участок, который сейчас рассматривается выглядит следующим образом: Есть таблица, в нее забивается основная информация- дата оформления, номер документа и т.п.
Подчиненная таблица выглядит след. образом: связь по номеру документа, имя исполнителя (код) и сумма услуги.
Есть таблица исполнителей: там код и имя.
Теперь мне нужно получить информацию следующего вида: вывести всех исполнителей и посчитать для каждого сумму услуг за определенный день.Таким образом, WHERE можно использовать, но он выводит только записи , которые работали в этот день, а надо всех, даже пустых . Надо использовать что-то типа JOIN, но как это сделать правильно?
Использовал конструкцию

select Workers.Name,sum(ServItems.Price)
from (Workers left join servitems
on
ServItems.Wname=Workers.Code
left
join Servs
on (Servs.Dat_="05.12.2001"
and Servs.DocNum=ServItems.DocNum))

group by Workers.Name

но не работает отбор по дате, он выдает полную сумму за все время существования.
INNER JOIN тоже используется как WHERE, так что не получается.
Мастера, подскажите как лучше сделать, ПОЖАЛУЙСТА!



evgeg   (2001-12-09 20:28) [1]

А хранимой процедурой не хочешь воспользоваться?
В ней это элементарно делается.



Softmaster   (2001-12-09 20:55) [2]

>evgeg
Как ею воспользоваться?



evgeg   (2001-12-09 21:23) [3]

Надо создать процедуру:

create procedure otchet
(day date)
returns
(Name varchar (30),
Summ double precision)
as
declare variable Code integer;
begin
for select Code, Name from Workers
into :Code, :Name
do
begin
summ = null;
select sum (SI.Price) from ServItems SI, Servs S
where SI.WName = :Code and SI.DocNum = S.DocNum and S.Dat_ = :day
into :summ;
if (summ is null) then summ = 0;
suspend;
end
end


Выбов процедуры:

select * from otchet ("01.11.2001")



Softmaster   (2001-12-10 20:30) [4]

СПАСИБО




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.73 MB
Время: 0.044 c
6-42530           Gallant               2001-10-19 12:56  2002.01.14  
Проблема со локальной сетю


3-42372           TSV                   2001-12-12 12:39  2002.01.14  
Скроллинг мыши в DBGrid - продолжение


7-42579           NazguL                2001-04-14 15:52  2002.01.14  
Как с помощбю WinAPI упровлять громкостью звука


4-42616           Kyd                   2001-11-13 11:18  2002.01.14  
SendMessage(MyHandle, WM_SetText, 0, Integer(TextToSet));


3-42365           csf                   2001-12-10 16:28  2002.01.14  
В Oracle есть dual, а что есть в InterBase e?