Gracias Fernando,
Efectivamente existe otro parametro CURUSER que te devuelve el usuario actual. El problema me viene de tener que respetar una programacion ya hecha que contiene programas CL que utilizan el RTVJOBA para recuperar el usuario.. De todas formas he bajado la utilidad de Xavier Navarro y me funciona "estupendamente". (Hace lo que en un principio quiero). Hay que seguir probandola por si acaso. TIENE UNA PEGA "NO ES POSIBLE RECUPERAR EL FUENTE" y no sabes lo que me pica la curiosidad por saber como se ha hecho. Un saludo, Jesus Mª Arzak Capilla Talleres de Escoriaza,S.A. Dpto Proceso de Datos www.tesa.es "Fernando Martinez" <[EMAIL PROTECTED]> con fecha 20/11/2002 09:54:08 Por favor, responda a [EMAIL PROTECTED] Destinatarios: [EMAIL PROTECTED] CC: (cci: Jesus Arzak/TESANET) Asunto: RE: Cambiar un Usuario por Otro Pues tengo una utilidad hecha para un cliente en el que se utiliza un programa similar y te puedo asegurar que para acceder a la BD el usuario de Swap tiene que tener las autorizaciones necesarias y no así el usuario original. En cuanto al RTVJOBA hay dos sitios en los que recoger el nombre del usuario si es interactivo: uno es en el nombre del trabajo y otro en el CURUSER no recuerdo cual es el que debes recuperar pero uno de los dos es el que necesitas. En cuanto a proceso batch por defecto se submite con el usuario Swap si no has cambiado el comando SBMJOB. Espero que esto te aclare el tema Saludos Fernando Martínez -----Mensaje original----- De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]En nombre de Jesus Arzak Enviado el: miércoles, 20 de noviembre de 2002 12:50 Para: [EMAIL PROTECTED] Asunto: RE: Cambiar un Usuario por Otro Gracias Fernando, Este programa al final hace lo mismo que estoy haciendo. Permite ejecutar a un usuario programas con la autorizacion de otro, pero si algun programa accede a algun fichero con el nombre de usuario no me accede con el usuario que he hecho SWAP sino con el usuario original, partiendo de la base que recupera el usuario con RTVJOBA. Un saludo Jesus Mª Arzak Capilla Talleres de Escoriaza,S.A. Dpto Proceso de Datos www.tesa.es "Fernando Martinez" <[EMAIL PROTECTED]> con fecha 20/11/2002 09:06:19 Por favor, responda a [EMAIL PROTECTED] Destinatarios: [EMAIL PROTECTED] CC: (cci: Jesus Arzak/TESANET) Asunto: RE: Cambiar un Usuario por Otro Hola Jesus Mira a ver si este programa te sirve. Saludos Fernando Martinez -----Mensaje original----- De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]En nombre de Jesus Arzak Enviado el: miércoles, 20 de noviembre de 2002 11:44 Para: [EMAIL PROTECTED] Asunto: Cambiar un Usuario por Otro Hola a todos, Os expongo el problema. Necesito que un usuario se autentifique en el AS400 y de alguna manera pueda decirle que es otro a todos los efectos, no so lo a nivel de autorizaciones. Necesito que esto sea asi porque quiero que funcione en la rutina normal de ejecucion, que entre los multiples programas, se incluyen sentencias del tipo RTVJOBA USER(&USUARIO). Lo que pretendo hacer es como simular que un usuario entra en mi maquina, hace signoff y seguidamente entra con otro usuario generico. He probado a utilizar las API'S QSYGETPH y QWTSETP pero no me funciona. Hay alguien que me pueda decir si existe alguna manera de hacerlo. Un saludo, Jesus Mª Arzak Capilla Talleres de Escoriaza,S.A. Dpto Proceso de Datos www.tesa.es ADVERTENCIA/WARNING ESTE CORREO ELECTRONICO CONTIENE INFORMACION PRIVADA Y ESTRICTAMENTE CONFIDENCIAL. Si usted no es el destinatario del presente mensaje no esta autorizado a leerlo, retenerlo o difundirlo. THIS E-MAIL IS PRIVILEGED, CONFIDENTIAL AND CONTAINS PRIVATE INFORMATION. Any reading, retention, distribution or copying of this communication by any person other than its intended recipient is prohibited. _____________________________________________________ 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, envía el mensaje resultante de pulsar mailto:[EMAIL PROTECTED]?body=LEAVE _____________________________________________________ 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, envía el mensaje resultante de pulsar mailto:[EMAIL PROTECTED]?body=LEAVE _____________________________________________________ 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, envía el mensaje resultante de pulsar mailto:[EMAIL PROTECTED]?body=LEAVE