使用しているプログラムが社員の詳細を検索する必要があり、この情報が見つからない場合は、なんらかの形でデータベースが壊れており、致命的エラーとなります。 このような状況では、アプリケーションのエラー・ハンドラーを以下のように使います。
Fetch Fields(#SURNAME) From_File(PSLMST) With_Key(#EMPNO)
If_Status Is_Not(*OKAY)
Invoke #AvFrameworkManager.avHandleError Curr_Comp(*component)
Curr_Rout(ButtonHandler) Curr_Cmd(FETCH)
Curr_Info('Employee details could not be accessed.')
Curr_Retc(#io$Sts)
Endif
標準のエラー・ハンドラーの場合、以下を実行します(フレームワークの構成に依存します)。