En ILE y previa conversi�n, funciona perfectamente. La nomenclatura en ILE es la siguiente.
D SDS D @PGM 1 10 D @JOB 244 253 D @USER 254 263 D @SDS81 81 269 Gracias a [EMAIL PROTECTED] Montse L�pez -----Mensaje original----- De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] nombre de Guillermo Andrades Enviado el: viernes, 24 de octubre de 2003 16:12 Para: [EMAIL PROTECTED] Asunto: RE: Recuperar el usuario que bloquea un registro en RPGLE ADP400 genera auto un codigo en cada acceso a file para detectar/avisar del bloqueo, creo que es una cosa parecida lo que quieres. El fundamento es usar la SDS (Area de estado del programa), tal como I SDS I 1 10 @PGM I 244 253 @JOB I 254 263 @USER I 81 269 @SDS81 Entontes el dato @SDS81 se descompone para obtener datos de interes como 121,08 FILE 174,10 USER Con esto quiza puedas ya hacer una prueba basica diciendo un msg "el usuario xxxx tiene pillado el file xxxxx" Saludos, Guillermo Andrades CPI Software (www.cpis.es & www.RpgForWeb.com) -----Mensaje original----- De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Montse L�pez Enviado el: viernes, 24 de octubre de 2003 13:46 Para: [EMAIL PROTECTED] Asunto: RE: Recuperar el usuario que bloquea un registro en RPGLE �No hay manera de recuperarlo directamente desde el RPG? Montse -----Mensaje original----- De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] nombre de [EMAIL PROTECTED] Enviado el: viernes, 24 de octubre de 2003 11:37 Para: [EMAIL PROTECTED] Asunto: Re: Recuperar el usuario que bloquea un registro en RPGLE Prueba con esto: WRKOBJLCK OBJ(biblioteca/fichero) OBJTYPE(*FILE) OUTPUT(*PRINT) -> Genera un fichero QPDSPOLK Te puedes hacer un PGM que lea el fichero de salida y miras cual de los usuarios tiene un bloqueo de actualizaci�n, no compartido, ese es el Usuario que esta bloqueando el registro. y que le mande un mensaje al usuario. Tambi�n lo puedes ves en pantalla con OUTPUT(*) Un Saludo, Jose Luis Aguilera Fern�ndez Dpto. Inform�tica E.D. Rueda E-mail: [EMAIL PROTECTED] Tlf 914-343-860 ___________________________________________________________ "Este� mensaje� y� los� documentos� que,� en� su caso, lleve anexos, pueden contener� informaci�n� confidencial. Por ello, se informa a quien lo reciba por error que la informaci�n contenida en el mismo es reservada y su uso no autorizado� est� prohibido� legalmente , se abstenga� de realizar copias del mensaje� o� remitirlo o entregarlo� a otra persona y proceda a borrarlo de inmediato." ___________________________________________________________ Montse L�pez <[EMAIL PROTECTED] .es> Para Enviado por: "FORO AS400" forum.help400-req <[EMAIL PROTECTED]> [EMAIL PROTECTED] cc Asunto 24/10/03 11:11 Recuperar el usuario que bloquea un registro en RPGLE Por favor, responda a [EMAIL PROTECTED] bios.es Buenos d�as, Creo que esto ya sali� en el foro, pero lo estoy buscando y no lo encuentro. Lo necesito para que el mismo usuario que se ha quedado bloqueado, pueda avisar al "bloqueador". Gracias a [EMAIL PROTECTED] Un saludo, Montse L�pez _____________________________________________________ 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] _____________________________________________________ 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] _____________________________________________________ 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] _____________________________________________________ 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] _____________________________________________________ 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]
