DECLARE
TYPE t IS RECORD (
empno NUMBER,
ename VARCHAR2(100)
);
my_t t;
FUNCTION f (
p_empno IN NUMBER,
p_ename IN VARCHAR2
) RETURN t IS
v_res t;
BEGIN
v_res.empno := p_empno;
v_res.ename := p_ename;
RETURN v_res;
END f;
BEGIN
my_t := f(7839, 'KING');
dbms_output.put_line('ID='
|| my_t.empno
|| ' Name= '
|| my_t.ename);
END;
/