Begin
 For i in (select table_name from user_tables)
 Loop
  Begin
   Execute Immediate 'Truncate table ' || i.table_name || ' reuse storage ' ; --or drop storage which is default
 Exception
   When Others then
    Null;
 End;
End Loop;
End;
/