使用 jcl 的 pds/ps 的参考信息数据 (i)答案

【问题标题】：reference information data (i) of pds/ps using jcl使用 jcl 的 pds/ps 的参考信息数据 (i)
【发布时间】：2012-06-04 19:24:23
【问题描述】：

我想在我的 JCL 中使用 pds/ps 的引用日期。有什么办法可以吗？

我基本上是想用JCL把近2个月没被引用的几个ps删掉..

【问题讨论】：

我建议你看看 [this][1] 短线程。 [1]：stackoverflow.com/q/6703231/624463
正在为 DD 语句寻找类似于 EXPDT 的参数。希望使用 JCL 执行此操作。

标签： jcl

【解决方案1】：

为此任务使用 DFDMSdss (PGM=ADRDSSU)。 DFDMSdss 存储管理一书的第 9 章描述了如何使用 ADRDSSU 来管理 DASD 空间，并有一个特定的部分演示了如何使用 DUMP 命令删除未使用或过时的数据集到 DUMMY DD。在测试期间调整过滤器时使用 PARM='TYPRUN=NORUN'。

【讨论】：

【解决方案2】：

reference

//DELETE  EXEC PGM=ADRDSSU,PARM='UTILMSG=YES,TYPRUN=NORUN'
//OUTDD    DD  DUMMY
//SYSPRINT DD  SYSOUT=*
//SYSIN    DD *
DUMp {DATASet | DS}(
               BY((selector,operator,arg){,(selector,operator,arg),...})
                {EXClude(dsn{,dsn,...})} {INClude(dsn{,dsn,...})}
               |
               EXClude(dsn{,dsn,...}) {INClude(dsn{,dsn,...})}
                {BY((selector,operator,arg){,(selector,operator,arg),...})}
               |
               {FILterdd | FDD}(ddn)
               {INDDname | IDD}(ddn) | {INDYnam | IDY}(vol{,unit})
               {OUTDDname | ODD}(ddn{,ddn,...) 
               {DELete}

在上面我可以将我的条件放在 BY 子句中。我现在的查询是我是否需要将包含我需要删除的文件列表的文件名放在 INCLUDE 子句中？

【讨论】：

您可以使用 INCLUDE 子句，也可以将过滤信息放在使用 FILTERDD(ddn) 关键字指向的文件中。我必须多次使用 PARM='TYPRUN=NORUN' 进行压力测试，以确保您只删除要删除的内容。请参阅有关如何设置 INCLUDE 和 BY 过滤器的文档。