Re: Archivos en el IFS

Thu, 12 Feb 2009 07:32:18 -0800 

CHGVAR     VAR(&TEXTO) VALUE('ls -l -R /' *CAT + 
             &NOMDIR *TCAT ' > /QDLS/XXXX/Docs2.txt')
STRQSH     CMD(&TEXTO) 
MONMSG     MSGID(CPF0000) 
CPYFRMPCD  FROMFLR(XXXX) TOFILE(LIBD/AFILE) + 
             FROMDOC(DOCS2.TXT) TRNTBL(*NONE) + 
             TRNFMT(*NOTEXT) 
 
Esto te genera un fichero de los objetos de un directorio (&NOMDIR), y a 
partir de ahi, ya puedes trabajar y ejecutar RMVLNK.

  ****************************************************
  *  FICHERO DE DIRECTORIOS               AUDOS2F 
  ****************************************************
 A* 
 A          R RDOS2                     TEXT('Objetos')
 A* 
 A            NOMDI1       150          TEXT('NOMBRE')

Pedro Pinedo Hernandez:  Analista-Programador 
Grupo Amcor Flexibles Hispania S.L. 
Departamento de Informática / IT Department 
tfno.:+34 941 28 60 90 - 941 03 01 39
fax: +34 941 03 01 39
Avd. Burgos 67-95
26006 Logroño Spain 
[email protected] 
(quitar nospam del dominio, para enviar) 




From:
[email protected]
To:
<[email protected]>
Date:
12/02/2009 15:11
Subject:
Archivos en el IFS



Buenas a todos.. espero me puedan ayudar..
 
  Necesito crear un programa, que me borre algunos archivos que se 
encuentran en una carpeta del IFS pasandole como parámetro la fecha?.
 
 
Saludos,
 
Rafael Silva
 
  __________________________________________________
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


______________________________________________________

AMCOR FLEXIBLES - LEADING THROUGH INNOVATION
______________________________________________________

CAUTION - This message may contain privileged and confidential information 
intended only for the use of the addressee named above. If you are not the 
intended recipient of this message you are hereby notified that any use, 
dissemination, distribution or reproduction of this message is prohibited. If 
you have received this message in error please notify AMCOR FLEXIBLES 
immediately. Any views expressed in this message are those of the individual 
sender and may not necessarily reflect the views of AMCOR FLEXIBLES.
__________________________________________________
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