求oracle存储过程实例

[SYS@myoracle] SQL>create user test identified by test;

用户已创建。

[SYS@myoracle] SQL>grant connect ,resource to test;

授权成功。

[SYS@myoracle] SQL>conn test/test
已连接。
[TEST@myoracle] SQL>create or replace procedure my_proc(
  2    i_flag varchar2
  3  )as
  4  begin
  5    if i_flag = '1' then
  6      dbms_output.put_line('Hello World!');
  7    elsif i_flag = '2' then
  8      dbms_output.put_line('Hello China!');
  9    else
 10      dbms_output.put_line('Hello!');
 11    end if;
 12  end;
 13  /

过程已创建。

[TEST@myoracle] SQL>set serveroutput on
[TEST@myoracle] SQL>exec my_proc('1');
Hello World!

PL/SQL 过程已成功完成。

[TEST@myoracle] SQL>exec my_proc('2');
Hello China!

PL/SQL 过程已成功完成。

[TEST@myoracle] SQL>exec my_proc('3');
Hello!

PL/SQL 过程已成功完成。