培训机构的Oracle学习笔记5.doc

数据库查询的结果本质上是一个游标 所以在调用一个查询功能，得到的其实是一个游标,然后从游标中将结果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; begin 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%ro