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

Posted 2023-02-16

【中文标题】取最后一个文件并将其用作 jcl 变量

【英文标题】：Take the last file and use it as jcl variable

【发布时间】：2014-01-16 20:50:13

【问题描述】：

我必须使用基本名称中的最后一个文件来完成一项工作。例如，如果我有：

FILE.140115

文件.140111

文件.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 的情况下做到这一点？或其他方式来做我想做的事。

提前致谢！

【问题讨论】：

那些不是有效的数据集名称。您不能以数字开头元素。您可以使用 Rexx 或 SORT，并将 JCL 写入数据集，然后提交，或者，如果允许，将其发送到 INTRDR（内部读取器）。您不能将它用作同一个 JOB 中的参数，因为在选择运行 JOB 之前，所有参数都已解析。您可以将数据集名称放在另一个数据集中，稍后再阅读并使用“动态分配”。取决于你知道怎么做。

这是一个文件示例，请不要注意：P 我希望找到一个直接的解决方案，但我可以看到它不存在。我试图避免将新工作作为数据集动态地完成，但是好吧……我别无选择。谢谢！

【参考方案1】：

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