Форум: "Базы";
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];
Внизвопрос по запросу Найти похожие ветки
← →
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")
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.004 c