PERROR

可搬用サブルーチン:最後に検出されたエラーに対して,指定した文字列を先に送り,標準エラー・ストリームにメッセージを送ります。

モジュールUSE DFPORT

形式

CALL PERROR ( string )

string
(入力) CHARACTER*(*)。標準エラー・メッセージより先に送るメッセージ。

送られる文字列は,GERROR で与えられるものと同じものです。

互換性

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

関連情報

GERRORIERRNO

	USE DFPORT
	character*24 errtext
	errtext = 'In my opinion, '
	. . .
	! errtxt で生成されるエラー・メッセージは,
	! 'In my opinion, ' の後に表示されます。
	Call PERROR (errtext)