隐式游标与程序包

Posted 挽你何用

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了隐式游标与程序包相关的知识,希望对你有一定的参考价值。

隐式游标
          sql游标
                 insert
                 delete
                 update
                 select(返回单行记录的查询)
引用游标类型
          type stucursor is ref cursor;
程序包和程序包体
          create or replace package pname as
                      procedure p1(b in varchar2);
                      function f1(a in number);
          end pname;

          create or replace package body pbname as
                      procedure p1(b varchar2) as
                      begin
                              dbms_output.put_line(123);
                      end;
          end pbname;

 

隐式游标:

 

Declare 

Begin
  /*
  insert
  update
  delete
  select(返回单行的查询)
  */
  Update student s Set s.sbirthday = s.sbirthday + 3650 Where s.class=95031;
  If Sql%Found Then 
    dbms_output.put_line(数据更新成功!);
    --修改的行数
    dbms_output.put_line(Sql%Rowcount);
    Commit;
  Else 
    dbms_output.put_line(更新失败!);
  End If;
End;

 

构建程序包:

 

--构建程序包
Create Or Replace Package stuinfo As
     Type stucur Is Ref Cursor;
     --存储过程
     Procedure showname(scla In Number,stus Out stucur);
     End stuinfo;
     
--构建程序包体
Create Or Replace Package Body stuinfo As
     Procedure showname (scla In Number,stus Out stucur)As
       Begin
         Open stus For Select * From student s Where s.class=scla;
       End;
End stuinfo;

 

调用程序包

--调用程序包存储过程
Declare 
  i Integer;
  --引用游标
  Type stuc Is Ref Cursor;
  sts stuc;
  stu student%Rowtype;
Begin
  stuinfo.showname(95033,sts);
  Loop
    Fetch sts Into stu ;
    Exit When sts%Notfound;
    dbms_output.put_line(stu.sname);
  End Loop;
End;

 

以上是关于隐式游标与程序包的主要内容,如果未能解决你的问题,请参考以下文章

oracle游标的使用

Oracle 游标简介

TCL语句是否属于隐式游标?

oracle 游标是做啥用的

oracle的隐式游标

oracle 隐式游标,显示游标,游标循环,动态SELECT语句和动态游标,异常处理,自定义异常