输出所有与pms相关的表

declare
cursor s_cur is 
select table_name from user_tables where upper(table_name) like upper('pms%');
--定义一个游标变量c_r s_cur%rowtype ，该类型为游标s_cur中的一行数据类型 
c_r s_cur%ROWTYPE;
begin 
for r in s_cur loop
dbms_output.put_line('select * from '||r.table_name||';');
end loop;
dbms_output.put_line('--删除于2017-06-29');
dbms_output.put_line('commit');
end;