我想把SqA返回給某個變量,要怎么實現啊

Question

create or replace procedure ReturnName_1
as 
 sourcename varchar(2000);
 zdname varchar(2000);
 SqA varchar(2000);
 cursor bb  is
        select A1, A2 from zdname a left join 
        (select  column_name from user_tab_columns
        where upper(Table_name)=Upper('contenta')) b
        on Upper(a.a1)=Upper(b.column_name);
 begin
       open bb;
       loop
         fetch bb 
         into sourcename,zdname;
         exit when bb%notfound;
          SqA:=SqA||','||sourcename||' as '||zdname; 
       end loop;
         SqA:=substr(SqA,2);
         dbms_output.put_line(SqA);
      close bb;
 end;
我想把SqA返回給某個變量,要怎么實現啊

Answer 1

create or replace procedure proc_num(num1 number,num2 number,v_result out number)
is
begin
v_result := num1 + num2;
end proc_num;
/
declare
v_result number;
begin
proc_num(1,1,v_result);
dbms_output.put_line(v_result);
end;
/