Executar Procedure através de um WebService VB.Net

Executar Procedure através de um WebService VB.Net

Boa Noite. Tenho uma Dúvida.
Estou fazendo um WebService para acessar uma procedure que fiz.
Estou tendo dificuldades por ser novo na área.
Primeiramente fiz a classe com as propriedades publicas que iriam armazenar os valores para mais parte passar para procedure que por sua vez vai inserir dados no banco.

Aí está minha classe
```
Public Class clsMaquinario

Private _container As String
Private _statusMaq As String
Private _usuario As String
Private _data As String

Public Property Container() As String
Get
Return _container
End Get
Set(ByVal value As String)
_container = value
End Set
End Property

Public Property StatusMaq() As String
Get
Return _statusMaq
End Get
Set(ByVal value As String)
_statusMaq = value
End Set
End Property

Public Property Usario() As String
Get
Return _usuario
End Get
Set(ByVal value As String)
_usuario = value
End Set
End Property

Public Property Data() As String
Get
Return _data
End Get
Set(ByVal value As String)
_data = value
End Set
End Property


End Class
```
--

Estou fazendo isso com base em outro pronto. Minha duvida é a seguinte, coloco o método para acessar o banco e executar a procedure na própria classe ?
E se sim, como ? Pois tenho um exemplo que me foi dado para seguir só que sem procedure, enviando o select direto para o Banco. O Exemplo é esse

```
Function LIB_VAZIO_EXPORTACAO_INTERNO(ByVal Container As String) As clsLibVazioExportacao

Dim StrSql As String
Dim libVazio As New clsLibVazioExportacao
Dim rscmdAux As SqlClient.SqlDataReader
Dim acessa As New AcessoDAO.Banco

Try
StrSql = ""
StrSql = StrSql & "Select Cod_Armador, Nome_Armador, Conteiner, Tipo_Iso, "
StrSql = StrSql & "Tipo, Tara, Mgw, N_Booking, N_Lacre, Cod_Porto, "
StrSql = StrSql & "Nome_Porto, Dt_Saida, Nome_Exportador, Num_Intercambio "
StrSql = StrSql & "from v_lib_exportacao_interno "
StrSql = StrSql & "where Conteiner = '" & Container & "'"

rscmdAux = acessa.RetornaDataReader(StrSql)

............

Return libVazio

End Function
```