Форум: "Базы";
Поиск по всему сайту: 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.72 MB
Время: 0.014 c
1-42490           Dodge                 2001-12-25 02:33  2002.01.14  
NMHTTP и MEMO


4-42605           Марат                 2001-11-13 20:26  2002.01.14  
Principal = Everyone


1-42408           $Hic0                 2001-12-26 20:11  2002.01.14  
TMemo


3-42340           Galina                2001-12-10 19:26  2002.01.14  
Глючит QReport при работе с принтером HP DESCJET 930C


1-42427           Катерина              2001-12-24 08:15  2002.01.14  
помогите с отчетом