How to use ODBC to run an Oracle Stored Procedure in VB.NET

cn = New OdbcConnection("DRIVER={Oracle in OraHome81};SERVER=yourserver;UID=yourid;" _
& "PWD=yourpassword;DBQ=yourserver;")

'Procedure being tested. Input parameters unit number, event id, result date, medcin id list
Dim myRunSP As String = "CALL acpg_v1_pkg.process_event_medcin_ids()"
cmd = New OdbcCommand
cmd.CommandType() = CommandType.StoredProcedure
cmd.CommandText = myRunSP
cmd.Parameters.Add(New OdbcParameter("p_Unit_Number", OdbcType.Numeric)).Value = 90909090
cmd.Parameters.Add(New OdbcParameter("p_Event_Id", OdbcType.Numeric)).Value = 1
cmd.Parameters.Add(New OdbcParameter("p_result_ncid_list", OdbcType.VarChar)).Value = 1
cmd.Parameters.Add(New OdbcParameter("p_result_date", OdbcType.Date)).Value = Now

cn.Open()
cmd.Connection = cn
cmd.ExecuteNonQuery()