create or replace procedure errormap
is
begin
--八大異常之一 掛牌價為0或者空
delete T where type='1';
insert into T(NAME,VALUE1,VALUE2,type)
select NAME,VALUE1,VALUE2,type from T2

COMMIT;
end;

declare
job number;
BEGIN
DBMS_JOB.SUBMIT(
JOB => job, /*自動生成JOB_ID*/
WHAT => 'ERRORMAP;', /*需要執(zhí)行的過程或SQL語句*/
NEXT_DATE => sysdate,
INTERVAL => 'TRUNC(sysdate+1)+1/24' /*每天01點*/
);
COMMIT;
DBMS_JOB.RUN(job);
end;