Error while creating function with record type as return type

Question

Hi i tried the following code to get the nth highest sal using record type and function.
CREATE OR REPLACE PACKAGE pack_rec_cur AS
TYPE rec_type IS RECORD (
name EMP.ename%TYPE,
sal EMP.sal%TYPE);
  END;The above package is created
CREATE OR REPLACE
  FUNCTION fun_rec_cur(n INT) RETURN pack_rec_cur.rec_type AS
   rec pack_rec_cur.rec_type;
    CURSOR cur_rec IS
      SELECT ename,sal
        FROM emp
         WHERE sal is not null
          ORDER BY DESC;
BEGIN
OPEN cur_rec;
  FOR i IN 1..n LOOP
   FETCH cur_rec into rec;
   EXIT WHEN cur_rec%NOTFOUND;
  END LOOP;
CLOSE cur_rec;
RETURN rec;
END;   The above function is giving errors
LINE/COL ERROR
4/7      PL/SQL: SQL Statement ignored
7/16     PL/SQL: ORA-00936: missing expression
SQL> Could you please correct me where i'm doing mistake
Thanks.

Answer 1

You are missing the column name in order by clauase. Is it ename desc?
CREATE OR REPLACE
  FUNCTION fun_rec_cur(n INT) RETURN pack_rec_cur.rec_type AS
   rec pack_rec_cur.rec_type;
    CURSOR cur_rec IS
      SELECT ename,sal
        FROM emp
         WHERE sal is not null
          ORDER BY ENAME DESC; ---added ename
BEGIN
OPEN cur_rec;
  FOR i IN 1..n LOOP
   FETCH cur_rec into rec;
   EXIT WHEN cur_rec%NOTFOUND;
  END LOOP;
CLOSE cur_rec;
RETURN rec;
END;  
-OUTPUT
SQL> SET SERVEROUT ON
SQL>
SQL> DECLARE
  2     rec            pack_rec_cur.rec_type;
  3  BEGIN
  4     rec         := fun_rec_cur (6); --you get the 6th record in order of ename desc
  5     DBMS_OUTPUT.put_line ('ename::' || rec.NAME || '  sal ::' || rec.sal);
  6  END;
  7  /
ename::MARTIN  sal ::1250
PL/SQL procedure successfully completed.
SQL>