取最后一个文件并将其用作jcl变量

时间:2014-01-16 20:50:14

标签: mainframe jcl

我必须做一个使用基本名称中的最后一个文件的工作。例如,如果我有:

FILE.140115

FILE.140111

FILE.140101

我需要抓住距离今天最近的FILE.140115。

所以,我会用:

//TEST010  EXEC PGM=IDCAMS                                
//SYSPRINT DD SYSOUT=*                                    
//OUTDD    DD DSN=FILE.LISTFILE,                  
//            DISP=(NEW,CATLG,DELETE),                    
//            DATACLAS=(MED),                             
//            DCB=(RECFM=VB,LRECL=125)                    
//SYSIN    DD *                                           
   LISTCAT ENT(FILE.*) - 
   NAME -                                                 
   OUTFILE(OUTDD)                                                          

然后,使用排序我可以获得一个文件名,里面有我需要的文件。但我不知道如何使用此文件的内容作为变量将其用作另一步骤中的参数。

有没有办法在不使用CLIST的情况下执行此操作?或者其他方式来做我想做的事。

提前致谢!

1 个答案:

答案 0 :(得分:4)

您是否尝试过使用GDG?在带有GDG的大型机环境中,很容易在文件名中带有日期/时间戳的分布式环境中解决许多问题。