在尝试复制到Unix服务器之前,有没有办法检查MVS中是否存在文件



要使用Connect Direct从MVS Mainframe复制到Unix服务器的文件。下面是运行良好的示例脚本。现在,在复制文件之前,有没有一种方法可以验证MVS中是否存在文件?

submit FILE_COPY process
SNODE=${SENDING_NODE} SNODEID=(${USERNAME},${PASSWORD})
&INDSN="$INPUT_FILE"
&OUTDSN="$OUTPUT_DIR$OUTPUT_FILE"
COPYSTEP COPY FROM (FILE="&INDSN")
TO
(FILE="&OUTDSN"
UNIT=SYSDA
SYSOPTS=":datatype=text:"
DISP=RPL
SPACE=(TRK,(100,50),RLSE)
DCB=(RECFM=FBA,LRECL=216,BLKSIZE=0)
pnode)

PEND;
EOF

是-如果您正在批量运行。只需在C-D步骤之前有一个步骤来执行IDCAMS并打印数据集的第一行。如果未找到数据集,则设置非零返回代码。只需在C-D步骤的EXEC语句中检查即可。(如果你用Mainframe标记了这个,我会在两周前看到这个。(

相关内容

  • 没有找到相关文章

最新更新