Oracle存储过程中Procedure简单分析

今天就跟大家聊聊有关Oracle存储过程中Procedure简单分析，可能很多人都不太了解，为了让大家更加了解，小编给大家总结了以下内容，希望大家根据这篇文章可以有所收获。

10年积累的成都网站设计、成都做网站经验，可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你，你也不认识我。但先网站制作后付款的网站建设流程，更有佳木斯免费网站建设让你可以放心的选择与我们合作。

这里我们来讨论存储过程的一些高级选项：cursor游标
游标是SQL的一个内存工作区，由系统或用户以变量的形式定义。游标的作用就是用于临时存储从数据库中提取的数据块。在某些情况下，需要把数据从存放在磁盘的表中调到计算机内存中进行处理，最后将处理结果显示出来或最终写回数据库。这样数据处理的速度才会提高，否则频繁的磁盘数据的io交换会降低效率，影响速度。这也是引入游标概念的一个原因。


cursor游标可以分为三种类型：隐式cursor、显式cursor和动态(ref) cursor
1、首先介绍一下隐式cursor
对于select…into…语句，一次只能从数据库中获取到一条数据，对于这种类型的DML Sql语句，就是隐式Cursor。例如：Select / Update / Insert/ Delete操作。 
作用：可以通过隐式cursor的属性来了解操作的状态和结果，从而达到流程的控制。Cursor的属性包含： 
SQL%ROWCOUNT 整型 代表DML语句成功执行的数据行数 
SQL%FOUND 布尔型 值为TRUE代表插入、删除、更新或单行查询操作成功 
SQL%NOTFOUND 布尔型 与SQL%FOUND属性返回值相反 
SQL%ISOPEN 布尔型 DML执行过程中为真，结束后为假 
隐式Cursor是系统自动打开和关闭Cursor. 


下面举个例子：
create or replace procedure Obj_up as
begin
  update obj set object_name = 'MyMarry' where object_id = '3';
  if SQL%Found then 
    dbms_output.put_line('Object_name is updated successfully!');
    commit;
  else
    dbms_output.put_line('Object_name is updated failed!');
  end if;
end;
执行这个存储过程
begin
  -- Call the procedure
  obj_up;
end;


2、然后介绍一下显式cursor
对于从数据库中提取多行数据，就需要使用显式Cursor。显式Cursor的属性包含： 
游标的属性 返回值类型意义
%ROWCOUNT 整型 获得FETCH语句返回的数据行数 
%FOUND 布尔型 最近的FETCH语句返回一行数据则为真，否则为假 
%NOTFOUND 布尔型 与%FOUND属性返回值相反 
%ISOPEN 布尔型 游标已经打开时值为真，否则为假


对于显式游标的运用分为四个步骤： 
定义游标—Cursor [Cursor Name] IS
打开游标—Open [Cursor Name]
操作数据—Fetch [Cursor name]
关闭游标—Close [Cursor Name]这个步骤不要遗漏。 

下面举个例子：
create or replace procedure proc_salary is
  --定义变量
  v_empno emp.empno%TYPE;
  v_ename emp.ename%TYPE;
  v_sal   emp.sal%TYPE;
  --定义游标
  CURSOR emp_cursor IS
    SELECT empno, ename, sal from emp;
BEGIN
  --循环开始
  LOOP
    IF NOT emp_cursor%ISOPEN THEN
      OPEN emp_cursor;
    END IF;  
    FETCH emp_cursor
      INTO v_empno, v_ename, v_sal;
    --退出循环的条件
    EXIT WHEN emp_cursor%NOTFOUND OR emp_cursor%NOTFOUND IS NULL;
    dbms_output.put_line('emp no ' || v_empno || ' name is ' || v_ename || 'salary is ' ||
                         v_sal);
  END LOOP;
END;
/
执行
begin
  proc_salary;
end;

3、最后介绍一下动态cursor
静态游标在执行前就能确定对应查询语句，最多只是传递一些查询参数而已，所以比较容易处理。动态游标是在执行前查询SQL是动态拼接的，不确定具体查询那些表和条件。
与隐式Cursor,显式Cursor的区别，Ref Cursor是可以通过在运行期间传递参数来获取数据结果集。而另外两种Cursor，是静态的，在编译期间就决定数据结果集。 
Ref cursor的使用
Type [Cursor type name] is ref cursor 
Define 动态的Sql语句 
Open cursor 
操作数据—Fetch [Cursor name] 
Close Cursor 

下面举个例子
动态SQL作为游标执行的语句，定义时仅说明类型，打开时指定SQL.循环处理是采用loop，所以需要手动结束。

create or replace PROCEDURE PX_VARIFY_ZRP_EXT_MATCH(V_TABLE_NAME IN VARCHAR2,
                                                    V_IMPORT_ID  IN VARCHAR2) AS
  V_SQL  VARCHAR2(1024);
  VU_SQL VARCHAR2(1024);
  TYPE CV_PERSONS IS REF CURSOR;
  CV_PERSON CV_PERSONS;
  V_ID      NAT_PERSON_INFO.ID%TYPE; -- ID    
  V_ID_TYPE NAT_PERSON_INFO.ID_TYPE%TYPE; -- 证件类型  
  V_ID_CODE NAT_PERSON_INFO.ID_CODE%TYPE; -- 证件号码  
  V_PERSON_ID VARCHAR2(36); -- 返回主体ID  
  V_CNT       NUMBER(5, 0); -- 符合条件记录数  
BEGIN
  V_SQL := 'SELECT ID,ID_TYPE,ID_CODE ';
  V_SQL := V_SQL || ' FROM ' || V_TABLE_NAME;
  V_SQL := V_SQL || ' WHERE IMPORT_ID = ' || V_IMPORT_ID;
  OPEN CV_PERSON FOR V_SQL;
  LOOP
    FETCH CV_PERSON
      INTO V_ID, V_ID_TYPE, V_ID_CODE;
    EXIT WHEN CV_PERSON%NOTFOUND;
    PX_VARIFY_ZRP_IDS_ATOM(V_ID_TYPE, V_ID_CODE, V_PERSON_ID, V_CNT);
    IF V_CNT = 1 AND V_PERSON_ID IS NOT NULL THEN
      VU_SQL := 'UPDATE ' || V_TABLE_NAME || ' SET PERSON_ID = ''' ||
                V_PERSON_ID || ''' WHERE ID = ''' || V_ID || '''';
    END IF;
    IF V_CNT = 0 AND V_PERSON_ID IS NULL THEN
      VU_SQL := 'UPDATE ' || V_TABLE_NAME ||
                ' SET IMPORT_CHECK_FLAG = ''0'' , ';
      VU_SQL := VU_SQL || ' CHECK_ERR_MSG = CHECK_ERR_MSG || ' ||
                ''' 验证规则代码:1001;错误描述:未找到对应自然人信息.''';
      VU_SQL := VU_SQL || ' WHERE ID = ''' || V_ID || '''';
    END IF;
    DBMS_OUTPUT.PUT_LINE(VU_SQL);
    execute immediate VU_SQL;
  END LOOP;
执行
begin
  PX_VARIFY_ZRP_EXT_MATCH;
end;

看完上述内容，你们对Oracle存储过程中Procedure简单分析有进一步的了解吗？如果还想了解更多知识或者相关内容，请关注创新互联行业资讯频道，感谢大家的支持。