RampMessage イベント

RAMP またはベースとなる 5250 アプリケーションにより、メッセージが発行されます。

 

パラメータ

uMessageType Char 256 下の表にあるメッセージのタイプを指定する文字列 uMessageText Char 132 メッセージのテキストを含む文字列

 

この表は、使用可能なメッセージ･タイプとその原因を示しています。

タイプ 原因 コメント VF_ERROR 致命的なエラー。 何らかの理由で、要求の実行の処理に失敗しました。 たとえば、失敗したナビゲーション要求などが原因です。 VF_INFO 5250アプリケーションからのメッセージ。 背後で実行されている実際の5250プログラムによって送信されるメッセージ。 たとえば、失敗した妥当性検査などです。 VF_INIT_ERROR 初期化に失敗した画面ラッパー。 これは通常、指定されたセッション･ユーザーのオブジェクト･タイプにより定義済みセッションが提供されないときに発生します。 または、uCommand プロパティを設定していないときに発生します(「画面ラッパーの基本」を参照)。 VF_UNKNOWN_FORM ナビゲーション中に未定義のフォームが見つかりました。

 

備考

異なるタイプのエラーを処理する方法は、開発者にかかっています。

メッセージを自動的にポップアップで表示するには、#com_owner.avshowmessagesメソッドを使用します。致命的なエラーが発生した場合にベースとなる5250画面を表示すると、開発時に役立ちます。表示するには、画面ラッパーの表示および表示位置を変更します。

 

例

 

Evtroutine Handling(#screen wrapper.uRampMessage) Umessagetype(#MsgType) Umessagetext(#MsgText)

Case (#msgtype.value)

When Value_Is('= VF_ERROR')

* Optional. In design mode, making the screen wrapper visible allows you to show the 5250 screen.Set Com(#myscreen_wrapper) Visible(True)

When Value_Is('= VF_INFO')

Message Msgid(dcm9899) Msgf(dc@m01) Msgdta(#msgtext.value)

When Value_Is('= VF_UNKNOWN_FORM')

Message Msgid(dcm9899) Msgf(dc@m01) Msgdta(#msgtext.value)

When Value_Is('= VF_INIT_ERROR')

Message Msgid(dcm9899) Msgf(dc@m01) Msgdta(#msgtext.value)

Endcase

Endroutine