Por si a alguien le interesa, ya encontre como checar si un grupo de documentos
existe en un folder, utilizando los comandos CHKOUT, CHKIN
EJ.
CHKOUT OBJ('/QDLS/CNTRLRCV/*.TXT') ----este comando checa si existen y
ademas los bloquea
CHKin OBJ('/QDLS/CNTRLRCV/*.TXT') ----este comando checa si existen y
libera los documentos
MONMSG MSGID(CPFA093)
espero les sirva
Feliz 2005 para todos
Gerardo Santillana
IT Department
Delphi Mechatronic Systems
Phone USA (956) 554 5832
Phone MX 01868 8128163 x.5832
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of alex martinez
Sent: Friday, December 24, 2004 2:32 AM
To: [email protected]
Subject: Re: Objeto de la QDLS en uso
Si tienes installado "5722SS1, opciones 30, OS/400 - QShell
Interpreter" puedes realizar un "mix" entre un script de Unix y un
poco de programaci�n CL.
Puedes crear un archivo plano tal como este
CRTPF FILE(AJUT400/LISTA) RCDLEN(200)
y luego ejecutar un script tal como pides
QSH CMD('ls /qdls/ajut400/*.txt >/qsys.lib/ajut400.lib/lista.file/lista.mbr')
Solo queda que realizar un
RTVMBRD FILE(AJUT400/LISTA) NBRCURRCD(®ISTROS)
para comprobar si hay archivos que cumplan con el patr�n de b�squeda indicado.
Salu2 y felices fiestas.
On Thu, 23 Dec 2004 11:05:06 -0600, gerardo.santillana
<[EMAIL PROTECTED]> wrote:
>
> Eso era lo que necesitaba, no sabia como especificarle al mandato WRKOBJLCK
> los parametros para estos documentos
>
> aprovechando otra pregunta, como checo que un grupo de documentos existe en
> un folder, por ejemplo lo que se hace con el comando
> CHKDLO pero que me dejara utilizar '*.txt' ya que este no me deja
>
> Gracias y feliz navidad
>
> Gerardo Santillana
> IT Department
> Delphi Mechatronic Systems
> Phone USA (956) 554 5832
> Phone MX 01868 8128163 x.5832
>
> -----Original Message-----
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] Behalf Of Martinez Nora
> Sent: Thursday, December 23, 2004 10:47 AM
> To: [email protected]
> Subject: RE: Objeto de la QDLS en uso
>
> Hola,
>
> Conozco dos formas:
>
> 1. intentar eliminar el documento para saber qu� trabajo lo bloquea:
>
> DLTDLO DLO(DOCUMENTO.TXT) FLR(CARPETA)
>
> El sistema responde que el documento n�TAL esta siendo utilizado en la
> carpeta y entonces :
>
> WRKOBJLCK OBJ (QDOC/N�TAL) OBJTYPE(*DOC)
>
> 2. recuperar el nombre :
>
> DSPDLONAM DLO (DOCUMENTO.TXT) FLR(CARPETA)
>
> El sistema devuelve el nombre de ese objeto en el sistema.
>
> A ver si te sirve, felices fiestas a todos,
>
> Nora
>
> _____________________________________________________
> 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]
>
> ****************************************************************************************
>
> Note: The information contained in this message may be privileged and
> confidential and thus protected from disclosure. If the reader of this
> message is not the intended recipient, or an employee or agent responsible
> for delivering this message to the intended recipient, you are hereby
> notified that any dissemination, distribution or copying of this
> communication is strictly prohibited. If you have received this communication
> in error, please notify us immediately by replying to the message and
> deleting it from your computer. Thank you.
>
> ****************************************************************************************
>
> _____________________________________________________
> 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]
****************************************************************************************
Note: The information contained in this message may be privileged and
confidential and thus protected from disclosure. If the reader of this message
is not the intended recipient, or an employee or agent responsible for
delivering this message to the intended recipient, you are hereby notified that
any dissemination, distribution or copying of this communication is strictly
prohibited. If you have received this communication in error, please notify us
immediately by replying to the message and deleting it from your computer.
Thank you.
****************************************************************************************
_____________________________________________________
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]