欢迎进入Oracle社区论坛，与200万技术人员互动交流 >>进入 导入指定文件的数据库 [sql] create or replace procedure IMP_DATA （ file_name in varchar2 --要导入的文件名，包含路径（如：d:\test\exp_0003.txt） ,p_user in varchar2 default SYS_CONTEXT
欢迎进入Oracle社区论坛，与200万技术人员互动交流 >>进入
导入指定文件的数据库
[sql]
create or replace procedure IMP_DATA
（
file_name in varchar2 --要导入的文件名，包含路径（如：d:\test\exp_0003.txt）
,p_user in varchar2 default SYS_CONTEXT（'USERENV', 'CURRENT_USER'） --要导入的用户，缺省为当前用户
,p_sep in varchar2 default ',' --字段分隔符，默认为逗号（需要打开要导入的文件确认导入的字段分隔符）
） AS
/*
描述：根据EXP_DATA过程导出的数据进行导入
created by cryking 2013.03.07
注意：1.本存储建议由SYS账户或具有SYSDBA权限的账户执行
2.不要在其他事务中运行本存储过程
3. 默认导入的数据（p_user为空，或未指定）全部在当前用户下
*/
v_file UTL_FILE.file_type;
TYPE t_filed IS TABLE OF varchar2（200） INDEX BY BINARY_INTEGER;
v_fileds t_filed;
TYPE t_data IS TABLE OF varchar2（4000） INDEX BY BINARY_INTEGER;
v_data t_data;
v_datatype t_data;
v_sql varchar2（30000）；
V_esql varchar2（30000）；
v_filed VARCHAR2（100） := '';
v_filedstr VARCHAR2（4000） := '';
V_TABLE VARCHAR2（1000）；
v_user varchar2（20）；
v_path varchar2（500）；
v_filename varchar2（50）；
v_sep varchar2（10）；
v_text varchar2（32600）；
v_textTmp varchar2（32600）；
i_flag integer:=0;
I_TABLE INTEGER;
exp_sep exception;
ex_table exception;
BEGIN
[1] [2] [3]
