Estimados
Estoy implementando una llamada a un procedimiento almacenado
del tipo Programa Externo en la B.D. del iSeries, este SP tiene parámetros
de entrada y uno de salida, el funcionamiento de los parámetros de entrada
se hace sin problemas, pero el parámetro de salida no devuelve el valor que
se carga dentro del CL.
La llamada la estoy haciendo desde VB.Net con ADODB.
Este es parte del código que estoy utilizando
Cmd1.CommandText = "CALL EMILIO.MSG_ENVIAC (?, ?, ?, ?)"
Cmd1.Parameters.Append(Cmd1.CreateParameter("@DIS",
DataTypeEnum.adChar, ParameterDirectionEnum.adParamInput, 3, "020"))
Cmd1.Parameters.Append(Cmd1.CreateParameter("@CTA",
DataTypeEnum.adChar, ParameterDirectionEnum.adParamInput, 7, "0000001"))
Cmd1.Parameters.Append(Cmd1.CreateParameter("@SUB",
DataTypeEnum.adChar, ParameterDirectionEnum.adParamInput, 3, "000"))
Cmd1.Parameters.Append(Cmd1.CreateParameter("@NOMBRE",
DataTypeEnum.adChar, ParameterDirectionEnum.adParamInputOutput, 25, "NN"))
Cmd1.Execute()
Label1.Text = Cmd1.Parameters("@NOMBRE").Value
La última sentencia devuelve el valor NN y debería devolver
el valor que se asigna en el CL que es XX
Como se debe hacer para que el CL devuelva el parámetro de
salida con el valor asignado..?
Saludos.
Emilio G. Burgoa
Administración de Redes y Servidores
Organización y Sistemas
<http://www.ossesanjuan.com.ar/> OSSE nvo slogans2
Obras Sanitarias S.E. | San Juan Argentina
T.E. : (0264) 4272844/4294076/4294000 | Cel. : (0264) 15 4677501
Skype : emilio.burgoa
[email protected] | www.ossesanjuan.com.ar
Antes de imprimir, piense en su
responsabilidad con el MEDIO AMBIENTE
<<image010.jpg>>
____________________________________________________ Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 © Publicaciones Help400, S.L.
