从oracle中的函数返回多个值

Question

我有下表：

T_TYPE_ID T_TYPE     T_TYPE_PRICE T_TYPE_START_DATE   T_TYPE_END_DATE    
   1      student       10.95     01.04.2015 00:00:00 30.06.2015 00:00:00
   2      Concession    5.5       01.04.2015 00:00:00 30.06.2015 00:00:00

我需要： 创建FUNC_get_ t_type_end_date function 此函数应包含以下输入参数：t_type_p 和以下输出参数：t_type_price_p 和 t_type_end_date_p。如果有一条t_type为t_type_p的记录，它应该返回1，否则返回0。此外，如果有一条记录，它应该将最新的t_type_end_date分配给t_type_end_date_p，将t_type_price分配给t_type_price_p。请注意t_type_end_date_p 可以为空；这意味着相关价格当前有效。

我写了以下代码：

CREATE OR REPLACE FUNCTION FUNC_get_t_type_end_date
  ( t_type_p IN VARCHAR2)
RETURN NUMBER
    AS
    cnum NUMBER;

    CURSOR cr1 IS
    SELECT t_type
      FROM ticket_type
      WHERE t_type = t_type_p;

  BEGIN
  OPEN cr1;
    FETCH cr1 INTO cnum;
    IF cr1%NOTFOUND THEN
      cnum := 0;
      END IF;
      CLOSE cr1;

     RETURN cnum;
   END;

我不知道如何从一个函数返回多个值。我正在使用 oracle。

提示：

create or replace FUNCTION FUNC_get_ t_type_end_date (…)
return number 
as   
    -- define a variable to return a number and assign 0 to it
    -- define a cursor to obtain t_type_price, t_type_end_date of the given t_type_p. The t_type_end_date values should be sorted in descending order – to do so the first record will contain either null or the latest of t_type_end_date
BEGIN
  -- open cursor
  -- fetch the first record from the cursor to t_type_price_p and t_type_end_date_p
  -- if (having a record) then …  
  -- close cursor
  RETURN …
END;

Answer 1

函数不能返回多个变量。但是，可以返回包含多个值的自定义变量（即记录）类型。为此，您首先需要定义包含您要返回的三个变量的类型，如下所示：

TYPE new_type is record(cnum number, t_type_end_date_p timestamp, t_type_price_p  timestamp);

然后你可以在你的函数中使用它，如下所示：

CREATE OR REPLACE FUNCTION FUNC_get_t_type_end_date  ( t_type_p IN VARCHAR2)
RETURN new_type AS 

new_type_variable newtype;

CURSOR cr1 IS
SELECT t_type
  FROM ticket_type
  WHERE t_type = t_type_p;

BEGIN
OPEN cr1;
FETCH cr1 INTO cnum;
IF cr1%NOTFOUND THEN
  SELECT 0, null, null into new_type_variable from dual;
ELSE
  SELECT 1, cr1.t_type_end_date, cr1.t_type_price into new_type_variable from dual;
END IF;
  CLOSE cr1;

 RETURN new_type_variable ;
END;

Answer 2

试试这个：

create or replace function func_get_t_type_end_date(t_type_p in varchar2, t_type_price_p out number, t_type_end_date_p out date) return number
    as
        cnum NUMBER;

    CURSOR cr1 IS
    SELECT t_type_price,t_type_end_date
    FROM ticket_type t
    WHERE t_type = t_type_p
        and not exists (select 1
                                  from ticket_type t2
                                  where t2.t_type = t.t_type
                                  and t2.t_type_end_date>t.t_type_end_date);

  BEGIN
  OPEN cr1;
    FETCH cr1 INTO t_type_price_p,t_type_end_date_p;
    IF cr1%NOTFOUND THEN
      cnum := 0;
            else
            cnum := 1;
      END IF;
      CLOSE cr1;

     RETURN cnum;   end;

使用示例：

set serveroutput on
declare
v_result number;
v_type_price_p number;
v_type_end_date_p date;
begin
    v_result:=func_get_t_type_end_date(t_type_p=>'student',t_type_price_p=>v_type_price_p,t_type_end_date_p=>v_type_end_date_p);
    dbms_output.put_line('Result: '||v_result);
    dbms_output.put_line('Price: '||v_type_price_p);
    dbms_output.put_line('End date: '||v_type_end_date_p);        
end;
/