Packaged Function

Question

Hey Folks,
Still trying to get a handle on Packages but somewhere I got off the track.
The INOUT parameter returns this error
PLS-00103: Encountered the symbol "CHAR" when expecting one of
the following:
:= . ) , @ % default character
The symbol ":=" was substituted for "CHAR" to continue.
Getting me back on the path would be much appriciated.
Regards,
Mat
VARIABLE g_output VARCHAR2(30)
VARIABLE g_username VARCHAR2(8)
VARIABLE g_password VARCHAR2(8)
VARIABLE g_ck CHAR
BEGIN
:g_username := 'gma1';
:g_password := 'goofy';
:g_ck := 'N';
END;
CREATE OR REPLACE PACKAGE login_pkg IS
FUNCTION log_in_pf
(p_username IN VARCHAR2,
p_password IN VARCHAR2,
p_ck INOUT CHAR)
RETURN CHAR;
END;
CREATE OR REPLACE PACKAGE BODY login_pkg IS
FUNCTION log_in_pf
(p_username IN VARCHAR2,
p_password IN VARCHAR2,
p_ck INOUT CHAR)
RETURN CHAR
IS
lv_username_txt bb_shopper.username %TYPE;
lv_password_txt bb_shopper.password%TYPE;
BEGIN
SELECT username, password
INTO lv_username_txt, lv_password_txt
FROM bb_shopper
WHERE username = p_username
AND password = p_password;
IF lv_username_txt||lv_password_txt = p_username||p_password THEN
p_ck := 'Y';
ELSE p_ck := 'N';
END IF;
RETURN p_ck;
EXCEPTION
WHEN NO_DATA_FOUND THEN
DBMS_OUTPUT.PUT_LINE('Invalid username or password');
END log_in_pf;
END;
BEGIN
:g_output := login_pkg.log_in_pf(:g_username, :g_password, :g_ck);
DBMS_OUTPUT.PUT_LINE( :g_output);
END;
/

Answer 1

Hi,
You must put space between in and out ( IN OUT ).
http://www.psoug.org/snippet/FUNCTIONS_IN_OUT_parameter_873.htm
Regards Salim
SQL>  CREATE OR REPLACE PACKAGE login_pkg IS
  2  FUNCTION log_in_pf
  3  (p_username IN VARCHAR2,
  4  p_password IN VARCHAR2,
  5  p_ck IN OUT CHAR)
  6  RETURN CHAR;
  7* END;
SQL> /
Package created.
SQL>