Re: Api QSYGETPH no me funciona

[Dario G. I. Heinze]

Fernando...   fijate que si especificas los parametros adicionales de error y siguientes... el codigo de error te lo retorna en la variable indicada para tal fin sin devolverte el codigo de CPF al CL.   Esta es la estructura que uso dentro de los RPG para recuperar los errores.   d* Estructura para recuperar la informacion de errores                 Q d Error           ds                                                    d  lError                       10i 0 overlay(Error: 01) inz(%len(Error) d  BytesDispon                  10i 0 overlay(Error: 05) inz(*zeros)    d  idExcepcion                   7a   overlay(Error: 09)                d  datExcepcion                512a   overlay(Error: 17)                    en idExcepcion queda el codigo de CPF, en el CL deberias recuperar desde la posicion 9, 7 bytes de tu variable ERRCODE que debiera al menos ser de 15 bytes y de esta forma estarias obteniendo el CPF ocurrido. Saludos,   Dario G. I. Heinze Dpto AS/400 - C.P.C. S.A. San Martin 3071 - Santa Fe - Argentina Tel. 54 342 4558558 int. 112/201 E-Mail: [EMAIL PROTECTED] _________________________________ ----- Original Message ----- From: Fernando To: forum.help400@combios.es Sent: Thursday, April 06, 2006 12:45 PM Subject: Re: Api QSYGETPH no me funciona Guillermo, te cuento, en el equipo que estoy desarrollando tengo V5R2M0 y en el equipo de Producción donde va a quedar tiene V5R3M0 lo cual me parece que me va a causar varios dolores de cabeza.   Saludos.   Fernando.   El día 6/04/06, Guillermo Andrades, CPI Software <[EMAIL PROTECTED]> escribió: que version de os/400 tienes? en versiones recientes esta API ha cambiado de formato. leete el Memo to Users que IBM envia con la version. el formato ahora es Get Profile Handle (QSYGETPH) API  Required Parameter Group: 1 User ID Input Char(10) 2 Password Input Char(*)           <<<<====== 3 Profile handle Output Char(12)  Optional Parameter Group 1: 4 Error code I/O Char(*)  Optional Parameter Group 2: 5 Length of password Input Bin(4) 6 CCSID of password Input Bin(4)   -- Saludos/Regards, Guillermo Andrades CPI Software http://www.CpiS.es http://www.RpgForWeb.com Web Familiar: http://www.Andrades.es On 4/6/06, Fernando <[EMAIL PROTECTED]> wrote: Estimados, arme un CLP, el cual adjunto, para validar Usuario y Password (el cual voy a ejecutar cuando funcione como un strore procedure desde una aplicación Web), pero ete aquí que lo ejecuto con el STRISDB y nunca se dispara el MONMSG aunque le ponga Usuario= PIRULO y Password=Pepe los cuales no existen en el AS/400 en el que pruebo.   Agradece cualquier ayuda que me puedan brindar.   Fernando.