在PL/SQL中，你可以使用DBMS_DATAPUMP包来导出多个表的数据。下面是一个示例代码，演示了如何使用DBMS_DATAPUMP导出多个表的数据到一个数据文件中：

DECLAREl_dp_handle NUMBER;l_statusVARCHAR2(20);BEGIN-- 创建数据泵作业l_dp_handle := DBMS_DATAPUMP.OPEN (operation => 'EXPORT',job_mode=> 'FULL',job_name=> 'EXPORT_JOB',version => 'COMPATIBLE');-- 添加要导出的表DBMS_DATAPUMP.metadata_filter(handle => l_dp_handle,name => 'TABLE_EXPORT',value=> '''SCHEMA_NAME''');DBMS_DATAPUMP.metadata_filter(handle => l_dp_handle,name => 'TABLE_EXPORT',value=> '''TABLE_NAME1, TABLE_NAME2''');-- 指定导出数据的目录和文件名DBMS_DATAPUMP.add_file(handle => l_dp_handle,filename => 'DIRECTORY_NAME:EXPORT_FILE.dmp',directory=> 'DATA_PUMP_DIR',filetype => DBMS_DATAPUMP.KU$_FILE_TYPE_DUMP_FILE);-- 开始导出数据DBMS_DATAPUMP.START_JOB(l_dp_handle);-- 等待导出完成l_status := DBMS_DATAPUMP.JOB_STATUS(l_dp_handle);WHILE l_status != 'COMPLETED' AND l_status != 'STOPPED' LOOPl_status := DBMS_DATAPUMP.JOB_STATUS(l_dp_handle);DBMS_LOCK.SLEEP(1);END LOOP;-- 关闭数据泵作业DBMS_DATAPUMP.CLOSE(l_dp_handle);DBMS_OUTPUT.PUT_LINE('Export job completed.');EXCEPTIONWHEN OTHERS THEN-- 处理异常DBMS_OUTPUT.PUT_LINE('Export job failed: ' || SQLERRM);IF DBMS_DATAPUMP.IS_OPEN(l_dp_handle) THENDBMS_DATAPUMP.CLOSE(l_dp_handle);END IF;END;

在上述代码中，你需要修改以下几个地方：

将SCHEMA_NAME替换为你要导出的表所在的模式名称。将TABLE_NAME1, TABLE_NAME2替换为你要导出的表的名称，多个表之间用逗号分隔。将DIRECTORY_NAME:EXPORT_FILE.dmp替换为你要导出数据文件的目录和文件名。

这样，运行上述代码就可以将多个表的数据导出到指定的数据文件中。