CURSOR acc_c IS /* 定义游标,从表中选出记录 */
select ……
from ……
where
/*原语句 a.DATE=732949 */
to_date(1721425+a.DATE,’J’)= to_date(ParaTime,’YYYY-MM-DD’) and/* 将时间参数赋给选择语句*/
……
acc_r acc_c%ROWTYPE; /* 变量acc_r与acc_c类型相同*/
AmountToMove NUMBER;
BEGIN
OPEN acc_c;
LOOP
FETCH acc_c INTO acc_r;
EXIT WHEN acc_c%NOTFOUND; /*记录不存在时退出*/
begin
insert into …… /*记录存在时插入*/
values ……
EXCEPTION
when others then null;
end;
END LOOP ;
commit;
CLOSE acc_c ; /*关闭指针*/
/*修改表*/
update ……(
select …… from(
select ……
from ……
where
……
/*原语句 a.DATE=732949 */
to_date(1721425+a.DATE,’J’)= to_date(ParaTime,’YYYY-MM-DD’) and/*将时间参数赋给选择语句*/
…… where ……
where EndDate=to_date(ParaTime,’YYYY-MM-DD’);
/*原语句 where to_number(to_char(EndDate,’J’))=732949+1721425;*/
commit;
END;
责任编辑:虫虫