函数的输出问题

[tuanyuan]

我写了一个函数如下，想测试它的输出数据，请指点。
create or replace function test_function(xh in number) return number is
sum1 number;
sum2 number;
begin
sum1:=xh*1;
sum2:=xh*2;
return(sum1);
return(sum2);
end test_function;

执行如下：仅显示sum1的值，如何才能显示sum2的值，我该如何调用该函数。
declare
li number;
begin
li:=test_function(2);
dbms_output.put_line(to_char(li));
end;

[phq]

create or replace procedure test_function (xh in number) is
sum1 number;
sum2 number;
begin
sum1:=xh*1;
sum2:=xh*2;
dbms_output.put_line ( sum1);
dbms_output.put_line ( sum2);
end test_function;


declare
v_number number:=100 ;
begin
test_function(v_number);
end;

[black_snail]

May I remind you to open the serveroutput option before executing the pg.

set serveroutput on

[leiyi]

create or replace procedure test_function(xh in number,sum1 in out number,sum2 in out number) is
begin
sum1:=xh*1;
sum2:=xh*2;
end test_function;

declare
li1 number;
li2 number;
begin
test_function(2,li1,li2);
dbms_output.put_line(to_char(li1));
dbms_output.put_line(to_char(li2));
end;