第一个过程,这个过程是用来查看表空间中已经使用的块(字节),未使用的块(字节)
create or replace procedure show_space(
p_segname in varchar2,/
第二个过程,这个过程是用来查看assm中各种块的使用量的统计:
create or replace procedure show_space_assm(
p_segname in varchar2,
p_owner in varchar2 default user,
p_type in varchar2 default 'TABLE')
as
l_fs1_bytes number;
l_fs2_bytes number;
l_fs3_bytes number;
l_fs4_bytes number;
l_fs1_blocks number;
l_fs2_blocks number;
l_fs3_blocks number;
l_fs4_blocks number;
l_full_bytes number;
l_full_blocks number;
l_unformatted_bytes number;
l_unformatted_blocks number;
procedure p(p_label in varchar2, p_num in number)
is
begin
dbms_output.put_line(rpad(p_label,40,'.') || p_num);
end;
begin
dbms_space.space_usage (
segment_owner =>p_owner,
segment_name =>p_segname,
segment_type =>p_type,
fs1_bytes =>l_fs1_bytes,
fs1_blocks =>l_fs1_blocks,
fs2_bytes =>l_fs2_bytes,
fs2_blocks =>l_fs2_blocks,
fs3_bytes =>l_fs3_bytes,
fs3_blocks =>l_fs3_blocks,
fs4_bytes =>l_fs4_bytes,
fs4_blocks =>l_fs4_blocks,
full_bytes =>l_full_bytes,
full_blocks =>l_full_blocks,
unformatted_blocks =>l_unformatted_blocks,
unformatted_bytes =>l_unformatted_bytes);
p('free space 0-25% blocks:' , l_fs1_blocks);
p('free space 25-50% blocks:' , l_fs2_blocks);
p('free space 50-75% blocks:' , l_fs3_blocks);
p('free space 75-100% blocks:' , l_fs4_blocks);
p('Full Blocks:' , l_full_blocks);
p('Unformatted Blocks:' , l_unformatted_blocks);
end;
/