MFJZABND

MFJZABND は、システムまたはユーザー異常終了によって現在のジョブステップを異常終了させます。

構文:

call "MFJZABND" using abend-type abend-code

パラメーター:

`abend-code`	pic 9(8) comp	異常終了コード。
`abend-type`	pic 9(8) comp	発生する異常終了のタイプ。0 はユーザー異常終了、1 はシステム異常終了を示します。
`abend-sys`	pic 9(8) comp value 1
`abend-user`	pic 9(8) comp value 0

例:

例 1。ユーザー異常終了 1004 で異常終了を引き起こす場合:

77  abend-code                 pic  9(08) comp.
77  abend-type                  pic 9(08)  comp. 
77  abend-sys                   pic  9(08) comp value 1.
77  abend-user                  pic  9(08) comp value 0.

...
Move 1004 to abend-code
call 'MFJZABND' using abend-user abend-code

例 2。システム異常終了 SDED で異常終了を引き起こす場合 (システム異常終了コードは 10 進ではなく常に 16 進であることに注意してください):

77  abend-code                 pic  9(08) comp.
77  abend-type                  pic 9(08)  comp. 
77  abend-sys                   pic  9(08) comp value 1.
77  abend-user                  pic  9(08) comp value 0.
...
Move h’ded’ to abend-code
call 'MFJZABND' using abend-sys abend-code