orcale存储过程,无参数,输入参数,输出参数,输出入参数的存储过程

--存储过程  存储过程+包   包+包体
select * from emp;
--1.无参数的存储过程
create or replace procedure sp_emp_proc
 as
--声明语句段
v_name varchar2(200);
begin
--执行语句段
       select ename into v_name from emp where empno=7788;
       dbms_output.put_line(v_name);
       exception
         --异常处理语句段
         when NO_DATA_FOUND  then dbms_output.put_line('NO_DATA_FOUND');
end;
--执行存储过程
declare 
 begin
   sp_emp_proc;--无参数的存储过程 在命令窗口exec sp_emp_proc;
 end;
 
 --2.带输入参数的存储过程
 create or replace procedure  sp_emp_proc_in
 (v_id in emp.empno%type)
as
 --声明语句段
 v_name varchar2(200);
begin
--执行语句段
 select ename into v_name from emp  where empno=v_id;


 dbms_output.put_line(v_name);
       exception
         --异常处理语句段
         when no_data_found  then dbms_output.put_line('NO_DATA_FOUND');
end;


--执行存储过程
declare 
v_id  emp.empno%type:=7499;
begin
  sp_emp_proc_in(v_id);
  end;
--3.带输出参数
create or replace procedure sp_emp_proc_out
(v_name out emp.ename%type)
as
--声明语句段
begin
  --执行语句段
  select ename into v_name from emp where empno=7499;
  dbms_output.put_line(v_name);
  exception
    --异步处理语句
    when no_data_found then dbms_output.put_line('NO_DATA_FOUND');
end;


--执行存储过程
declare
v_name nvarchar2(200);
begin
  sp_emp_proc_out(v_name);
end;


--3.带输出和带输入的存储过程
create or replace procedure sp_emp_proc_in_out
(
eno in number,
salary out number
)
as
begin
       select sal into salary from emp where empno=eno;
       exception
         when no_data_found then dbms_output.put_line('没有找到该编号的员工');  
end;


--执行存储过程
declare
salary number(7,2);
begin
  sp_emp_proc_in_out(7788,salary);
  dbms_output.put_line(salary);
end;


 

你可能感兴趣的:(Oracle)