declare
err_num NUMBER;
err_msg VARCHAR2(100);
Type Search_Result Is Ref Cursor;
m_cur Search_Result;
begin
dbms_output.put_line('begin procedure...');
dbms_output.put_line('-------------------------------------------');
package.procedure(NULL,'1','G313',NULL,'2017-03-01','2017-03-05',NULL,m_cur);
dbms_output.put_line('-------------------------------------------');
dbms_output.put_line('end procedure...');
EXCEPTION
WHEN OTHERS THEN
err_num := SQLCODE;
err_msg := SUBSTR(SQLERRM, 1, 100);
dbms_output.put_line(err_num || '---' || err_msg);
end;
oracle通过dbms_output方式显示存储过程sql
最新推荐文章于 2024-03-02 20:44:55 发布