在Oracle数据库中按用户名重建索引的办法-开辟技术[Oracle防范]

 SET ECHO OFF;

SET FEEDBACK OFF;

SET VERIFY OFF;

SET PAGESIZE 0;

SET TERMOUT ON;

SET HEADING OFF;

ACCEPT username CHAR PROMPT 'Enter the index username: ';

spool /oracle/rebuild_&username.sql;

SELECT

'REM +-----------------------------------------------+' || chr(10) ||

'REM | INDEX NAME : ' || owner || '.' || segment_name

|| lpad('|', 33 - (length(owner) + length(segment_name)) )

|| chr(10) ||

'REM | BYTES : ' || bytes

|| lpad ('|', 34-(length(bytes)) ) || chr(10) ||

'REM | EXTENTS : ' || extents

|| lpad ('|', 34-(length(extents)) ) || chr(10) ||

'REM +-----------------------------------------------+' || chr(10) ||

'ALTER INDEX ' || owner || '.' || segment_name || chr(10) ||

'REBUILD ' || chr(10) ||

'TABLESPACE ' || tablespace_name || chr(10) ||

'STORAGE ( ' || chr(10) ||

' INITIAL ' || initial_extent || chr(10) ||

' NEXT ' || next_extent || chr(10) ||

' MINEXTENTS ' || min_extents || chr(10) ||

' MAXEXTENTS ' || max_extents || chr(10) ||

' PCTINCREASE ' || pct_increase || chr(10) ||

');' || chr(10) || chr(10)

FROM dba_segments

WHERE segment_type = 'INDEX'

AND owner='&username'

ORDER BY owner, bytes DESC;

spool off;

SQL>ANALYZE INDEX &index_name VALIDATE STRUCTURE;

col name heading 'Index Name' format a30

col del_lf_rows heading 'Deleted|Leaf Rows' format 99999999

col lf_rows_used heading 'Used|Leaf Rows' format 99999999

col ratio heading '% Deleted|Leaf Rows' format 999.99999

SELECT name,

del_lf_rows,

lf_rows - del_lf_rows lf_rows_used,

to_char(del_lf_rows / (lf_rows)*100,'999.99999') ratio

FROM index_stats where name = upper('&index_name');