Newbie in REF CURSOR

[ricky_th]

Hi there!

I'm a beginner in vb.net and oracle8.1.7.4... I have a questions to ask for help & advice. When I create REF CURSOR to use with record navigation but it will display error like this:

An unhandled exception of type 'Oracle.DataAccess.Client.OracleException' occurred in oracle.dataaccess.dll

Additional information: System error.

I can connect database, populate on dataset and also run PACKAGES test. However, everytime I run application, it will display error.

************** PACKAGE & PACKAGE BODY****************
PACKAGE "COMPUTER"."PACKAGE1" IS
TYPE BCursor IS REF CURSOR;
PROCEDURE METHOD1 (
BankCode OUT BCursor);
END PACKAGE1;

PACKAGE BODY "COMPUTER".PACKAGE1 AS
PROCEDURE METHOD1 (BankCode OUT BCursor)
IS
BankCodeCur BCursor;
BEGIN
OPEN BankCodeCur FOR
SELECT * FROM BANK ORDER BY Bank_id;

BankCode := BankCodeCur;

END METHOD1;
END PACKAGE1;

**************** PAGE_LOAD ****************
Dim ConnectionString As String = ("Data source=FINN;User ID=COMPUTER;Password=123")
dcFinn = New OracleConnection(ConnectionString)
dcFinn.Open()

daFinn.SelectCommand = New OracleCommand("SELECT * FROM Bank", dcFinn)

Dim dsFinn As DataSet = New DataSet("Bank")
daFinn.Fill(dsFinn, "Bank")
dgrBank.SetDataBinding(dsFinn, "Bank")

FinnCmd.CommandText = "PACKAGE1.METHOD1"
FinnCmd.CommandType = CommandType.StoredProcedure
FinnCmd.Connection = dcFinn
FinnCmd.Parameters.Add(New OracleParameter("BANKCODE", OracleDbType.RefCursor,
ParameterDirection.Output))
daFinn = New OracleDataAdapter(FinnCmd)
dsFinn = New DataSet("dsFinn")
daFinn.Fill(dsFinn, "BANK") <===========ERROR DISPLAYED AT HERE!!!

***************** NAVIGATION (NEXT) ***************************
Me.BindingContext(dsFinn.Tables("Bank")).Position -= 1

Please advise me how to solve it.

Regards,
Ricky