CPYFを行った時に表示される、5250エミュレータ画面下のメッセージを非表示にする方法

Question

処理の中のプロセスの中にCPYFがあります。
CPYF実行時にユーザーの5250エミュレータ画面下に関連のメッセージが表示されますがCPYFはプログラムのあくまで一か所で、ユーザーにとってはCPYFをしている認識がありません。メッセージ表示をさせなくするにはどのようにすればよいでしょうか。

Answer

メッセージ表示の予防には、CHGJOB STSMSG(*NONE)を実行すればよいでしょう。これでステータスメッセージは表示されなくなります。
CHGJOB STSMSG(*NORMAL)を実行すれば、またステータスメッセージが表示されるようになります。
より良いのは、処理の前にRTVJOBA STSMSG(&STSMSG)で、値を保管してから、CHGJOB STSMSG(*NONE)を行い、さらに処理が終わった後に変更前の値に戻す処理として、CHGJOB STSMSG(&STSMSG)を組込む方法です。

あわせて読みたい記事

ライブラリーサイズが肥大化していませんか？

サポートチーム便り2024.11.27

ACSの「SQLスクリプトの実行」でライブラリー・リストを変更したい

サポートチーム便り2024.11.27

あれっ？データ転送で間違って指定したファイル名が一覧に候補で表示されてる？

サポートチーム便り2024.11.13

業務が止まってしまう可能性も...！？「システム・ジョブ・テーブルが容量に近づいている」

サポートチーム便り2024.11.13