Listing B
Dim conn As New OracleConnection()
Dim comm As New OracleCommand()
Dim pOutput As OracleParameter
Dim dr As OracleDataReader
conn.ConnectionString = “data source=oracle.server;user id=test;password=test”
comm.CommandText = “DATABASE.STORED_PROCEDURE_NAME”
comm.CommandType = CommandType.StoredProcedure
pOutput = comm.Parameters.Add(“pcur”, OracleClient.OracleType.Cursor)
pOutput.Direction = ParameterDirection.Output
comm.Connection = conn
conn.Open()
dr = comm.ExecuteReader()