ジャーナル処理

コミット、ロールバック、ジャーナル処理,AS400,iSerise

ファイルのコミットメント、ロールバック行う為のジャーナル定義方法

　１．　ジャーナル・レシーバーの作成

　　　　CRTJRNRCV JRNRCV(ALIB/FJRNRCV) THRESHOLD(5000)
　　　　　　　　サイズは最低５０００以上

　２．　ジャーナル作成

　　　　CRTJRN JRN(ALIB/FJRN) JRNRCV(ALIB/FJRNRCV) MNGRCV(*SYSTEM) DLTRCV(*YES)

　　　　　　　　　　　レシーバーの管理（ＭＮＧＲＣＶ）　：　＊ＳＹＳＴＥＭ　上記レシーバーサイズに達すれば　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　自動で切り離し新たに作成します。

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　＊ＵＳＥＲ　　　手動で切り離し新たに作成します。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 (CHGJRN)　

　　　　　　　　　　　レシーバーの削除（ＤＬＴＲＣＶ）　： *YESとすれば切り離したジャーナルレシーバーを　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　自動で削除します。　　　　　　　　　　　

３．　物理ファイルに対して行う場合のジャーナル開始、終了処理

　　　　　開始　　　　　　　STRJRNPF FILE(ALIB/FILEA ALIB/FILEB) JRN(ALIB/FJRN)
　　　　　　　　　　プログラムを動かす前には必ず、これが必要です。

　　　　終了　　　　　　　ENDJRNPF 　FILE(ALIB/FILEA ALIB/FILEB)

４．論理ファイルに対して行う場合のジャーナル開始、終了処理

　　　　　開始　　　　　　　STRJRNAP FILE(ALIB/FILEAL1 ALIB/FILEAL2) JRN(ALIB/FJRNL1)
　　プログラムを動かす前には必ず、これが必要です。

　　　　　終了　　　　　　　ENDJRNAP 　FILE(ALIB/FILEAL1 ALIB/FILEAL2)

ジャーナル・レシーバー削除方法

　　　　　１．　ＤＬＴＪＲＮＲＣＶ　ＪＲＮＲＣＶ（ＡＬＩＢ／ＦＪＲＮＲＣＶ）　

　　　　　　　　　　　　データの復元を行わない場合は、オプション（ＤＬＴＯＰＴ）を*IGNINQMSG にすれば
　　　　　　　　　　　　ＣＰＡ０７２５のメッセージを回避する事が出来ます。　

　　　　　２．　接続中のレシーバー全て削除行いたい場合は、該当する物理、論理ファイルのジャーナル処理
　　　　　　　　を終了（ＥＮＤＪＲＮＰＦ，ＥＮＤＪＲＮＡＰ）後削除してください。

　　　　　　　　　　・　この処理で削除されない場合は、ジャーナルを先に削除（ＤＬＴＪＲＮ）後、削除して見てください。

　　　　　　　　　　・　この処理ても削除されない場合は別のライブラリーのファイルを処理している場合等があります。　　　　　　　　　　　　この場合、ジャーナル属性処理（ＷＲＫＪＲＮＡ）にてＦ１３キーを押し確認して下さい。

ジャーナル削除方法

　　　　　ＤＬＴＪＲＮ　ＪＲＮ（ＡＬＩＢ／ＦＪＲＮ）

　　　　　　　　該当する物理、論理ファイルのジャーナル処理を終了（ＥＮＤＪＲＮＰＦ，ＥＮＤＪＲＮＡＰ）後削除してください。

ENDJRNPF,ENDJRNAPしてもジャーナル、ジャーナルレシーバーが削除されない場合

　　WRKJRNAで状態を調べて下さい。他のライブラリーにジャーナルされている場合が有ります。

　　　ｼﾞｬｰﾅﾙ処理されたﾌｧｲﾙの表示やｼﾞｬｰﾅﾙ処理されたｱｸｾｽ･ﾊﾟｽの表示を見て下さい

（F19キー）

それでも消えない場合は、以下のコマンドを試して見て下さい

　　　ENDJRNPF FILE(*ALL) JRN(ライブラリー/ジャーナル名)