Visual Basic.NET - problema con salida de datos

   
Vista:

problema con salida de datos

Publicado por juan (46 intervenciones) el 23/06/2009 21:38:56
Tengo un problema con este errror
SqlParameterCollection no contiene SqlParameter con ParameterName '@valor'.
siendo que el procedimiento tengo asi
CREATE PROCEDURE [dbo].[DAU_ETARIOS_ENFERMERA]
@FechaI datetime,
@FechaT datetime,
@etarioI int,
@etarioT int
AS
BEGIN
declare
@valor int
select @valor = sum (case when PAsC_Paciente. PAsC_PAsC_Sexo ='F' then 1 else 0 end) from dbo.RPA_Formulario
Inner Join dbo.PAsC_Paciente On dbo.PAsC_Paciente.PAsC_PAsC_Numero =
dbo.RPA_Formulario.PAC_PAsC_Numero
where PAsC_Paciente.PAsC_PAsC_Numero = RPA_Formulario.PAsC_PAsC_Numero and RPA_Formulario.RPA_FOR_FechaDigit >= @FechaI and RPA_Formulario.RPA_FOR_FechaDigit <= @FechaT and DATEDIFF(yyyy, PAsC_PAsC_FechaNacim, getdate()) > = @etarioI and DATEDIFF(yyyy, PAsC_PAsC_FechaNacim, getdate()) < = @etarioT and ( RPA_FDA_TurnoProfe = '065420477-0' )

END

Dim sCnn As String
Dim totales As Integer
sCnn = "data source = casa; initial catalog = BD_SALON; user id = ; password = "
Dim slqcomand As New SqlCommand
Dim FechaI, FechaT As Date
Dim fechaII, FechaTT As String
Dim EtarioI, EtarioT As Integer
Dim hola As String
slqcomand.Connection = New SqlClient.SqlConnection(sCnn)

slqcomand.CommandType = CommandType.StoredProcedure
slqcomand.CommandText = "DAU_ETARIOS"
FechaI = Me.DateTimePicker1.Value
FechaT = Me.DateTimePicker2.Value
EtarioI = CInt(Me.TextBox1.Text)
EtarioT = CInt(Me.TextBox2.Text)
fechaII = FechaI.ToString("dd/MM/yyyy")
FechaTT = FechaT.ToString("dd/MM/yyyy")


slqcomand.Parameters.Add("@FechaI", SqlDbType.DateTime)
slqcomand.Parameters("@FechaI").Value = fechaII
slqcomand.Parameters.Add("@FechaT", SqlDbType.DateTime)
slqcomand.Parameters("@FechaT").Value = FechaTT
slqcomand.Parameters.Add("@etarioI", SqlDbType.Int)
slqcomand.Parameters("@etarioI").Value = EtarioI
slqcomand.Parameters.Add("@etarioT", SqlDbType.Int)
slqcomand.Parameters("@etarioT").Value = EtarioT
slqcomand.Connection = New SqlClient.SqlConnection(sCnn)

slqcomand.Connection.Open()
slqcomand.ExecuteScalar()


totales = slqcomand.Parameters("valor").Value
hola = totales
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de roger

RE:problema con salida de datos

Publicado por roger (186 intervenciones) el 24/06/2009 01:02:20
totales = ctype(slqcomand.ExecuteScalar(),integer)

no puedes preguntar por un parametro llamado valor en la coleccion de parametros si no lo has agregado desde codigo, el parametro si se declara en el procedimiento almacenado, pero esto no quiere decir que automaticamente se cree en la lista de parametros del comando. Como solo necesitas un valor puedes hacer lo que puse al principio, o tambien podrias, definir el parametro en vb.net y agregarlo al comando, estableciendolo como parametro de salida, ponerlo como parametro de salida en el procedimiento almacenado, y luego si, obtener su valor como lo estas haciendo.

espero que te sirva
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:problema con salida de datos

Publicado por juan (46 intervenciones) el 24/06/2009 14:59:02
igual sale valor en cero
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de roger

RE:problema con salida de datos

Publicado por roger (186 intervenciones) el 24/06/2009 15:01:39
mira ejecutando directamente el procedimiento almacenado, te debe dar el mismo valor, en tal caso, lo que debes revisar es el procedimiento, pues el codigo en vb lo tendrias bien
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:problema con salida de datos

Publicado por Nelson (2 intervenciones) el 04/02/2011 21:06:36
Yo tuve el mismo problema y resulta que era un error torpe, fijate si en tu codigo no tienes espacios entre las , pues yo tenia asi:
slqcomand.Parameters("@etarioT ").Value //
y lo arreglé asi
slqcomand.Parameters("@etarioT").Value
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:problema con salida de datos

Publicado por Nelson (2 intervenciones) el 04/02/2011 21:07:07
Yo tuve el mismo problema y resulta que era un error torpe, fijate si en tu codigo no tienes espacios entre las , pues yo tenia asi:
slqcomand.Parameters("@etarioT ").Value //
y lo arreglé asi
slqcomand.Parameters("@etarioT").Value
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar