DECLARE
V_IMPORT_DATE DATE;
V_BUSI_DATE DATE;
OUT_RET NUMBER; -- 0-成功, 其他失败
OUT_RET_MSG VARCHAR2(1000);
PARAM PROC_PARAM_TYPE;
V_MONTH_BEGIN DATE;
V_MONTH_END DATE;
BEGIN
/*
按月循环每天
拉链表数据需根据业务发生日期mis_date按天跑批生成数据
*/
V_MONTH_END := DATE'2018-04-30';
V_MONTH_BEGIN := TRUNC(V_MONTH_END,'MM');
V_BUSI_DATE := V_MONTH_BEGIN;
WHILE(V_BUSI_DATE <= V_MONTH_END)
LOOP
PARAM:=PROC_PARAM_TYPE(0,'',V_BUSI_DATE,NULL,'');
PKG_ODS_IF_ZIPLINK_TABLE.PROC_IF_ZIP_DRI_RCP_EYA_D(PARAM);
--DBMS_OUTPUT.PUT_LINE(V_BUSI_DATE);
V_BUSI_DATE := V_BUSI_DATE + 1;
END LOOP;
END;
/
DECLARE V_IMPORT_DATE DATE; V_BUSI_DATE DATE; OUT_RET NUMBER; -- 0-成功, 其他失败 OUT_RET_MSG VARCHAR2(1000); PARAM PROC_PARAM_TYPE; V_MONTH_BEGIN DATE; V_MONTH_END DATE;BEGIN /* 按月循环每天 拉链表数据需根据业务发生日期mis_date按天跑批生成数据 */ V_MONTH_END := DATE'2018-04-30'; V_MONTH_BEGIN := TRUNC(V_MONTH_END,'MM'); V_BUSI_DATE := V_MONTH_BEGIN; WHILE(V_BUSI_DATE <= V_MONTH_END) LOOP PARAM:=PROC_PARAM_TYPE(0,'',V_BUSI_DATE,NULL,''); PKG_ODS_IF_ZIPLINK_TABLE.PROC_IF_ZIP_DRI_RCP_EYA_D(PARAM); --DBMS_OUTPUT.PUT_LINE(V_BUSI_DATE); V_BUSI_DATE := V_BUSI_DATE + 1; END LOOP; END;/