Есть ли способ проверить наличие файла в MVS перед попыткой копирования на сервер Unix

Question

Файл, который нужно скопировать с мэйнфрейма MVS на сервер Unix с помощью Connect Direct. Ниже приведен пример сценария, который отлично работает. Теперь перед копированием файла есть ли способ проверить существование файла в 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

Answer 1

Да - если вы работаете в пакетном режиме. Просто сделайте шаг перед шагом CD, чтобы запустить IDCAMS и распечатать первую строку набора данных. Если набор данных не найден, устанавливается ненулевой код возврата. Просто проверьте это в инструкции EXEC вашего шага CD. (Если бы вы пометили это с помощью мэйнфрейма, я бы увидел это 2 недели назад.)