DECLARE
v_tbl_nm VARCHAR2 (32) := '';
--
TYPE oranametable IS TABLE OF VARCHAR2 (32);
indxs oranametable;
tot_indxs PLS_INTEGER;
BEGIN
SELECT index_name
BULK COLLECT INTO indxs
FROM all_indexes a
WHERE a.owner = SYS_CONTEXT ('USERENV', 'CURRENT_SCHEMA')
AND a.table_name = v_tbl_nm;
tot_indxs := SQL%ROWCOUNT;
FOR i IN 1 .. tot_indxs
LOOP
EXECUTE IMMEDIATE 'alter index ' || indxs (i) || ' rebuild';
END LOOP;
END;
v_tbl_nm VARCHAR2 (32) := '';
--
TYPE oranametable IS TABLE OF VARCHAR2 (32);
indxs oranametable;
tot_indxs PLS_INTEGER;
BEGIN
SELECT index_name
BULK COLLECT INTO indxs
FROM all_indexes a
WHERE a.owner = SYS_CONTEXT ('USERENV', 'CURRENT_SCHEMA')
AND a.table_name = v_tbl_nm;
tot_indxs := SQL%ROWCOUNT;
FOR i IN 1 .. tot_indxs
LOOP
EXECUTE IMMEDIATE 'alter index ' || indxs (i) || ' rebuild';
END LOOP;
END;
No comments:
Post a Comment