- 论坛徽章:
- 0
|
create or replace procedure P_FM_D_ALL
as
--IN_MONTH_ID NUMBER;-- 装载时间
in_day_id number;--开始装载日期
end_day_id number;--结束装载日期
v_table_id number(10);--起始装载表编号(参照表fm_table_index,fm_table_load_log)
get_table_name varchar(40);--起始装载表名
ON_RTNCODE NUMBER;
ON_RTNMSG VARCHAR2(200);
CURSOR get_table_id IS
SELECT table_id FROM fm_table_index;
BEGIN
ON_RTNCODE := NULL;
ON_RTNMSG := NULL;
OPEN get_table_id;
LOOP
FETCH get_table_id INTO v_table_id;
EXIT WHEN get_table_id%NOTFOUND;
select 'HQSCHEMA.P_LOAD_'||table_name into get_table_name from fm_table_index where table_id = v_table_id;--获取存储过程名
select max(load_day_id)+1 into in_day_id from fm_table_load_log where table_id = v_table_id;
select to_char(sysdate,'yyyymmdd') into end_day_id from dual;
if end_day_id-in_day_id >;0
then
***********************************
execute immediate 'get_table_name(IN_MONTH_ID,ON_RTNCODE, ON_RTNMSG)';
***********************************
end if;
insert into fm_table_load_log(table_id,load_day_id,datestamp)
values( v_table_id,in_day_id,sysdate);
COMMIT;
close get_table_id;
end loop;
END;
--------------------------- |
|