用友醫(yī)療北方實(shí)施服務(wù)部用友醫(yī)療衛(wèi)生信息系統(tǒng)有限公司H6.0數(shù)據(jù)庫導(dǎo)入Oracle版本苗傳祥2012-3-1此文檔為把h6的數(shù)據(jù)備份文件導(dǎo)入到一個(gè)新創(chuàng)建的數(shù)據(jù)庫中。H6中oracle版數(shù)據(jù)導(dǎo)入一說明1、 首先用oracle自帶數(shù)據(jù)庫進(jìn)行創(chuàng)建數(shù)據(jù)庫，數(shù)據(jù)庫名字自己定義。 點(diǎn)擊【開始】-【程序】-【oracle-oradb10g_home1】-【配置和移植工具】-【datasase configuration assistant】，點(diǎn)擊進(jìn)入創(chuàng)建數(shù)據(jù)庫界面（如上圖所示）， 點(diǎn)擊【下一步】，選擇【創(chuàng)建新數(shù)據(jù)庫】，點(diǎn)擊下一步選擇一般用途，然后點(diǎn)擊【下一步】， 進(jìn)入錄入數(shù)據(jù)庫名稱的界面，輸入全局?jǐn)?shù)據(jù)庫名，然后點(diǎn)擊【下一步】，會(huì)彈出另外一個(gè)窗口，繼續(xù)點(diǎn)擊【下一步】， 出現(xiàn)錄入密碼界面，密碼一定要記清楚，密碼輸入兩遍后，繼續(xù)點(diǎn)擊【下一步】 然后在出現(xiàn)彈出的對(duì)話框中一直選擇【下一步】，直到出現(xiàn)下面界面，然后直接點(diǎn)擊【完成】 然后會(huì)彈出一個(gè)新的對(duì)話框，點(diǎn)擊【確定】， 然后會(huì)出現(xiàn)以下界面表示數(shù)據(jù)庫正在創(chuàng)建： 2、 數(shù)據(jù)庫創(chuàng)建完成后，用plsql或者sqlplus登陸，登陸的用戶名為SYSTEM,數(shù)據(jù)庫為剛才新建的數(shù)據(jù)庫，登陸的權(quán)限選擇sysdba,分別執(zhí)行下面語句，其中要注意修改路徑：- 創(chuàng)建數(shù)據(jù)表空間 create tablespace UFHIS logging datafile D:appAdministratororadataWLCBH6ufhis_data.dbfsize 500m autoextend on next 50m maxsize 20480m extent management local; - 創(chuàng)建臨時(shí)表空間 create temporary tablespace UFHIS_TEMP tempfile D:appAdministratororadataWLCBH6ufhis_temp.dbf size 50m autoextend on next 50m maxsize 10240m extent management local; 3、 把已經(jīng)準(zhǔn)備好的備份文件放到一個(gè)指定的文件夾下，如D盤下面的H6.DMP為數(shù)據(jù)庫備份文件。4、 數(shù)據(jù)導(dǎo)入，點(diǎn)擊【開始】-【運(yùn)行】，輸入imp，敲擊回車，在用戶名后面輸入System/創(chuàng)建數(shù)據(jù)時(shí)的密碼創(chuàng)建數(shù)據(jù)庫名， 然后點(diǎn)擊回車，在導(dǎo)入文件后面輸入你要導(dǎo)入數(shù)據(jù)的文件，然后點(diǎn)擊回車，連續(xù)敲擊兩下回車，出現(xiàn)以下界面，然后輸入yes,敲擊回車，然后再敲擊兩下回車，出現(xiàn)如下界面：然后輸入yes，敲擊回車，開始導(dǎo)入數(shù)據(jù)，窗口自動(dòng)關(guān)閉表示導(dǎo)入數(shù)據(jù)完成。5、 在pl或者sqlplus中用his用戶登陸并創(chuàng)建以下函數(shù) - 創(chuàng)建Oracle使用函數(shù)create or replace type AT_VARCHAR200 as object( S varchar2(200)/create or replace function AF_Space_STR (ALen IN integer)return AT_varchar200 is s AT_varchar200 := AT_varchar200(NULL);begin s.s := RPAD( , ALEN);return(s); end AF_Space_STR;/create or replace function AF_STR_STR (ASTR IN VARCHAR2) return AT_VARCHAR200 is vRet at_varchar200 := at_varchar200(NULL);begin vRet.s := ASTR; return( vRet); end AF_STR_STR;/create or replace function AF_CONCAT_STR(AStr1 IN varchar2,AStr2 IN varchar2) return AT_varchar200 is s AT_varchar200 := AT_varchar200(NULL);begin s.s := AStr1 | AStr2; return(s);end AF_CONCAT_STR; /create or replace function AF_ISNULLC_STR(AChar1 IN varchar2, AChar2 IN varchar2)return AT_varchar200 is vRet AT_varchar200 := AT_varchar200(NULL);begin vRet.s := NVL(AChar1,AChar2); return(vRet);end AF_ISNULLC_STR;/create or replace function AF_IntToStr_STR(AInt IN Integer,ACharLen IN Integer default 0)return AT_varchar200 is vRet AT_varchar200 := AT_varchar200(NULL);begin vRet.s := To_Char(AInt); return(vRet); end AF_IntToStr_STR;/create or replace function AF_NumToStr_STR(ANum IN number,ACharLen IN Integer default 0)return AT_varchar200 is vRet AT_varchar200 := AT_varchar200(NULL);begin vRet.s := To_Char(ANum); return(vRet); end AF_NumToStr_STR;/create or replace function AF_DateTimeToStr_STR(ADate IN Date)return AT_varchar200 is vRet AT_varchar200 := AT_varchar200(NULL);begin vRet.s := To_Char(ADate,YYYY.MM.DD HH24:MM:SS); return(vRet); end AF_DateTimeToStr_STR;/create or replace function AF_DateToStr_STR(ADate IN Date)return AT_varchar200 is vRet AT_varchar200 := AT_varchar200(NULL);begin vRet.s := To_Char(ADate,YYYY.MM.DD); return(vRet); end AF_DateToStr_STR;/create or replace function AF_TimeToStr_STR(ADate IN Date)return AT_varchar200 is vRet AT_varchar200 := AT_varchar200(NULL);begin vRet.s := To_Char(ADate,HH24:MM:SS); return(vRet); end AF_TimeToStr_STR;/create or replace function AF_Ltrim_STR(AStr IN varchar2) return AT_varchar200 is vRet AT_varchar200 := AT_varchar200(NULL);begin vRet.s := Ltrim(AStr); return(vRet);end AF_Ltrim_STR;/create or replace function AF_Rtrim_STR(AStr IN varchar2) return AT_varchar200 is vRet AT_varchar200 := AT_varchar200(NULL);begin vRet.s := Rtrim(AStr); return(vRet);end AF_Rtrim_STR;/create or replace function AF_Trim_STR(AStr IN varchar2) return AT_varchar200 is vRet AT_varchar200 := AT_varchar200(NULL);begin vRet.s := Trim(AStr); return(vRet);end AF_Trim_STR;/create or replace function AF_Substring_STR(AStr IN varchar2,AStart IN integer,ALength IN integer:=0) return AT_varchar200 is ALen integer; vRet AT_varchar200 := AT_varchar200(NULL); begin if ALength=0 then ALen:=Length(AStr); else ALen:=ALength; end if ; vRet.s := Substr(AStr,AStart,ALen); return(vRet);end AF_Substring_STR;/create or replace function AF_Stuff_STR(AStr1 IN varchar2,AStart IN integer,ALength IN integer,AStr2 IN varchar2) return AT_varchar200 is vStr varchar2(1000); vSub varchar2(1000); vRet AT_varchar200 := A