新手發帖,很多方面都是剛入門,有錯誤的地方請大家見諒,歡迎批評指正
????create or replace package aa_pkg_monitor_business_sql is
? procedure pro_monitor_drop_policy(object_schema in varchar2);
? procedure pro_monitor_add_policy(object_schema in varchar2);
? procedure pro_monitor_drop_main;
? procedure pro_monitor_add_main;
????end;
/
create or replace package body aa_pkg_monitor_business_sql is
? /*
? truncate table? sys.fga_log$ ;
? select t.* from dba_fga_audit_trail t;
? */
? procedure pro_monitor_drop_policy(object_schema in varchar2) is
?
??? cursor cur_del is
????? select owner, table_name from dba_tables a where owner = object_schema;
?
? begin
??? for v_cur in cur_del
??? loop
????? begin
??????? dbms_fga.drop_policy(object_schema => v_cur.owner, ---
???????????????????????????? object_name => v_cur.table_name, ---
???????????????????????????? policy_name => v_cur.table_name);
????? exception
??????? when others then
????????? null;
????? end;
??? end loop;
? end pro_monitor_drop_policy;
? --------------------------------------------------------------------
? --------------------------------------------------------------------
? procedure pro_monitor_add_policy(object_schema in varchar2) is
?
??? cursor cur_del is
????? select owner, table_name
????? from?? dba_tables a
????? where? owner = object_schema and
???????????? a.table_name not like 'SRP%';
?
? begin
??? for v_cur in cur_del
??? loop
????? begin
??????? dbms_fga.add_policy(object_schema => v_cur.owner, --
??????????????????????????? object_name => v_cur.table_name, --
??????????????????????????? policy_name => v_cur.table_name,
??????????????????????????? statement_types => 'SELECT,UPDATE,DELETE,INSERT',
??????????????????????????? enable => true);
?????
????? exception
??????? when others then
????????? null;
????? end;
??? end loop;
? end pro_monitor_add_policy;
? --------------------------------------------------------------------
? --------------------------------------------------------------------
? procedure pro_monitor_drop_main is
? begin
??? pro_monitor_drop_policy('CCARE');
??? pro_monitor_drop_policy('CRMPUB');
??? pro_monitor_drop_policy('INVENTORY');
??? pro_monitor_drop_policy('ISAP');
??? pro_monitor_drop_policy('OSMS');
??? pro_monitor_drop_policy('ECARE');
??? pro_monitor_drop_policy('CHANNEL');
? end pro_monitor_drop_main;
? --------------------------------------------------------------------
? --------------------------------------------------------------------
? --------------------------------------------------------------------
? --------------------------------------------------------------------
? procedure pro_monitor_add_main is
? begin
?
??? pro_monitor_drop_main;
?
??? pro_monitor_add_policy('CCARE');
?? -- pro_monitor_add_policy('CRMPUB');
??? pro_monitor_add_policy('INVENTORY');
??? --pro_monitor_add_policy('ISAP');
??? ---pro_monitor_add_policy('OSMS');
?
? end pro_monitor_add_main;
????end;
/
文章結束給大家分享下程序員的一些笑話語錄: 聯想——對內高價,補貼對外傾銷的偉大“民族”企業。
更多文章、技術交流、商務合作、聯系博主
微信掃碼或搜索:z360901061

微信掃一掃加我為好友
QQ號聯系: 360901061
您的支持是博主寫作最大的動力,如果您喜歡我的文章,感覺我的文章對您有幫助,請用微信掃描下面二維碼支持博主2元、5元、10元、20元等您想捐的金額吧,狠狠點擊下面給點支持吧,站長非常感激您!手機微信長按不能支付解決辦法:請將微信支付二維碼保存到相冊,切換到微信,然后點擊微信右上角掃一掃功能,選擇支付二維碼完成支付。
【本文對您有幫助就好】元
