存储过程修改CLOB字段

weixin_33921089

于 2010-03-24 17:42:00 发布

阅读量193

点赞数

文章标签：数据库

原文链接：https://my.oschina.net/czllfy/blog/3378

版权

为什么80%的码农都做不了架构师？>>>

CREATE OR REPLACE PROCEDURE INSERT_RES_PEOPLE_ADD
(
?r_people_cname????????? varchar2,
?r_people_intro????????? varchar2
)
AS
r_intro_clob clob;--
buffer? varchar2(32767);
amount? number := 2000;
offset? number := 1;
BEGIN
? select clobf into r_intro_clob from ztable where RES_CLASS_ID = 9;
? if r_intro_clob is null then
??? update ztable set clobf = 'buffer' where RES_CLASS_ID = 9;
??? return ;
? end if;
?
? amount := dbms_lob.getlength(r_intro_clob);
? dbms_lob.read(r_intro_clob,amount,offset,buffer);
? buffer := buffer || r_people_intro;
?update ztable set clobf = buffer where RES_CLASS_ID = 9;
EXCEPTION
??? when others then
??? rollback;
??? --raise;
??? return;
END;

select to_clob(replace(DBMS_LOB.SUBSTR(cb),'a','b')) from test_clob t

转载于:https://my.oschina.net/czllfy/blog/3378