Hola:
Prueba a ejecutar el SP desde iseries navigator como script sql, a ver qué te devuelve. En caso de que te devuelva correctamente el valor, quiere decir que el SP funciona correctamente, y deberás buscar el error en el código cliente que usas para llamar al SP. Saludo2. ________________________________ De: [email protected] [[email protected]] en nombre de Emilio G. Burgoa - OSSE - San Juan [[email protected]] Enviado: jueves, 09 de enero de 2014 16:25 Para: 'forum.help400' Asunto: Parametro OUTPUT en CL 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 [OSSE nvo slogans2]<http://www.ossesanjuan.com.ar/> 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 ------------------------ Este mensaje ha sido analizado por BitDefender.
<<inline: image010.jpg>>
____________________________________________________ Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 © Publicaciones Help400, S.L.
