略微復(fù)雜，需要存儲過程實現(xiàn)。
成都創(chuàng)新互聯(lián)公司長期為上千家客戶提供的網(wǎng)站建設(shè)服務(wù)，團隊從業(yè)經(jīng)驗10年，關(guān)注不同地域、不同群體，并針對不同對象提供差異化的產(chǎn)品和服務(wù)；打造開放共贏平臺，與合作伙伴共同營造健康的互聯(lián)網(wǎng)生態(tài)環(huán)境。為青羊企業(yè)提供專業(yè)的成都網(wǎng)站制作、成都做網(wǎng)站、外貿(mào)營銷網(wǎng)站建設(shè)，青羊網(wǎng)站改版等技術(shù)服務(wù)。擁有十年豐富建站經(jīng)驗和眾多成功案例,為您定制開發(fā)。
1、創(chuàng)建輸出路徑，比如你要在d盤test目錄下輸出，你就先在d盤根目錄下建立一個test的目錄。
2、sqlplus下以sysdba登錄，執(zhí)行以下語句
create?or?replace?directory?TMP?as?'d:\test';
grant?read,write?on?directory?TMP?to?scott;?--比如我用的scott用戶
alter?system?set?utl_file_dir='d:\test'?scope=spfile;
3、以上步驟執(zhí)行完，需要重啟數(shù)據(jù)庫。
4、創(chuàng)建一個存儲過程，代碼如下（基本是不用改動，原封復(fù)制即可）：
CREATE?OR?REPLACE?PROCEDURE?SP_OUTPUT_PROCEDURE?is
file_handle?????utl_file.file_type;
Write_content???VARCHAR2(1024);
Write_file_name?VARCHAR2(50);
v_name??????????varchar2(50);
v_text??????????varchar2(2000);
cursor?cur_procedure_name?is
select?distinct?name?from?user_source?where?type?=?'PROCEDURE';
cursor?cur_sp_out?is
select?t.text
from?(select?0?line,?'CREATE?OR?REPLACE?'?text
from?dual
union
select?line,?text
from?user_source
where?type?=?'PROCEDURE'
and?name?=?v_name)?t
order?by?line;
begin
open?cur_procedure_name;
loop
fetch?cur_procedure_name
into?v_name;
exit?when?cur_procedure_name%notfound;
write_file_name?:=?v_name?||?'.txt';
open?cur_sp_out;
loop
fetch?cur_sp_out
into?v_text;
exit?when?cur_sp_out%notfound;
file_handle???:=?utl_file.fopen('TMP',?write_file_name,?'a');
write_content?:=?v_text;
--write?file
IF?utl_file.is_open(file_handle)?THEN
utl_file.put_line(file_handle,?write_content);
END?IF;
--close?file
utl_file.fclose(file_handle);
end?loop;
close?cur_sp_out;
end?loop;
close?cur_procedure_name;
end;
5、創(chuàng)建完畢執(zhí)行存儲過程，這個就不贅述了，執(zhí)行完畢后，你會發(fā)現(xiàn)d盤test目錄下的文件名就是以存儲過程名命名的txt文件，如圖：
6、里邊內(nèi)容（就是存儲過程創(chuàng)建時的代碼，可能排版看著難看點，但是不影響使用）：
打開oracle sql developer工具，連接上數(shù)據(jù)庫服務(wù)，然后打開表列表，選擇需要導(dǎo)出的表，然后右擊選擇導(dǎo)出
請點擊輸入圖片描述
在導(dǎo)出向?qū)ы撁妫鐖D可以看到，是否需要導(dǎo)出DLL，是否美化顯示等選項，可以根據(jù)需要進行勾選。最下面選擇編碼和導(dǎo)出的文件目錄
請點擊輸入圖片描述
這一步，需要選擇導(dǎo)出的列字段，可以選擇其中部分字段，默認是全部列勾選的，如果不需要修改可以直接點擊下一步
請點擊輸入圖片描述
這一步需要指定過濾的where條件，如圖所示，在where字句中輸入條件，輸入完條件之后可以點擊刷新按鈕查看過濾效果
請點擊輸入圖片描述
到這一步是導(dǎo)出概要，可以查看導(dǎo)出有關(guān)的信息等，沒有問題的話，可以直接點擊完成，即可開始導(dǎo)出數(shù)據(jù)了。
請點擊輸入圖片描述
如果表里的數(shù)據(jù)量比較大，在導(dǎo)出的時候需要等待一段時間，可以選擇后臺運行，這樣可以同時做其它的操作。導(dǎo)出程序在后臺導(dǎo)出，完成之后會有提醒。
請點擊輸入圖片描述
導(dǎo)出完成之后，打開剛剛設(shè)置的導(dǎo)出文件目錄，查看導(dǎo)出的文件和數(shù)據(jù)是否正確。
請點擊輸入圖片描述
1、要想連接到一個數(shù)據(jù)庫，先得配置一個tnsnames.ora文件。路徑位于 【XX】/NETWORK/ADMIN/tnsnames.ora?！綳X】視具體情況而定。
截圖中紅框標記的地方需要改成你需要連接的數(shù)據(jù)庫的信息。
2、測試數(shù)據(jù)庫是否能連通。
運行CMD，命令行執(zhí)行：sqlplus 用戶名/密碼@數(shù)據(jù)庫。
3、編寫導(dǎo)出存儲過程的腳本，保存為E:\export.sql。大概如下（標紅框的地方替換成要保存腳本的路徑和需要導(dǎo)出的存儲過程列表）：
SET echo off ;
SET heading ? off ;
SET feedback ? off ;
SPOOL 'C:/EXP/DDL/PRC_JG_JGTZ.SQL' replace
SELECT CASE
? ?WHEN LINE = 1 THEN
? ? 'CREATE OR REPLACE ' || TEXT
? ?WHEN LINE = MAX_LINE THEN
? ? TEXT || CHR(10 ) || '/'
? ?ELSE
? ? TEXT
?END
FROM USER_SOURCE A
LEFT JOIN (SELECT A.NAME,A.TYPE, MAX(LINE) MAX_LINE
? ? ? ? ?FROM USER_SOURCE A
? ? ? ? WHERE TYPE in ( 'PROCEDURE', 'PACKAGE' ,'PACKAGE BODY' )
? ? ? ? GROUP BY A.NAME,A.TYPE ) B ON A.NAME||A.TYPE = B.NAME||B.TYPE
WHERE A.TYPE in ('PROCEDURE' , 'PACKAGE', 'PACKAGE BODY' ) AND A.NAME IN
(
'ETL_FACT_JG_SAEINDEX_SCALE'
,'ETL_FACT_JG_SAEINDEX_SCALE_OLD'
,'ETL_DM_JG_CIRC'
)
ORDER BY a.NAME||a.TYPE , LINE;
SPOOL OFF
4、執(zhí)行剛剛編寫的腳本文件，導(dǎo)出指定的存儲過程。
連接數(shù)據(jù)庫后，輸入：@E:\export.sql
如果遇到了截圖中出現(xiàn)的問題，請參照文章結(jié)尾的【注意事項】。
5、若要在新的數(shù)據(jù)庫上創(chuàng)建導(dǎo)出的存儲過程，只需連上新的數(shù)據(jù)，然后執(zhí)行剛生成的腳本文件即可。
連接數(shù)據(jù)庫后輸入：@C:\exp\ddl\PRC_JG_JGTZ.SQL
注意事項
若出現(xiàn)亂碼，可能需要將編寫的sql文件轉(zhuǎn)換為utf-8格式。
若提示無法創(chuàng)建spool文件，請確保目錄C:/EXP/DDL存在，或者指定新的路徑。
重慶分公司
重慶分公司
