大对象数据的读取和操作


三,大对象数据的读取和操作:DBMS_LOB包
DBMS_LOB包:包含处理大对象的过程和函数

1,读取大对象数据的过程和函数
①:DBMS_LOB.Read():从LOB数据中读取指定长度数据到缓冲区的过程。
DBMS_LOB.Read(LOB数据,指定长度,起始位置,
存储返回LOB类型值变量);
例子:

/* Formatted on 2009-12-24 17:25:01 (QP5 v5.115.810.9015) */
DECLARE
varC CLOB;
vRStr VARCHAR2 (1000);
LN NUMBER (4);
Strt NUMBER (4);
BEGIN
SELECT resume
INTO varC
FROM tlob
WHERE no = 1;

LN := DBMS_LOB.GetLength (varC);
Strt := 1;
DBMS_LOB.Read (varC,
LN,
Strt,
vRStr);
DBMS_OUTPUT.put_line (‘Return: ‘ || vRStr);
END;

②:DBMS_LOB.SubStr():从LOB数据中提取子字符串的函数。
DBMS_LOB.SubStr(LOB数据,指定提取长度,提取起始位置):

例子:
/* Formatted on 2009-12-24 17:24:35 (QP5 v5.115.810.9015) */
DECLARE
varC CLOB;
vRStr VARCHAR2 (1000);
LN NUMBER (4);
Strt NUMBER (4);
BEGIN
SELECT resume
INTO varC
FROM tlob
WHERE no = 1;

LN := 4;
Strt := 1;
vRStr := DBMS_LOB.SUBSTR (varC, LN, Strt);
DBMS_OUTPUT.put_line (‘结果为: ‘ || vRStr);
END;

③:DBMS_LOB.InStr():从LOB数据中查找子字符串位置的函数。
DBMS_LOB.InStr(LOB数据, 子字符串);

例子:
/* Formatted on 2009-12-24 17:25:39 (QP5 v5.115.810.9015) */
DECLARE
varC CLOB;
vSubStr VARCHAR2 (1000);
vRStr VARCHAR2 (1000);
LN NUMBER (4);
BEGIN
SELECT resume
INTO varC
FROM tlob
WHERE no = 1;

vSubStr := ‘大对象';
LN := DBMS_LOB.INSTR (varC, vSubStr);
DBMS_OUTPUT.put_line (‘位置为: ‘ || LN);

vRStr := DBMS_LOB.SUBSTR (varC, LENGTH (vSubStr), LN);
DBMS_OUTPUT.put_line( ‘位置为'
|| LN
|| ‘长度为'
|| LENGTH (vSubStr)
|| ‘的子字符串为:'
|| vRStr);
END;

④:DBMS_LOB.GetLength():返回指定LOB数据的长度的函数。
DBMS_LOB.GetLength(LOB数据);

⑤:DBMS_LOB.Compare():比较二个大对象是否相等。返回数值0为相等,-1为不相等。
DBMS_LOB.Compare(LOB数据,LOB数据);

例子:
/* Formatted on 2009-12-24 17:26:19 (QP5 v5.115.810.9015) */
DECLARE
varC1 CLOB;
varC2 CLOB;
varC3 CLOB;
LN NUMBER (4);
BEGIN
SELECT resume
INTO varC1
FROM tlob
WHERE no = 1;

SELECT resume
INTO varC2
FROM tlob
WHERE no = 2;

SELECT resume
INTO varC3
FROM tlob
WHERE no = 3;

LN := DBMS_LOB.Compare (varC1, varC1);
DBMS_OUTPUT.put_line (‘比较的结果为: ‘ || LN);
LN := DBMS_LOB.Compare (varC2, varC3);
DBMS_OUTPUT.put_line (‘比较的结果为: ‘ || LN);
END;

2,操作大对象数据的过程
操作会改变中原有数据,需要加上Updata锁锁上指定数据列,修改完后提交事务。

①:DBMS_LOB.Write():将指定数量的数据写入LOB的过程。
DBMS_LOB.Write(被写入LOB, 写入长度(指写入LOB数据),写入起始位置(指被写入LOB),写入LOB数据);

例子:
/* Formatted on 2009-12-24 17:43:38 (QP5 v5.115.810.9015) */
DECLARE
varC CLOB;
vWStr VARCHAR2 (1000);
vStrt NUMBER (4);
LN NUMBER (4);
BEGIN
vWStr := ‘CLOB';
LN := LENGTH (vWStr);
vStrt := 5;

SELECT resume
INTO varC
FROM tlob
WHERE no = 1
FOR UPDATE ;

DBMS_LOB.Write (varC,
LN,
vStrt,
vWStr);
DBMS_OUTPUT.put_line (‘改写结果为: ‘ || varC);
COMMIT;
END;

②:DBMS_LOB.Append():将指定的LOB数据追加到指定的LOB数据后的过程。
DBMS_LOB.Append(LOB数据,LOB数据);
例子:
/* Formatted on 2009-12-24 17:44:17 (QP5 v5.115.810.9015) */
DECLARE
varC CLOB;
vAStr VARCHAR2 (1000);
BEGIN
vAStr := ‘,这是大对象列';

SELECT resume
INTO varC
FROM tlob
WHERE no = 1
FOR UPDATE ;

DBMS_LOB.Append (varC, vAStr);
COMMIT;
DBMS_OUTPUT.put_line (‘追加结果为: ‘ || varC);
END;

③:DBMS_LOB.Erase():删除LOB数据中指定位置的部分数据的过程;
DBMS_LOB.Erase(LOB数据,指定删除长度, 开始删除位置);

例子:
/* Formatted on 2009-12-24 17:44:45 (QP5 v5.115.810.9015) */
DECLARE
varC CLOB;
LN NUMBER (4);
strt NUMBER (4);
BEGIN
LN := 1;
strt := 5;

SELECT resume
INTO varC
FROM tlob
WHERE no = 1
FOR UPDATE ;

DBMS_LOB.ERASE (varC, LN, strt);
COMMIT;
DBMS_OUTPUT.put_line (‘擦除结果为: ‘ || varC);
END;

④:DBMS_LOB.Trim():截断LOB数据中从第一位置开始指定长度的部分数据的过程;
DBMS_LOB.Trim(LOB数据,截断长度);

例子:
/* Formatted on 2009-12-24 17:45:09 (QP5 v5.115.810.9015) */
DECLARE
varC CLOB;
LN NUMBER (4);
BEGIN
LN := 4;
SELECT resume
INTO varC
FROM tlob
WHERE no = 1
FOR UPDATE ;

DBMS_LOB.TRIM (varC, LN);
COMMIT;
DBMS_OUTPUT.put_line (‘截断结果为: ‘ || varC);
END;

⑤:DBMS_LOB.Copy():从指定位置开始将源LOB复制到目标LOB;
DBMS_LOB.Copy(源LOB,目标LOB,复制源LOB长度,复制到目标LOB开始位置,复制源LOB开始位置)

例子:
/* Formatted on 2009-12-24 17:45:30 (QP5 v5.115.810.9015) */
DECLARE
vDEST_LOB CLOB;
vSRC_LOB CLOB;
AMOUNT NUMBER;
DEST_OFFSET NUMBER;
SRC_OFFSET NUMBER;
BEGIN
SELECT resume
INTO vDEST_LOB
FROM tlob
WHERE no = 1
FOR UPDATE ;

SELECT resume
INTO vSRC_LOB
FROM tlob
WHERE no = 2;

AMOUNT := DBMS_LOB.GetLength (vSRC_LOB);
DEST_OFFSET := DBMS_LOB.GetLength (vDEST_LOB) + 1;
SRC_OFFSET := 1;

DBMS_LOB.COPY (vDEST_LOB,
vSRC_LOB,
AMOUNT,
DEST_OFFSET,
SRC_OFFSET);
DBMS_OUTPUT.put_line (‘拷贝结果为: ‘ || vDEST_LOB);
END;

声明: 除非转自他站(如有侵权,请联系处理)外,本文采用 BY-NC-SA 协议进行授权 | 智乐兔
转载请注明:转自《大对象数据的读取和操作
本文地址:https://www.zhiletu.com/archives-296.html
关注公众号:智乐兔

赞赏

wechat pay微信赞赏alipay pay支付宝赞赏

上一篇
下一篇

相关文章

在线留言

你必须 登录后 才能留言!

在线客服
在线客服 X

售前: 点击这里给我发消息
售后: 点击这里给我发消息

智乐兔官微