Код: Выделить всё
CREATE PROCEDURE MIH_PRC_ROUGE (
b date,
e date)
returns (
cav varchar(30),
prv double precision,
qtv double precision)
as
declare variable qt_sum double precision;
begin
/* Procedure Text */
delete from mih_rouge;
delete from mih_tmp_rouge;
insert into mih_tmp_rouge
select cardarticul,pricerub,quantity from mih_tmp_cash where sell_date between :b and :e;
/*select cardarticul,pricerub,quantity from cashsail where sell_date between :b and :e into mih_tmp_rouge;*/
for select * from mih_tmp_rouge into :cav, :prv, :qtv
do
begin
qt_sum=0;
select sum(quantity) from mih_tmp_cash where (cardarticul = :cav) and (pricerub = :prv) into :qt_sum;
delete from mih_tmp_rouge where cardarticul=:cav and pricerub=:prv;
insert into mih_rouge (cardarticul,pricerub,quantity) values(:cav,:prv,:qt_sum);
end
end
Заранее благодарю за помощь.