SPOOL循环导出一个用户下所有表insert into values语句

请问下各位兄弟姐妹，谁知道如何写这个语句，循环形成导出表insert into values 的spool语句 ，如：

 SPOOL 123.sql
  begin 
  for k in (select table_name from dba_tables where owner = 'PM_FW' ) loop
  --select 'spool '||decode('&&file_path'||'/','/','','&&file_path'||'/')||k.table_name||'.sql' TEXT from dual;
 select 'spool '||'d:/'||k.table_name||'.sql' TEXT from dual;
  --select sql_text from toms_ins_sql where sql_table = p_table order by sql_table,line#;
  select 'spool off'||chr(10)||chr(13) TEXT from dual;
  end loop;
  end;
SPOOL OFF 

@123.sql

完全没有看懂意思。。。