Renombrar fichero con fecha

[dhitar]

Muy buenas a todos,

Necesito ayuda con lo siguiente:

En una posición concreta de un fichero, hay una fecha. Lo que necesito es renombrar dicho fichero con dicha fecha.

¿Sabéis si es posible hacerlo ya sea por jcl o por un programa cobol?

Muchas gracias de antemano.

Saludos

[Kuk]

dhitar, échale un ojo a este tema: [Sintaxis] Informar variable JCL con contenido de fichero. - COBOL Foro (https://www.cobolforo.es/showthread.php?t=827)

[ALF]

Buenas

Yo tengo la misma duda que dhitar, y mirando en [Sintaxis] Informar variable JCL con contenido de fichero. - COBOL Foro no he conseguido solucionarla, porque lo que necesito es poner la fecha que viene dentro de un fichero como parte del nombre de otro.

Si hago:
//SORT001 EXEC PROC=EXPRP23I
//P23.SORTIN DD DSN=Fichero1, (contiene una fecha)
// DISP=SHR
//P23.SORTOUT DD DSN=&FICHA,
// DISP=(,CATLG,DELETE),
// SPACE=(CYL,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=10,BLKSIZE=0)
//P23.SYSIN DD *
SORT FIELDS=(1,10,CH,A)
SUM FIELDS=NONE
/*
Luego quiero usar la variable &FICHA , para nombrar un fichero, pero si hago para crear el fichero

//FIC2 EXEC PROC=EXPRP27I
//SYSPRINT DD SYSOUT=*
//ALLOCAT1 DD DSN=Prefijos.&FICHA.,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(500,50),RLSE),
// RECFM=FB,LRECL=30
/*

me da error en el uso del & ¿como puedo hacer para usar esa variable?

Muchas gracias

[Nitzer]

Igual no he entendido bien lo que quieres, pero si es lo que pienso:

Abres el fichero
Lees la fecha
Cierras el fichero
haces CBL_RENAME_FILE2

Y listo

[Kuk]

@Nitzer, estamos bajo z/OS, Cobol no tiene acceso directo a ficheros ;)

---------- Post añadido el 5 de enero de 2022 a las 23:00 ----------

@ALF, has mirado el siguiente post en concreto? [Sintaxis] Informar variable JCL con contenido de fichero. - COBOL Foro #Post 4075 (https://www.cobolforo.es/showthread.php?t=827&p=4075)

[Nitzer]

Ya me parecía muy fácil jajajajajaj, perdonad, por no haber leido.