如何使用 JCL 比较多个文件

Question

我有一个要求，在 我从上游应用程序接收 6 个文件到 GDG 中。我想将这 6 个版本相互比较以查看任何重复项，即，传入的两个或多个文件可能是重复的(上游错误地发送了两次或多次(。 您能否帮助提供使用 JCL 或 Cobol 的解决方案？

Answer 1

最好的办法是使用 ISPF 比较工具(ISPF 3.13 - SuperC 或 3.13 - SuperCE(来比较文件，但选择后台执行而不是前台。这将创建一个批处理作业，您可以将其用作要包含在作业中的步骤的模板：

//SUPERC  EXEC PGM=ISRSUPC,PARM=(DELTAL,LINECMP,' SEQ','') 
//NEWDD   DD DISP=SHR,DSN=new.dataset 
//OLDDD   DD DISP=SHR,DSN=old.dataset   
//OUTDD   DD SYSOUT=* 

请记住，ISPF 比较只比较 2 个文件;要比较 6 个文件，您需要 15 个步骤(我认为(。

如果您的站点具有 PDSMAN，那么您可以使用其 PDSM37 模块为每个数据集生成一个校验和，并使用一个小的 REXX 轻松比较 6 个校验和。

Answer 2

如果它们是正确构建的数据集(它们不是文件(，那么它们应该有标头记录。您需要做的就是比较每个数据集的第一条记录。您可以使用您的分类产品或批量使用 ISRSUPC。

JCL不能这样做，因为JCL只告诉操作系统需要哪些程序和资源来完成任务。因此，即使是 COBOL 解决方案也需要 JCL。

最后，我相信你说的是世代没有版本。版本与 GxxxxV 之后的编号有关。