plsql 过程 case when

create or replace 

procedure emp_age  (var_ename in  varchar2,var_message out varchar2) is 

type emp_info is record (

var_name varchar2(50),

var_age  number

);

empinfo emp_info;

begin

  select e.name,e.age into empinfo from t_emp e where e.name=var_ename;

case  empinfo.var_age 

when 25 then 

var_message:='25';

when 20 then 

var_message:='20';

when 21 then 

var_message:='21';

when 23 then 

var_message:='23';

else 

var_message:='对不起 不合法哦 你输入的对象';

end case ;

    exception

     when NO_DATA_FOUND then

      dbms_output.put_line('错误没有找到数据'); 

end;

转载于:https://my.oschina.net/zhangtiant/blog/596313