几个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;