Bozulan indexlerin Düzeltilmesi (Rebuild Index)

Subpartition da bulunan indexler insert yapıldıkça bozulur ve bunların script ile düzeltilmesi aşağıdaki kod parçacığı ile yapılabilir.

DECLARE
   vline               VARCHAR2 (10000);
   pi_billing_period   VARCHAR2 (10) := 50;
   v_bill_per_ses_id   VARCHAR2 (10) := 0;
BEGIN
   FOR ctrl IN 0 .. 9
   LOOP
      FOR ix IN 0 .. 9
      LOOP
         vline :=
               'Alter index IX_INVOICEPRINT_CDR_01 rebuild subpartition CDR_'
            || pi_billing_period
            || '_'
            || TRIM (ctrl)
            || '_'
            || v_bill_per_ses_id
            || '_CDR_'
            || TRIM (TO_CHAR (ix))
            || '0'
            || '_'
            || TRIM (TO_CHAR (ix))
            || '9'
            || ' PARALLEL 8 ';


         EXECUTE IMMEDIATE vline;

         COMMIT;
      END LOOP;
   END LOOP;
END;