oracle存储过程,游标定义,匿名块已完成,dbms_output控制块输出

create table emp 
( id varchar2(10),
name varchar2(20),
sex number,
duty varchar2(20)
);
 
insert into emp values('001','Tom',1,'gcs');
insert into emp values('002','John',1,'dba');
insert into emp values('003','Jean',0,'gcs');
insert into emp values('004','Reid',1,'gcs');
commit;
 
 
create or replace procedure pro6 as  --创建存储过程pro6
 
  cursor cr is   --定义游标
    select *
      from emp
     where sex = 1
       and duty = 'gcs';
begin
  for cr_result in cr loop
    begin
      dbms_output.put_line('ID: ' || cr_result.id || ' NAME: ' ||
                           cr_result.name);
     
    end;
  end loop;
end pro6;

执行存储过程并输出
set serveroutput on;  --这个只能在SQL PLUS里面使用,意思是在窗口里显示服务器输出信息,不执行此语句会显示匿名块已完成,而不会有输出内容
BEGIN
  PRO6(); 
END;
展开阅读全文

没有更多推荐了,返回首页