create or replace procedure coalesce_tablespace( p_tablespace in varchar2 )
is

    cursor_name     pls_integer default dbms_sql.open_cursor;
    ignore          pls_integer;
BEGIN
    dbms_sql.parse(cursor_name, 
                   'alter tablespace ' || p_tablespace || ' coalesce',

                    dbms_sql.native);
    ignore := dbms_sql.execute(cursor_name);
    dbms_sql.close_cursor(cursor_name);
END;