GBase 如何批量清空某資料庫中部分表的資料？

編寫   一   個儲存過程來實現：  drop procedure if exists truncate_tables;  delimiter //  CREATE PROCEDURE truncate_tables(db_name varchar(50)) //   根據情況可以增加引數  BEGIN  DECLARE done INT DEFAULT 0;  DECLARE tname varchar(50);  DECLARE cur1 CURSOR FOR SELECT table_name from INFORMATION_SCHEMA.TABLES WHERE  table_schema  =  db_name; //   根據情況修改條件  DECLARE CONTINUE HANDLER FOR SQLSTATE  '   02000   '  SET done = 1;  OPEN cur1;  REPEAT  FETCH cur1 INTO tname;  IF NOT done THEN  set @str=   concat(   '   truncate table  '   , tname);  prepare stmt1 from @str;  execute stmt1; deallocate prepare stmt1;  END IF;  UNTIL done END REPEAT;  CLOSE cur1;  END//