User-defined function in package

Question

Hi all,
is it possible to return more than 1 value when using user-defined function in package?

Answer 1

I'll try to describe my situation. My need is to find correct client type by its cid number. If it's individual (ct.officialtype = 3) then function returns 3. If it's not individual (ct.officialtype <> 3) then function should check ENTERPRISETYPE.id, 910 is small business (function should return 1), else it returns 2. You can find my try below, it returns
ORA-24344: success with compilation error
13/29   PLS-00201: identifier 'US1' must be declared
13/34   PL/SQL: ORA-00904: : invalid identifier
13/1    PL/SQL: SQL Statement ignored
17/4    PLS-00201: identifier 'US1' must be declared
17/1    PL/SQL: Statement ignored
9/13    PLS-00323: subprogram or cursor 'F_CLIENTTYPE' is declared in a package specification and must be defined in the package bodyCould you please give me solution on how do I write this procedure? It should be procedure, because I need to use it in SELECT statement.
CREATE OR REPLACE PACKAGE creator.marco_function_clienttype
  IS
  -- 0 - not found
  -- 1 - small business
  -- 2 - corporate
  -- 3 - individual
   FUNCTION f_clienttype
     (cid number
     RETURN NUMBER;
END;
CREATE OR REPLACE PACKAGE BODY creator.marco_function_clienttype
IS
FUNCTION f_clienttype
     (ccid number)
     RETURN NUMBER
IS
    Us NUMBER;
Begin
--officialtype = 2 - corporate, officialtype = 3 - individual
select ct.officialtype into Us1
from contragenttype ct, contragent d
where d.id = ccid and ct.cid = d.contragenttypeid;
IF Us1 = 3 THEN
select '3' as t into Us from dual;
ELSE
--ENTERPRISETYPE.id = 910 - small business
select dd.enterprisetypeid into Us2
from contragent dd
where dd.id = ccid ; 
IF Us2 = 910 THEN
select '1' as t into Us from dual;
ELSE
select '2' as t into Us from dual;
END IF;
END IF;
Return nvl(Us,0);
END;
END;
/