ITPub博客

首页 > Linux操作系统 > Linux操作系统 > 显示sql语句的redo信息

显示sql语句的redo信息

原创 Linux操作系统 作者:NinGoo 时间:2019-02-21 08:57:06 0 删除 编辑

出处:http://www.itpub.net/252974.html


create or replace procedure print_redo( v_sql varchar2, v_commit boolean default true)
as
v_redo1 number(17,2);
v_redo2 number(17,2);
v_redos number(17,2);
v_redok number(17,2);
begin
/*初始*/
select m.value into v_redo1
from v$mystat m,v$statname s
where m.statistic#=s.statistic# and s.name like '%redo size%';
/*exec sql*/
execute immediate v_sql;
/*结束*/
select m.value into v_redo2
from v$mystat m,v$statname s
where m.statistic#=s.statistic# and s.name like '%redo size%';
/*计算*/
v_redos := v_redo2 - v_redo1;
v_redok := v_redos/1024;
dbms_output.put_line(' trans redo calc ');
dbms_output.put_line('-------------------------------------------');
dbms_output.put_line('my redo size: '||to_char(v_redos)||' (Bytes)');
dbms_output.put_line('my redo size: '||to_char(v_redok)||' (Kbytes)');
dbms_output.put_line('-------------------------------------------');
/*提交否*/
if v_commit = true then
commit;
else
rollback;
end if;
end;

/*demo*/
exec print_redo('delete from a_test',false);

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/193161/viewspace-50167/,如需转载,请注明出处,否则将追究法律责任。

请登录后发表评论 登录
全部评论

注册时间:2004-12-07

  • 博文量
    200
  • 访问量
    133029