DESCARGAR LIBRERIAS A TXT

Todo lo relacionado con JCL, manejo de jobs, etc.
Responder
HUMA

DESCARGAR LIBRERIAS A TXT

Mensaje por HUMA »

Buenas!

Tenia una duda que quizás me podríais ayudar:

Quiero descargarme todos los miembros de varias librerías a txt.

A mi solo se me ocurre hacer un 3.14 en la librería que quiero, buscando el string espacio : " " (supongo que toda línea de miembro tiene al menos un espacio) y guardando dicha búsqueda en un fichero.
Acto seguido, hago un "Transfer" (opción 6 de TSO y luego "Recieve") de dicho fichero guardandolo en .txt en mi pc.

El problema de este método, es que me sale en un formato que no es de mi gusto, tal que salen unas líneas cada 55 líneas recordándonos que usamos la utilidad "Search-For" y un dígito a la izquierda de cada línea numerándola.

¿se os ocurre de otra manera?
Vicente

Re: DESCARGAR LIBRERIAS A TXT

Mensaje por Vicente »

Hola HUMA,
¿Has probado con FTP?
Una buena aproximación a lo que pides se tiene fácilmente utilizando el mandato MPUT de FTP.
Requiere que tengas un servicio FTP arrancado en tu PC.
Lo que sigue es un ejemplo con JCL:

//FTP EXEC PGM=FTP,PARM='(EXIT TIMEOUT 720
//INPUT DD *
dir.ip.de.pc
usuario password
CD C:\carpetadePC
LCD 'DSNAME.DE.LA.LIBRERIA'
MPUT *
QUIT
/*

Leamos un poco:
Para saber más de MPUT puedes consultar el manual:
IP User's Guide and Commands en http://publibfp.dhe.ibm.com/epubs/pdf/f1a1b980.pdf
Vicente

Re: DESCARGAR LIBRERIAS A TXT

Mensaje por Vicente »

Se me olvidó comentar que los ficheros en el PC se crean con el mismo nombre de miembro y sin extensión.
Si los quieres como .txt deberás hacer un RENAME masivo en el PC.
Con Windows sería:
RENAME * *.txt
Un saludo
Responder