如何使用 JCL 将当前日期和时间写入顺序数据集？

Question

使用 z/OS 2.4，我有一个每天早上运行的 JCL，它将多个 DB2 表空间的状态写入顺序数据集中，查找任何处于受限状态的表空间。 （请参阅下面的代码摘录）这个 JCL 多年来一直运行良好。

我想简单地将日期和时间添加到顺序数据集的顶部（后跟一个空行），以便我可以轻松地知道 JCL 上次运行的时间。

实现这一目标的最佳方法是什么？

谢谢！

戴夫

//MYUSERND  JOB (16201,CCA25,227,72575),'DSPCPYPQ',
//     CLASS=1,MSGCLASS=X,MSGLEVEL=1,REGION=32M,NOTIFY=MYUSERN,TIME=99
/*JOBPARM TIME=10,LINES=050,CARDS=0000,COPIES=01
//*----------------------------------------------
//DISDB    EXEC PGM=IKJEFT01,DYNAMNBR=20
//*----------------------------------------------
//STEPLIB   DD DISP=SHR,DSN=DB2.DBQ1.DSNA10.SDSNLOAD
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD DISP=SHR,DSN=MYUSERN.DB2.CMDOUTQ
//SYSTSIN  DD *
  DSN SYSTEM(DBQ1)
  -DISPLAY DB(DN*) SPACENAM(*) USE RESTRICT LIMIT(*)
...
//

Answer 1

由于 IJKEFT01 是批处理 TSO，您可以在运行 DSN 之前添加 TIME 命令。