Oracle 存储过程笔记

最新推荐文章于 2025-07-15 14:09:14 发布

原创最新推荐文章于 2025-07-15 14:09:14 发布 · 119 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#Oracle #存储过程 #动态游标

数据库专栏收录该内容

13 篇文章

订阅专栏

本文提供Oracle数据库中使用PL/SQL开发存储过程的实例教程，包括基本流程、异常处理、动态游标及匿名过程等，有助于快速掌握PL/SQL编程技巧。

写Oracle存储过程习惯用PL/Sql dev，里面有一些模版，我这里也记录一些目前经常使用的一些：

--基本例子
create or replace procedure TestProc as
begin
for c in (select fieldName from tableName)
loop
dbms_output.put_line(c.fieldName);
end loop;
endTestProc ;

--带异常处理
create or replace procedure test2 as
--局部变量
vc varchar2(2048);
begin
--过程体卸载这里

Raise cust_exception;
-- 异常处理
EXCEPTION
when cust_exception then
       dbms_output.put_line('custom exception');
WHEN OTHERS THEN
    --回滚
    ROLLBACK;
    dbms_output.put_line('Other Errors');
    RETURN;
    --END;
end test2;

--匿名过程，常用于临时处理数据
DECLARE

--局部变量

l_elem MDSYS.SDO_ELEM_INFO_ARRAY;

l_ord MDSYS.SDO_ORDINATE_ARRAY;

l_srid NUMBER := 262148; -- Arbritrary X-Y Meters

l_gtype NUMBER := 2002; -- 2d Line

j NUMBER;

x NUMBER;

y NUMBER;

BEGIN

l_elem := MDSYS.SDO_ELEM_INFO_ARRAY();

l_ord := MDSYS.SDO_ORDINATE_ARRAY();

l_elem.EXTEND(3);

l_elem(1) := 1;

l_elem(2) := 2; -- etype line

l_elem(3) := 1; -- interpretation straight segments

--for循环

for j in 1 .. 1500 LOOP

x := j;

y := mod(j, 2);

l_ord.EXTEND(2);

l_ord(l_ord.LAST - 1) := x;

l_ord(l_ord.LAST) := y;

END LOOP;

INSERT INTO SHAPELY (entid, coordinates)

values ('BINDVAR', MDSYS.SDO_GEOMETRY(l_gtype, l_srid, NULL,l_elem, l_ord) );

end;

--动态游标,带参数，返回值
create or replace function TestProc(v in varchar2) return varchar2 is
strSql varchar2(4056);--SQL语句
type rCursor is ref cursor; --游标类型
cur rCursor;--定义游标
begin
--拼装语句
strSql := 'select field1 from tabName where field2 = ' || v;

open cur for strSql;

   LOOP
     dbms_output.put_line(cur.field1);
   END LOOP;
   CLOSE cur; --关闭游标
return('OK');
end TestProc;