培训机构的oracle学习笔记5.docx

数据库查询的结果本质上是一个游标 所以在调用一个查询功能，得到的其实是一个游标 ,然后从游标中将结果 loop 出来 . 将游标看成数据库对其他应用程序提供数据的接口。 游标返回所有学生信息 -和欢迎消息 -使用 sql/plus 调用存储过程显示所有游标数据 -in out 模 式的使用 注意： 函数的返回值类型问题，参数的模式 in 、 out 、in out 返回所有学生信息 function querystu return rec is rrc rec; begin open rrc for select * from stu; return rrc; end; 调用 declare type re is ref cursor; rre re; rs stu%rowtype; begin rre:=p_stumanger.querystu; loop fetch rre into rs; exit when rre%notfound; dbms_output.put_line(rs.sid||rs.stno||rs.sname||rs.sage||rs.sqq); end loop; end; --根据条件查询，返回所有学生信息和欢迎消息的函数 procedure querystu(s_sex stu.ssex%type,msg out varchar2 ,re out rec) is begin open re for select * from stu; msg:= 欢迎您查询本系统 ; end; 调用 declare s_sex stu.ssex%type; msg varchar2(100); type r is ref cursor; rr r; s stu%rowtype; begin p_stumanger.querystu(s_sex=s_sex,msg = msg,re = rr); loop fetch rr into s; exit when rr%notfound; dbms_output.put_line(s.sid); end loop; end; user_objects 数据字典，查询所有的对象 select * from user_objects; select * from user_objects where OBJECT_TYPE=FUNCTION; 使用 sql/plus 调用存储过程显示所有游标数据 ,注意，和 pl/sql 程序块区分开 定义包 定义过程，过程可定义游标类型的参数 out 模式 sqlvar r refcursor; sqlset autoprint on; sqlexec 包名 . 过程名 (:r); 注意：in out模式的使用，此例ena参数既可以接收值，又可以带出去一个同类型的值 create or replace package body pemp is procedure query(ena in out emp.ename%type) is re emp%rowtype; begin select * into re from emp where ename=ena; ena:=你好； end; end； 调用 declare en emp.ename%type； en:=SMITH; pemp.query(ena=en);1、en将值传给ena 2、过程执行完毕，由 ena再将值带出来传给 en dbms_output.put_line(en); end; 学生管理系统 -包头-包体 -6个功能函数或过程 模块一：学生基本信息管理模块包，此模块包包含 6 个功能函数或过程，分别如下说明 包头 create or replace package p_stumanger is --type t_stu is table of stu%rowtype index by binary_integer; type rec is ref cursor; --新生注册 function addstu(s_name stu.sname%type,s_sex stu.ssex%type,s_age stu.sage%type,s_add stu.sadd%type,s_qq stu.sqq%type,s_email stu.semail%type) return int; --学生删除 procedure delstu(s_id in out stu.sid%type); --更新学生 procedure updatestu(rstu stu%rowtype,r out int); --复制表数据到另一个表中 function copystu(t rec,m