4

AFP を sysout に出力しようとしていますが、JCL が FORMS パラメーターを認識していません (認識できません)。私の現在の解決策は、動的 JCL を作成し、それを INTRDR にスピンさせることですが、ジョブがスケジューラーの制御下にないため、これは弱い解決策です...したがって、異常終了やその他の問題は夜間には気付かれません。オペレーター。

私は、COBOL プログラムを介して AFP を印刷する方法を考案し始めました。BPXWDYN を使用して SYSOUT DD を動的に作成します。これにより、FORMS パラメーターを自由に設定できます。しかし、次のステップは、AFP をその DD にダンプすることです。

COBOL プログラムから IEBGENER を動的に呼び出すことができると思っていましたが、S0C4 がプルされます。

COBOL プログラム内で AFP レコードを 1 つの DD から別の DD に移動することはできますが、それでは 1 つの LRECL に制限されます... システム全体で AFP のさまざまな LRECL 定義があり、COBOLはコンパイル時に LRECL を認識している必要があります

何かご意見は?IEBGENER を動的に呼び出して、S0C4 を取得しないことは可能ですか? 私が考えていない他のアイデアはありますか?

前もって感謝します...

4

2 に答える 2

3

小さなアセンブラ プログラムを作成することを考えたことはありますか? BPXWDYN 呼び出しで LRECL を指定できます。DCB は LRECL を指定する必要はありません。OPEN 時に DCB パラメータから取得します。IEBGENER をシミュレートするプログラムは非常に簡単です。

または、FIELDS=COPY パラメータを指定して SORT を呼び出す方法を見てください。SORT も LRECL を必要としません。または、REXX スクリプトを作成します。

これを行うには多くの方法があります。COBOLボックスの外を見るだけです。

于 2013-08-06T07:05:01.880 に答える