Dim PLSQL As String = "BEGIN " & _
                                  "SELECT * FROM TABLE; " & _
                                  "END;"
Dim cmd As OracleCommand = New OracleCommand()
cmd.CommandText = PLSQL
cmd.Connection = con
cmd.CommandType = CommandType.Text
Dim read As OracleDataReader = cmd.ExecuteReader()
Return True