几个oracle 存储过程的例子

create or replace procedure p_ts_print_asset_v_manage as 

  v_depth integer :=44;

  v_out integer;

 begin

   dbms_output.put_line('ssss');

   p_ts_print(v_depth,v_out);

   dbms_output.put_line(v_out);

 end; 

 

 create or replace procedure p_ts_print(v_depth in integer,v_out out integer)

 as begin

  -- dbms_output.put_line(v_depth);

  v_out:=v_depth+1;

 end;

 

 set serveroutput on;

 exec p_ts_print_asset_v_manage;

 

 set serveroutput on;

 exec p_ts_print(55);

 

 

 CREATE OR REPLACE PROCEDURE HelloWorld1 (p_user_name in VARCHAR2,p_out out varchar2) AS

 BEGIN

 dbms_output.put_line('Hello '||p_user_name||'!');

 p_out:=p_user_name||'你好';

 END HelloWorld1;

 CREATE OR REPLACE PROCEDURE CallHelloWorld1 ( p_user in  VARCHAR2) AS

   v_out varchar2(512);

 BEGIN

 -- 调用存储过程的 存储过程

  HelloWorld1(p_user,v_out);

  dbms_output.put_line(v_out);

 END;

 

 set serveroutput on;

 exec CallHelloWorld1('tangsi');

 

 set serveroutput on;

 declare v_out varchar2(512);

 begin

  HelloWorld1('tangsi',v_out);

 end;