星期三, 四月 18, 2007

Oracle 升级到11.5.10以后 入库失败 !请教各位大大

Oracle 升级到11.5.10以后 入库失败 !请教各位大大 查看全文

星期一, 五月 01, 2006

Java手記

這個帖子將來要用來作Java學習的開始篇.

選擇Java的原因:

1.面向對象

2.易于學習

3.平台無關

4.打鐵趁熱


星期三, 四月 19, 2006

UTL_FILE包的應用

windows 2000 server + oracle 8.1.7

1.读文件举例:
-- 环境 windows 2000 server + oracle 8.1.7
-- 先在 init.ora中的参数utl_file_dir
-- 例: utl_file_dir=(d:test,e:,e:share)
--set serveroutput on size 1000000 format wrapped create or replace procedure read_txtfile

( -- 读一个文本文件,并在sqlplus中显示其内容
path in varchar2,
name in varchar2
)
as
l_output utl_file.file_type;
str varchar2(1000);
begin
l_output:=utl_file.fopen(path,name,'r',2000);

-- 每行最大字节数最多为32K bytes
--l_output:=utl_file.fopen(path,name,'r');

-- 每行最大字节数最多为1023 bytes
loop
utl_file.get_line(l_output,str);
dbms_output.put_line(str);
end loop;
exception
when no_data_found then
utl_file.fclose(l_output);
when utl_file.invalid_path then
raise_application_error(-20001,'INVALID_PATH!');
when utl_file.invalid_mode then
raise_application_error(-0002,'INVALID_MODE!');
when utl_file.invalid_filehandle then
raise_application_error

(-20003,'INVALID_FILEHANDLE!');
when utl_file.invalid_operation then
raise_application_error

(-20004,'INVALID_OPERATION!');
when utl_file.read_error then
raise_application_error(-20005,'READ_ERROR!');
when utl_file.write_error then
raise_application_error(-20006,'WRITE_ERROR!');
when utl_file.internal_error then
raise_application_error

(-20007,'INTERNAL_ERROR!');
when others then
str:=sqlerrm(sqlcode);
dbms_output.put_line(str);
end;
/

SQL> execute read_txtfile('d:test','test.txt');

2.写文件举例
-- 环境 windows 2000 server + oracle 8.1.7
-- 先在 init.ora中的参数utl_file_dir
-- 例: utl_file_dir=(d:test,e:,e:share)
--

set serveroutput on size 1000000 format wrapped

create or replace procedure write_txtfile( -- 写一个字符串到指定文本文件中
path in varchar2,
name in varchar2,
pstr in varchar2
)
as
l_output utl_file.file_type;
str varchar2(1000);
begin
l_output:=utl_file.fopen(path,name,'a',2000); -- 每行最大字节数最多为32K bytes
--l_output:=utl_file.fopen(path,name,'a'); -- 每行最大字节数最多为1023 bytes
utl_file.put_line(l_output,pstr);
utl_file.fclose(l_output);
exception
when utl_file.invalid_path then
raise_application_error(-20001,'INVALID_PATH!');
when utl_file.invalid_mode then
raise_application_error(-20002,'INVALID_MODE!');
when utl_file.invalid_filehandle then
raise_application_error(-20003,'INVALID_FILEHANDLE!');
when utl_file.invalid_operation then
raise_application_error(-20004,'INVALID_OPERATION!');
when utl_file.read_error then
raise_application_error(-20005,'READ_ERROR!');
when utl_file.write_error then
raise_application_error(-20006,'WRITE_ERROR!');
when utl_file.internal_error then
raise_application_error(-20007,'INTERNAL_ERROR!');
when others then
str:=sqlerrm(sqlcode);
dbms_output.put_line(str);
end;
/


--SQL> execute write_txtfile('e:','njhart2003.txt','hello oracle,i like oracle!');

--PL/SQL 过程已成功完成。
作者:njhart2003 来源:http://www.it-ceo.net/Docs/TEC_DOC/TEC_DOC_05/191331117.htm


星期四, 四月 13, 2006

Source Code

shell ( '/usr/bin/mutt -s '
|| CHR (39)
|| 'The PO '
|| 'T-'
|| header.segment1
|| '/'
|| line.line_num
|| ' Country Code '
|| v_country_code
|| ' does not exist in Lead Time base table'
|| CHR (39)
|| ' -c '
|| CHR (39)
|| v_aom011p_recipients
|| CHR (39)
|| ' '
|| CHR (39)
|| v_aom011p_cc_recipients
|| CHR (39)
|| ' < '
|| v_in_location
|| '/nocountry.txt'
);

星期六, 三月 18, 2006

又是風起的日子

很快又到週末.重複工作的每一天,我開始害怕,怕我還能堅持這樣多久,追尋不到生的意義,活著會越來越累,在無趣的世界逗留只會徒增憎恨而已.原有的信念開始動搖,為甚麼找不到!難道那已是過去而已.很累的時候是否會放棄,放棄自己,放棄家人.....不得而知.很怕,很怕.


星期三, 三月 15, 2006

15號

再一次認識到::::有關技術的問題,一定要清楚到會哂玫碾A段.


星期六, 三月 11, 2006

今天搬家!

today we'll change our pace.....9.30就起床過來,累死啦.啊 .............


星期四, 三月 09, 2006

週四

昨天晚上和同事打球去的.好長時間沒動.偶爾跳跳跑跑就全身散骨似的.比較想念在學校的時候可以一打球就一個下午.漢得大家都赤著脖.累,很累.但是爽!

人其實需要累,因為身體會覺得NULL..累也就是力量填滿了我們身體的每一個細胞;思想和身體是一樣的,大腦需要經常的思考,停頓會使我們覺得空虛,會使我們老化.

生活需要新鮮血液 需要不斷發現與尋找快樂.

快樂從來不只是屬于一個人.他屬于追求他的人.