VB Oracle stored procedure problem

I have a new VB 6 project, and I have successfully created a data environment that connects to my oracle server (they don't make this easy!!).
In my oracle server, I have the following stored procedure:

CREATE OR REPLACE FUNCTION checkLogin(checkUsername CHAR, checkPassword CHAR) RETURN BOOLEAN IS

	CURSOR filterUsername IS
		SELECT * FROM AllEmployees 

	FOR eachFilterUsername IN filterUsername LOOP
		IF (eachFilterUsername.password = checkPassword) THEN
			RETURN TRUE;
			EXIT;
		END IF;
	END LOOP;
	RETURN FALSE;

	IF checkLogin(‘Doc1', 'Doc1Pass') THEN
		DBMS_OUTPUT.PUT_LINE(‘Login ok');
	ELSE
		DBMS_OUTPUT.PUT_LINE(‘Unauthorised login');
	END IF;

Set dataEnviron = New dataEnv
Set DBconn = dataEnviron.OracleConn
DBconn.Open
Dim checkLoginCmd As New ADODB.Command
Dim returnBoolean As Boolean
returnBoolean = dataEnviron.AJIMALJ0_CHECKLOGIN(username, password) checkLogin = returnBoolean

I get the following error

Run-time error '-2147467259 (80004005)': [Oracle][ODBC][Ora]ORA-06550: line 1, cloumn 13: PLS-00382: expression is of wrong type
ORA-06550: line 1, column 7:
PL/SQL: Statement ignores

I am almost 100% sure this is because of the way vb passing the variables to oracle, but I am unsure how to fix it. I have checked the parameters in teh dataenvironment and they all seem right.

Any help good be greatly appriciated

Jagdip Singh Ajimal Received on Mon Feb 16 2004 - 16:40:26 CET