To Delete all the data in current schema of Oracle Database

BEGIN
For i in (Select table_name from user_tables)
LOOP
BEGIN
EXECUTE IMMEDIATE 'DELETE FROM ' || i.table_name;
EXCEPTION
WHEN OTHERS
THEN NULL;
END;
END Loop;
Commit;
END;