Как да извикате функция на Oracle с референтен курсор като изходящ параметър от Visual Basic

Трябва да получите четеца от параметъра, а не от командата.

Така че вместо

Dim reader As OracleDataReader = rvCmd.ExecuteReader()

Имате нужда от:

rvCmd.CommandType = CommandType.StoredProcedure
rvCmd.CommandText = "getallprodpckg.get_allcust"

Dim qrySerial3 As New Oracle.DataAccess.Client.OracleParameter(
    None, OracleDbType.RefCursor, ParameterDirection.ReturnValue)

rvCmd.Parameters.Add(qrySerial3)

rvCmd.ExecuteNonQuery()

Dim cursor as OracleRefCursor = DirectCast(qrySerial3.Value, OracleRefCursor)

Dim reader As OracleDataReader = cursor.GetDataReader()