Si que existe una API para ello, la QWCLOBJL.
En el information center, puedes acceder al de tu versi�n/release desde el
apartado manuales de recursos-as400.com, si buscas WRKOBJLCK API te muestra
el enlace a la p�gina del manual de dicha API. Por la red (busca en el
google) hay bastantes ejemplos de dicha API.
De todas maneras, no es un poco arriesgado eso de finalizar todos los
trabajos que utilicen una biblioteca? y si est�n actualizando un archivo de
otra? si es batch no te esperar�s a que finalice? no envias un msg de aviso
a esas pantallas 15 minutos antes de cancelarla?
fins aviat...
�lex Corretg�
JUAN MANUEL CEVASCO ROMERO <[EMAIL PROTECTED]>@QUIJOTE.COMBIOS.ES con
fecha 14/05/2002 11:07:16
Por favor, responda a [EMAIL PROTECTED]
Tram�s per: [EMAIL PROTECTED]
Destinataris: "'[EMAIL PROTECTED]'" <[EMAIL PROTECTED]>
C�pia:
Classificat: |----------------|
| ( ) Important |
| ( ) urgent |
| ( ) hist�ric |
| ( ) temporal |
| ( ) bretolada |
| ( ) particular |
|----------------|
Assumpte: RE: Recuperar usuarios que bloquean una biblioteca
Gracias Agust=EDn, esta es la =FAnica opci=F3n que se me hab=EDa =
ocurrido. Pero
como es un poco rebuscada, quer=EDa saber si alguien del foro conoc=EDa =
alguna
otra forma de recuperar bloqueos sobre una biblioteca, mediante API, =
por
ejemplo.=20
-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]En nombre de Agust=EDn =
Ripoll=E9s
Enviado el: lunes 13 de mayo de 2002 20:13
Para: [EMAIL PROTECTED]
Asunto: Re: Recuperar usuarios que bloquean una biblioteca
Juan Manuel:
Se me ocurre que puedes montar un CL que haga un WRKOBJLCK con salida
*PRINT, posteriormente puedes hacer un CPYSPLF para copiar la salida =
del
spool en un archivo f=EDsico y montar un programa que lea el archivo =
f=EDsico
que se ha generado para recuperar el nombre del trabajo, el usuario y =
el
n=FAmero de trabajo.
Un saludo.
Agust=EDn Ripoll=E9s Baeza
Porspan S.L.
[EMAIL PROTECTED]
www.porspan.com
----- Original Message -----
From: "JUAN MANUEL CEVASCO ROMERO" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, May 13, 2002 6:48 PM
Subject: Recuperar usuarios que bloquean una biblioteca
Hola a todos/as:
Estoy montando un proceso cuyo objetivo es el siguiente: Una vez
lanzado, debe borrar ciertas bibliotecas, si encuentra que alguien las =
est=E1
utilizando, debe echarlo del sistema (ENDJOB).
Aqu=ED es donde me encuentro el problema, para emitir un endjob,
necesito el usuario, nombre y n=BA de trabajo, y no se como =
recuperarlo.
=BFalguna idea?
Gracias anticipadas.....
Juan Manuel Cevasco Romero
Dpto. Desarrollo
Inforges S. A.
mailto:[EMAIL PROTECTED]
http://www.inforges.es/
Tel=E9fono: 968350011 (Centralita)
Fax: 968264569
_____________________________________________________
Forum.HELP400 es un servicio m=E1s de NEWS/400.
=A9 Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja, env=EDa el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]?body=3DLEAVE
_____________________________________________________
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
