CREATE OR REPLACE 
PROCEDURE S00050_RESET_POINVASS_SEQUENCE
    AS
        v_SEQUENCE_NAME  VARCHAR2 (50) := 'POINVASS_ID_SEQ';
        v_STATEMENT VARCHAR2(2000);
        v_MAX_POINVASS_ID NUMBER;
               

    CURSOR cv_RESET_SEQUENCE_cursor IS
        SELECT MAX(POINVASS_ID) MAX_POINVASS_ID
        FROM P0100_PO_INV_ASSETS;


    BEGIN
        OPEN cv_RESET_SEQUENCE_cursor;    

            LOOP
                FETCH cv_RESET_SEQUENCE_cursor 
                INTO v_MAX_POINVASS_ID;
                
            EXIT WHEN cv_RESET_SEQUENCE_cursor%NOTFOUND;
            
            END LOOP;            
                  
            
            v_STATEMENT := 'ALTER SEQUENCE ' || v_SEQUENCE_NAME ||' INCREMENT BY -' || TO_CHAR(v_MAX_POINVASS_ID, '99,999');  
            
            EXECUTE IMMEDIATE v_STATEMENT;            
            
            v_STATEMENT := 'SELECT '|| v_SEQUENCE_NAME ||'.NEXTVAL FROM dual';
            
            EXECUTE IMMEDIATE v_STATEMENT; --This should bring the sequence to zero
            
            v_STATEMENT := 'ALTER SEQUENCE ' || v_SEQUENCE_NAME ||' INCREMENT BY 10000';  
            
            EXECUTE IMMEDIATE v_STATEMENT; 

            v_STATEMENT := 'SELECT '|| v_SEQUENCE_NAME ||'.NEXTVAL FROM dual';
            
            EXECUTE IMMEDIATE v_STATEMENT; --This should bring the sequence to 10000

            v_STATEMENT := 'ALTER SEQUENCE ' || v_SEQUENCE_NAME ||' INCREMENT BY 1';    

            EXECUTE IMMEDIATE v_STATEMENT; --This should make the next NEXTVAL = 10,001
        
           
    END S00050_RESET_POINVASS_SEQUENCE;
END;

/  

CREATE OR replace PROCEDURE S00050_reset_poinvass_sequence 
AS 
  v_sequence_name VARCHAR2 (50) := 'POINVASS_ID_SEQ'; 
  v_statement     VARCHAR2(2000); 
BEGIN 
    v_statement := 'DROP SEQUENCE POINVASS_ID_SEQ'; 

    EXECUTE IMMEDIATE v_statement; 

    v_statement := 'CREATE SEQUENCE POINVASS_ID_SEQ START WITH 10000'; 

    EXECUTE IMMEDIATE v_statement; 
END s00050_reset_poinvass_sequence; 

/ 

CREATE OR REPLACE PROCEDURE usp_dropTable(schema VARCHAR, tblToDrop VARCHAR)  AUTHID CURRENT_USER IS BEGIN...