ONWCHR: PROC OPTIONS(MAIN); DCL I FIXED BIN(15); DCL CSTR CHAR(4); DCL WSTR WCHAR(4); ON CONVERSION BEGIN; DCL BADCHAR WCHAR(1); PUT SKIP LIST("ON CONVERSION TRIGGERED"); BADCHAR = ONWCHAR(); PUT SKIP LIST (HEX(BADCHAR)); STOP; END ; WSTR = '9941004200430044'WX; PUT SKIP LIST(HEX(WSTR)); CSTR = WSTR; /* '9941'wx conversion error */ PUT SKIP LIST(CSTR); END;
次のように表示されます。
9941004200430044 ON CONVERSION TRIGGERED 9941
説明
ONWCHAR 関数は、CONVERSION 条件が発生する原因となるワイド文字を含んだ、長さが 1 のワイド文字列を返します。
ONWCHAR 関数は、CONVERSION 条件のために確立された ON ユニットにおいて使用できます。また、CONVERSION の ON ユニット でのエラー修正が失敗すると制御を得る、ERROR の ONユニット のために使用できます。