IEFBR14是最简单的工具程序,用于进行文件操作。比较值得注意的是对GDG的操作。


DATASETbefore):

X001.LOG.DAILY                <--GDG base

X001.LOG.DAILY.G0001V00       <--GDS

X001.LOG.DAILY.G0002V00       <--GDS

X001.LOG.DAILY.XXX            <--QSAM

X001.LOG.DAILY.YYY            <--QSAM


执行JCL:

//DELETE  EXEC PGM=IEFBR14

//DEL1     DD DSN=X001.LOG.DAILY,

//           DISP=(MOD,DELETE,DELETE),

//           SPACE=(TRK,0),

//           UNIT=SYSALLDA


DATASETafter):

X001.LOG.DAILY                <--GDG base

X001.LOG.DAILY.XXX            <--QSAM

X001.LOG.DAILY.YYY            <--QSAM


这里的X001.LOG.DAILYGDG base的名字,执行这个STEP会将X001.LOG.DAILY下面所有的GDS删除,GDG base不会被删除。

有一种情况,当X001.LOG.DAILY下面没有GDS的时候,就会报JCL ERROR,是的,虽然使用的是MOD。但如果删除一个普通的QSAM文件,而该文件不存在,仍然能够执行成功。

相关文章:

  • 2021-10-23
  • 2021-08-07
  • 2022-12-23
  • 2021-10-23
  • 2021-10-30
  • 2021-07-23
  • 2021-05-17
  • 2021-06-21
猜你喜欢
  • 2021-07-07
  • 2021-09-19
  • 2021-11-06
  • 2021-05-29
  • 2021-11-04
  • 2022-01-29
  • 2021-08-20
相关资源
相似解决方案