Я пытаюсь напечатать AFP в sysout, но параметр FORMS не известен (и не может быть известен) JCL. Мое текущее решение состоит в том, чтобы создать динамический JCL и перевести его в INTRDR, но это слабое решение, потому что задание не будет находиться под контролем нашего планировщика... и, таким образом, абенд или другая проблема останутся незамеченными в ночное время. операторы.
Я начал придумывать способ распечатать AFP с помощью программы COBOL. Я использую BPXWDYN для динамического создания SYSOUT DD, что позволяет мне устанавливать параметр FORMS так, как я хочу. Но следующим шагом будет сброс AFP на этот DD.
Я думал, что могу вызвать IEBGENER динамически из моей программы COBOL, но это приводит к S0C4.
Я могу перемещать записи AFP из одного DD в другое в программе COBOL, но это ограничивает меня одним LRECL... и у меня много разных определений LRECL для AFP в моей системе, и COBOL ДОЛЖЕН знать LRECL во время компиляции.
Есть предположения? Можно ли вызвать IEBGENER динамически и не получить S0C4? Любые другие идеи, о которых я не подумал?
Заранее спасибо...