批量导出多个表insert 语句

示例如下：

create table sql_str as 
SELECT 'INSERT INTO SCOTT.DEPT (DEPTNO, DNAME, LOC) VALUES (' || DEPTNO||', '''||DNAME||''', '''||LOC||''');' SQL_STR  FROM SCOTT.DEPT
UNION ALL
SELECT 'INSERT INTO SCOTT.EMP (EMPNO, ENAME, JOB, MGR, HIREDATE, SAL, COMM, DEPTNO) VALUES 
(' ||EMPNO||','''||ENAME||''','''||JOB||''','||decode(mgr,null,'null',mgr)||','||'TO_DATE('''||TO_CHAR(HIREDATE,'yyyy-mm-dd')||''',''yyyy-mm-dd'')'||','||SAL||','||DECODE(COMM,NULL,'null',COMM)||','||DEPTNO ||');'FROM SCOTT.EMP; 




begin
for i in (select sql_str from sql_str)loop
  dbms_output.put_line(i.sql_str);
  end loop;
end;


打印出来后复制出来