DB2删除表且释放空间存储过程

调用示例
call BSDCMACW.P_DROP_PURGE ('BSDCMACW','test12_01')

删除表且释放空间
SET CURRENT SCHEMA = "bsdcmacw";

SET CURRENT PATH = SYSIBM,SYSFUN,SYSPROC,SYSIBMADM,BSDCMACW;

CREATE OR REPLACE PROCEDURE BSDCMACW.P_DROP_PURGE (
    IN P_OWNER	VARCHAR(32),
    IN P_TABLE	VARCHAR(32) )
  SPECIFIC P_DROP_PURGE
  LANGUAGE SQL
  NOT DETERMINISTIC
  EXTERNAL ACTION
  MODIFIES SQL DATA
  CALLED ON NULL INPUT
  INHERIT SPECIAL REGISTERS
  OLD SAVEPOINT LEVEL
BEGIN


DECLARE v_sql_str VARCHAR(1024);
 
	--清空表，以释放空间
SET v_sql_str = 'ALTER TABLE ' || p_owner || '.' || p_table || ' ACTIVATE NOT LOGGED INITIALLY WITH EMPTY TABLE';
EXECUTE IMMEDIATE v_sql_str;
COMMIT;
 
	--删除表
SET v_sql_str = 'DROP TABLE ' || p_owner || '.' || p_table;
EXECUTE IMMEDIATE v_sql_str;
COMMIT;
END;

SET CURRENT SCHEMA = BSDCMACW;