Как отправить JCL через системную команду вызова SQR в MVS z / os? - PullRequest
Новая
       81

Как отправить JCL через системную команду вызова SQR в MVS z / os?

1 голос
/ 01 апреля 2019

Я пытаюсь отправить JCL через программу SQR, используя системную команду вызова в MVS z / os.JCL находится в определенном наборе данных.

Я пытаюсь сделать что-то вроде этого:

  1. let $ jclcmd = 'SUBMIT PSLIBDSN.O92.CUST7.JCLSRC (UTILI)'
  2. система вызовов с использованием $ jclcmd # rtnstat

До этого момента я не смог отправить JCL.Что я получаю от мэйнфрейма, так это ошибка: **** ПРЕДУПРЕЖДЕНИЕ **** ERRNO = ESYS Сгенерировано в SYSTEM, вызванном из строки 389 SYS (UCALL), смещение 000118 Программа SUBMIT была аварийно завершена с системным кодом 66D.SYS(UCALL), смещение 000118

Я также попытался let $ jclcmd = 'TSO SUBMIT PSLIBDSN.O92.CUST7.JCLSRC (UTILI)', но получаю следующее: программа TSO была ненормально завершена с системным кодом 806. СИСТЕМАКод завершения = 806 Код причины = 00000004

До этого момента я думал, что функция системы вызова не позволяет выполнять команды операционной системы по причинам несовместимости с MVS.Реальность такова, что документация SQR не упоминает, что это не так, но всегда упоминает Windows и UNIX в качестве примера.Я сделал тысячу попыток выполнить программу REXX, отправить JCL и другие, но похоже, что функция неправильно собирает команду.Любая идея будет приветствоваться.

...