清表腳本
DECLARE
CURSOR CUR_TABLE IS SELECT TABLE_NAME FROM USER_TABLES ;
V_SQL VARCHAR2(400);
REC_TABLE CUR_TABLE%ROWTYPE;
BEGIN
FOR REC_TABLE IN CUR_TABLE LOOP
BEGIN
V_SQL := 'TRUNCATE TABLE ' || REC_TABLE.TABLE_NAME/* || ';'*/;
EXECUTE IMMEDIATE V_SQL ;
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.put_line(REC_TABLE.TABLE_NAME);
END;
END LOOP;
END ;