Oracle存储过程（二）

存过：

create or replace procedure add_one_student 
as 
  v_name varchar2(20):='zhugeliang';
  v_age number:=16;
begin
  insert into student values(student_id.nextval,'zhugeliang','111111','18998989898','luoyang',v_age,v_name);
  exception
    when others then
      dbms_output.put_line('插入数据失败');
end;

执行：

execute add_one_student();
commit;

比较两个数据：

create or replace procedure compare_number(n1 in number,n2 in number)
as
 v_n1 number;
 v_n2 number;
 v_result varchar2(20);
begin
  v_n1:=n1;
  v_n2:=n2;
  if v_n1 is null or  v_n2 is null then
    v_result:='undefined';
  elsif v_n1>v_n2 then
    v_result:='v_n1 is big number';
  else
    v_result:='v_n2 is big number';
  end if;
    dbms_output.put_line('v_result='||v_result);
end;
 

执行：

execute compare_number(100，200)；

commit;

 

存过三：

create or replace procedure test_case(str in char)
as
 grade char;
 remark varchar2(100);
begin
  grade:=str;
  case grade
    when 'A' then remark:='AAAAAAAAA';
    when 'B' then remark:='BBBBBBBBB';
    when 'C' then remark:='CCCCCCCCC';
    when 'D' then remark:='DDDDDDDDD';
    else remark:='no grade';
  end case;
   dbms_output.put_line('remark='||remark);
end;

执行：

 execute test_case('C');

转载于:https://my.oschina.net/royweb/blog/712518