ERRORTEXTオプションは、プログラムまたは文を実行したときに表示された最初のエラー・メッセージのテキストを保持するオプションです。メッセージがERRORTEXTに置かれているエラーの名前は、ERRORNAMEオプションに格納されています。
例
例5-35 SIGNALコマンドでのERRORTEXT
TRAPコマンドを使用してエラーを処理するレポート・プログラムでは、SIGNALコマンドを使用することにより、現行の出力ファイルに適切なエラーメッセージを送ることができます。
DEFINE myreport PROGRAM LD Monthly Report PROGRAM TRAP ON CLEANUP NOPRINT PUSH month DECIMALS LSIZE PAGESIZE LIMIT month TO LAST 1 ... POP month DECIMALS LSIZE PAGESIZE RETURN CLEANUP: POP month DECIMALS LSIZE PAGESIZE SIGNAL ERRORNAME ERRORTEXT END