¿No te es suficiente al crear el usuario poner el parámetro de PWDEXP con el 
valor *YES y que el propio sistema operativo se encargue de obligar a cambiar 
al contraseña en el siguiente inicio de sesión?

 

 

Carlos Veza

EMALSA

 

De: CELUGO - Informatica [mailto:[EMAIL PROTECTED] 
Enviado el: miércoles, 12 de noviembre de 2008 8:52
Para: forum.help400
Asunto: Re: Comprobar contraseña actual de usuario

 

Pretendo controlar el cambio de contraseña en dos ocasiones:

 

1) Cuando el usuario, por iniciativa propia, quiera cambiar la contraseña, a 
través de una opción de menú. En ese caso, si pulsa F12 o F3 y no la cambia me 
da igual. Si la cambia, con los controles del sistema operativo es suficiente.

 

2) Cuando creo un usuario nuevo, establezco como programa inicial un CL que 
ejecuta el CHGPWD; la primera vez que se conecte se ejecutará, pero necesito 
saber si cambia realmente la contraseña o pulsa F12 o F3. Si cambia la 
contraseña ejecuto el mandato CHGUSRPRF para eliminar el programa inical y la 
siguiente vez que se conecte ya entrará como el resto de usuarios.

 

¿Cómo puedo saber si ha cambiado la contraseña en el caso 2? Versión 4.4

 

Gracias.

 

Un saludo.

 

Víctor Díaz

 

----- Original Message ----- 

        From: Bernabé Estrada <mailto:[EMAIL PROTECTED]>  

        To: 'forum.help400' <mailto:[email protected]>  

        Sent: Tuesday, November 11, 2008 5:35 PM

        Subject: RE: Comprobar contraseña actual de usuario

         

        El comando CHKPWD verifica la contraseña, y te devuelve mensajes de 
error que se pueden monitorear.

         

        Saludos.

         

        
________________________________


        From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Juan 
Carlos Paredes
        Sent: Martes, 11 de Noviembre de 2008 05:57 a.m.
        To: forum.help400
        Subject: RE: Comprobar contraseña actual de usuario

         

        Deja que lo haga el sistema operativo. 

         

        1.- En lugar de hacerlo por programa, utiliza el CHGPWD.

        2.- Utiliza el valor de sistema QPWDRQDDIF

         

        Saludos.

         

        Juan Carlos.

         

        
________________________________


        De: CELUGO - Informatica [mailto:[EMAIL PROTECTED]
        Enviado el: mar 11/11/2008 12:38
        Para: forum.help400
        Asunto: Comprobar contraseña actual de usuario

        Hola.

         

        Estoy haciendo un programa para que el propio usuario pueda cambiar su 
contraseña. Todo funciona excepto comprobar que:

         

        1.- Ha introducido la contraseña actual

        2.- Que la nueva contraseña no es igual a la anterior.

         

        No sé cómo "recuperar" la contraseña actual del usuario para hacer las 
comprobaciones; el mandato RTVUSRPRF no lo permite.

         

        Estoy en versión 4.4 y el programa lo hago con RPG

         

        Gracias por vuestra ayuda.

         

        Víctor Díaz.

         

         

        De acuerdo con la Ley orgánica 15/1999, de 13 de diciembre, de
        Protección de Datos de Carácter Personal, le informamos que los datos
        que nos facilite podrían ser incluidos en los ficheros de *GRUPO EVEREST
        con fines comerciales, contractuales y publicitarios y, a tal efecto,
        serán cedidos a otras empresas del Grupo Everest dedicadas a actividades
        de impresión, encuadernación, edición, publicación, distribución y venta
        de libros y otra clase de publicaciones. Sus datos se presumen
        veraces mientras no nos comunique lo contrario. Podrá ejercitar sus
        derechos de acceso, rectificación, candelación y oposición en la
        siguiente dirección, carretera León - A Coruña, km.5, s/n, código postal
        24010 (León).
        
        *GRUPO EVEREST está integrado por EDITORIAL EVEREST,S.A, EVEREST DE
        EDICIONES Y DISTRIBUCIÓN,S.L., LA BOUTIQUE DEL LIBRO Y DEL OCIO,S.L.,
        GRUPO EVERHOUSE,S.L., EDITORIAL EVEREST ANDALUCÍA,S.L., EDICIONES
        GAVIOTE,S.L., EDICIONES CADÍ,S.L., EDITORIAL EVERGRÁFICAS,S.L., GRUPO
        EVEREST DE COMUNICACIÓN,S.L., EDITORIAL EVEREST GALICIA,S.L., AIZKORRI
        ARGITALETXEA, S.L.

        
________________________________


        __________________________________________________
        Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
        &amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
        http://www.help400.es
        _____________________________________________________
        
        Para darte de baja visita la siguente URL:
        http://listas.combios.es/mailman/listinfo/forum.help400


******************************* AVISO LEGAL************************************
Este mensaje se dirige exclusivamente a su destinatario y puede contener 
información privilegiada o confidencial. Si no es vd. el destinatario indicado, 
queda notificado de que la lectura, utilización, divulgación y/o copia sin 
autorización está prohibida en virtud de la legislación vigente. Si ha recibido 
este mensaje por error, le rogamos que lo comunique inmediatamente por esta 
misma vía y proceda a su destrucción.
*******************************************************************************
Antes de imprimir este mensaje, asegúrese de que es necesario. El medio 
ambiente está en nuestra mano.

Disclaimer added by CodeTwo Exchange Rules free version.
http://www.codetwo.com
__________________________________________________
Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
&amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400

Responder a