ページの先頭行へ戻る
NetCOBOL V12.0 PowerCOBOL ユーザーズガイド
FUJITSU Software

7.6.2 UnicodeからシフトJISコードへの変換

UnicodeからシフトJISコードへの変換は、以下の変換ルーチンを呼び出します。

書き方

  CALL  ”POWERUTF16TOACP”
            USING  Unicode文字
                        シフトJISコード文字
Unicode文字
  PIC  N.

変換前のUnicodeの文字を示すデータ項目です。RCSオプションの設定に従ってエンディアンは自動判定されます。

シフトJISコード文字
  PIC  X(2).

シフトJISコードへ変換された文字を取り出すためのデータ項目です。1バイト文字の場合、2バイト目はX"00"が設定されます。

復帰値

復帰値(PROGRAM-STATUS)には、正常変換時は0が、変換に失敗した場合は0以外が設定されます。

書き方

  CALL  ” POWERUTF16TOACPCODE”
            USING  Unicode文字
                        シフトJISコード文字
Unicode文字
  PIC  N.

変換前のUnicodeの文字を示すデータ項目です。RCSオプションの設定に従ってエンディアンは自動判定されます。

シフトJISコード文字
  PIC  S9(4)  COMP-5.

シフトJISコードへ変換された文字を取り出すためのデータ項目です。取得した値をKeyPressイベントやPreKeyPressイベントの引数にそのまま設定することができます。

復帰値

復帰値(PROGRAM-STATUS)には、正常変換時は0が、変換に失敗した場合は0以外が設定されます。