Error en llamada a Store Procedure

14/01/2004 - 02:33 por Kleyber Briceño | Informe spam
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
Hola a todos. Un cordial saludo. El problema es el siguiente: tengo el
siguiente c&oacute;digo de VB
<p>Private Sub cmdCargrManif_Click()
<br>Dim clsPrueba As clsConex
<br>&nbsp;&nbsp; Set clsPrueba = New clsConex
<br>&nbsp;&nbsp; With clsPrueba.Command
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; .CommandType = adCmdStoredProc
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; .CommandText = "Sp_CargaManif"
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; .Parameters.Append .CreateParameter("@pFecha",
adChar, adParamInput, "20031130")
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Set clsPrueba.Rst = .Execute
<br>&nbsp;&nbsp; End With
<br>End Sub
<p>Este procedimiento llama a Store Procedure de VB, pasandole como parametro
una fecha, pero al ejecutrse la instrucci&oacute;n .Execute VB me devuelve
el error: Procedure 'Sp_CargaManif'&nbsp; expects parameter '@pFecha',
which was not supplied. Es decir no se pasa o no se lee el parametro.
<p>Muchas gracias de antemano a quien pueda ayudarme
<p>La estructura del Store procedure es la siguiente
<p>CREATE PROCEDURE Sp_CargaManif&nbsp; @pFecha char(10)&nbsp; AS
<br>&nbsp;
<br>SELECT NumTour, Fecha, Nombre, Procedencia, CodOpc, CodLoc, CodLiner,
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
CodCloser1, CodCloser2,Calificacion, NumCtto
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
Deposito, Observaciones
<br>FROM tblManifiesto
<br>WHERE Fecha = @pFecha
<br>&nbsp;
<br>&nbsp;
<br>&nbsp;
<br>&nbsp;
<br>&nbsp;</html>

Preguntas similare

Leer las respuestas

#1 Kleyber Briceño
14/01/2004 - 04:29 | Informe spam
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
<body bgcolor="#FFFFFF">
Gracias por responder Gustavo, pero ya lo&nbsp; prob&eacute; y no funciona.
<p>"Gustavo Larriera [MVP]" wrote:
<blockquote TYPE=CITE><style></style>
<font face="Arial"><font size=-1>DISCLAIMER:
No soy ningun experto en Visual Basic :-)</font></font>&nbsp;<font face="Arial"><font size=-1>?No
deberias indicar las posiciones donde van los par&aacute;metros, usando
el signo "?" ? Es decir:</font></font>&nbsp;<font face="Times New Roman"><font size=+0>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
.CommandText = "Sp_CargaManif ?"</font></font><font face="Arial"><font size=-1>saludos</font></font><font face="Arial"><font size=-1>gux</font></font>&nbsp;
<br>--
<br>Gustavo Larriera, MSFT MVP-SQL
<br>Uruguay LatAm
<br>
<br>This message is provided "AS IS" with no warranties expressed or implied,
and confers no rights.
<br>
<blockquote dir=ltr
style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">"Kleyber
Brice&ntilde;o" &lt;<a href="mailto:"></a>>
wrote in message <a href="news:">news:</a>...Hola
a todos. Un cordial saludo. El problema es el siguiente: tengo el siguiente
c&oacute;digo de VB
<p>Private Sub cmdCargrManif_Click()
<br>Dim clsPrueba As clsConex
<br>&nbsp;&nbsp; Set clsPrueba = New clsConex
<br>&nbsp;&nbsp; With clsPrueba.Command
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; .CommandType = adCmdStoredProc
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; .CommandText = "Sp_CargaManif"
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; .Parameters.Append .CreateParameter("@pFecha",
adChar, adParamInput, "20031130")
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Set clsPrueba.Rst = .Execute
<br>&nbsp;&nbsp; End With
<br>End Sub
<p>Este procedimiento llama a Store Procedure de VB, pasandole como parametro
una fecha, pero al ejecutrse la instrucci&oacute;n .Execute VB me devuelve
el error: Procedure 'Sp_CargaManif'&nbsp; expects parameter '@pFecha',
which was not supplied. Es decir no se pasa o no se lee el parametro.
<p>Muchas gracias de antemano a quien pueda ayudarme
<p>La estructura del Store procedure es la siguiente
<p>CREATE PROCEDURE Sp_CargaManif&nbsp; @pFecha char(10)&nbsp; AS
<p>SELECT NumTour, Fecha, Nombre, Procedencia, CodOpc, CodLoc, CodLiner,
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
CodCloser1, CodCloser2,Calificacion, NumCtto
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
Deposito, Observaciones
<br>FROM tblManifiesto
<br>WHERE Fecha = @pFecha
<br>&nbsp;
<br>&nbsp;
<br>&nbsp;
<br>&nbsp;
<br>&nbsp;</blockquote>
</blockquote>

</body>
</html>
#2 Manuel Etcheto
14/01/2004 - 05:58 | Informe spam
Hola
Creo que el problema es que al pasarle los parámetros al
nuevo parámetro (valga la redundancia) no estás pasando el
value, porque el 4º es el tamaño máximo (en tu caso 8)

prueba con
.Parameters.Append .CreateParameter("@pFecha", adChar,
adParamInput, 8, "20031130")

Suerte
Manuel


Mostrar la cita
parámetros, usando el signo "?" ? Es decir:
Mostrar la cita
expressed or implied, and confers no rights.
Mostrar la cita
message news:
Mostrar la cita
siguiente: tengo el siguiente código de VB
Mostrar la cita
adChar, adParamInput, "20031130")
Mostrar la cita
pasandole como parametro una fecha, pero al ejecutrse la
instrucción .Execute VB me devuelve el error:
Procedure 'Sp_CargaManif' expects parameter '@pFecha',
which was not supplied. Es decir no se pasa o no se lee el
parametro.
Mostrar la cita
CodLoc, CodLiner,
Mostrar la cita
NumCtto
Mostrar la cita
#3 Rubén Vigón
14/01/2004 - 08:41 | Informe spam
Cambia ésta línea:

.Parameters.Append .CreateParameter("@pFecha", adChar, adParamInput, "20031130")

Por ésta:

.Parameters.Append .CreateParameter("@pFecha", adChar, adParamInput, 10, "20031130")

(el 4º argumento de «CreateParameter» recibe el tamaño del parámetro, no su valor)

Un saludo!

Rubén Vigón
Microsoft MVP Visual Basic
#4 Kleyber Briceño
14/01/2004 - 14:04 | Informe spam
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
Ahora si abre el recordset. Muchas gracias a Manuel y a Ruben
<p>Kleyber Brice&ntilde;o wrote:
<blockquote TYPE=CITE>Hola a todos. Un cordial saludo. El problema es el
siguiente: tengo el siguiente c&oacute;digo de VB
<p>Private Sub cmdCargrManif_Click()
<br>Dim clsPrueba As clsConex
<br>&nbsp;&nbsp; Set clsPrueba = New clsConex
<br>&nbsp;&nbsp; With clsPrueba.Command
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; .CommandType = adCmdStoredProc
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; .CommandText = "Sp_CargaManif"
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; .Parameters.Append .CreateParameter("@pFecha",
adChar, adParamInput, "20031130")
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Set clsPrueba.Rst = .Execute
<br>&nbsp;&nbsp; End With
<br>End Sub
<p>Este procedimiento llama a Store Procedure de VB, pasandole como parametro
una fecha, pero al ejecutrse la instrucci&oacute;n .Execute VB me devuelve
el error: Procedure 'Sp_CargaManif'&nbsp; expects parameter '@pFecha',
which was not supplied. Es decir no se pasa o no se lee el parametro.
<p>Muchas gracias de antemano a quien pueda ayudarme
<p>La estructura del Store procedure es la siguiente
<p>CREATE PROCEDURE Sp_CargaManif&nbsp; @pFecha char(10)&nbsp; AS
<p>SELECT NumTour, Fecha, Nombre, Procedencia, CodOpc, CodLoc, CodLiner,
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
CodCloser1, CodCloser2,Calificacion, NumCtto
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
Deposito, Observaciones
<br>FROM tblManifiesto
<br>WHERE Fecha = @pFecha
<br>&nbsp;
<br>&nbsp;
<br>&nbsp;
<br>&nbsp;
<br>&nbsp;</blockquote>
</html>
Ads by Google
Search Busqueda sugerida