DECLARE
O_CODE number(10);
O_MSG varchar2(2000);
V_MONTH varchar2(6);
V_INFO TD_CHL_PARAM_SOURCE%ROWTYPE;
CURSOR my_cursor IS
SELECT * FROM TD_CHL_PARAM_SOURCE t where t.EPARCHYS like '%0769%'
and t.IMPLEMENT like '%%@DBLINK_HCDRDB1%';
begin
SELECT to_char(add_months(sysdate,-1),'yyyymm') into V_MONTH FROM dual;
OPEN my_cursor;
LOOP
FETCH my_cursor INTO V_INFO;
DBMS_OUTPUT.put_line(V_INFO.CODE||' ,'||V_INFO.RULE_TYPES);
EXIT WHEN my_cursor %NOTFOUND;
/*pkg_param_tools.LOAD_SPECIAL_PARAM(V_INFO.CODE,'0769',V_INFO.RULE_TYPES,V_MONTH,'',O_CODE , O_MSG ) ;*/
END LOOP;
CLOSE my_cursor;
end;
-----------
DECLARE
O_CODE number(10);
O_MSG varchar2(2000);
V_MONTH varchar2(6);
V_INFO TD_CHL_PARAM_SOURCE%ROWTYPE;
CURSOR my_cursor IS
SELECT * FROM TD_CHL_PARAM_SOURCE t where t.EPARCHYS like '%0769%'
and t.IMPLEMENT like '%%@DBLINK_HCDRDB1%';
begin
SELECT to_char(add_months(sysdate,-1),'yyyymm') into V_MONTH FROM dual;
FOR V_INFO IN my_cursor LOOP
DBMS_OUTPUT.put_line(V_INFO.CODE||' ,'||V_INFO.RULE_TYPES||' ,'||V_MONTH);
pkg_param_tools.LOAD_SPECIAL_PARAM(V_INFO.CODE,'0769',V_INFO.RULE_TYPES,V_MONTH,'',O_CODE , O_MSG ) ;
END LOOP;
end;