Hola, yo estoyb usando asi: DWkUser S 10A DWKPassword S 10A DProfileHandle S 12A DPassWordLength S 10i 0 inz(10) DCCSID S 10i 0 inz(284) // DQUSEC DS D QUSBPRV 1 4B 0 D QUSBAVL 5 8B 0 D QUSEI 9 15 D QUSERVED 16 16 D ERRC0100 17 274 Varying // ... // C Call 'QSYGETPH' C Parm WKUser C Parm WKPassword C Parm ProfileHandle C Parm QUSEC C Parm PasswordLength C Parm CCSID
Espero te sirva. -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Martes, 02 de Agosto de 2005 09:52 p.m. To: [email protected] Subject: Re: Validacion de user y password en V5R3 Si le estoy pasando valor en los dos ultimos parametros: callp GetProfile(UserID: Password: handle: ErrDS :Lpassword :Lccsid) y me da "error en la longitud de parametro" Quiero usarlo para validar el usuario y password de transacciones que ingresan al as400 via mq series gracias, de todas maneras, seguire investigando.. Vidal >From: "Guillermo Andrades, CPI Software" <[EMAIL PROTECTED]> >Reply-To: [email protected] >To: [email protected] >Subject: Re: Validacion de user y password en V5R3 >Date: Wed, 27 Jul 2005 11:59:41 +0200 > >los dos parametros ultimos no le pasas ningun valor? > >creo que tienes que poner la longitud del password y el tipo de >codificacion, ya que a partir de esta version, o la anterior, no >recuerdo, se soportan tipos de password mas extensos. > >por tanto ademas el password ahora se soporta con mayor longitud. > >para que lo estas usando? > > >On 7/27/05, Vidal Rios <[EMAIL PROTECTED]> wrote: > > > > Hola a todos, > > > > Alguien conoce algun API o rutina para validar el usuario y la clave > > en >la > > version V5R3, he estado tratando con QSYGETPH, pero no logro que >funcione. > > > > D GetProfile PR ExtPgm('QSYGETPH') > > D UserID 10A const > > D Password 10A const > > D Handle 12A > > D ErrorCode 32766A options(*varsize: *nopass) > > D 4B 0 options(*nopass) > > D 4B 0 options(*nopass) > > > > > > saludos, > > Vidal > > > > >-- > >Saludos/Regards, >Guillermo Andrades (cuenta en GMail) >CPI Software >http://www.CpiS.es >http://www.RpgForWeb.com _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ __________________________________________________ Forum.HELP400 es un servicio más de NEWS/400. © Publicaciones Help400, S.L. - Todos los derechos reservados http://www.help400.es _____________________________________________________ Para darte de baja visita la siguente URL: http://coyote.combios.es/mailman/listinfo/forum.help400 __________________________________________________ Forum.HELP400 es un servicio más de NEWS/400. © Publicaciones Help400, S.L. - Todos los derechos reservados http://www.help400.es _____________________________________________________ Para darte de baja visita la siguente URL: http://coyote.combios.es/mailman/listinfo/forum.help400
