create or replace procedure login_user (users_rec OUT emp%ROWTYPE)
IS
CURSOR users_cur IS
SELECT * FROM emp;

BEGIN
OPEN users_cur;
FETCH users_cur INTO users_rec;
END;

/* Formatted on 2007/07/15 21:26 (Formatter Plus v4.8.7) */
CREATE OR REPLACE FUNCTION login_users (NAME_IN emp.ename%TYPE)
    RETURN  emp%ROWTYPE
IS
   CURSOR users_cur (n IN VARCHAR2)
   IS
      SELECT *
        FROM emp
       WHERE ename = n;

   users_rec   users_cur%ROWTYPE;
BEGIN
   OPEN users_cur (NAME_IN);

   FETCH users_cur
    INTO users_rec;

    IF  users_cur%ROWCOUNT =  0 
   THEN
       RETURN   NULL ;
    ELSE 
       RETURN  users_rec;
   END  IF ;
END;