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

[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:

1. Abres el fichero
2. Lees la fecha
3. Cierras el fichero
4. 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

[Nitzer]

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