NATIONAL-OF
NATIONAL-OF 関数は、引数-1 の文字の国別文字表現で構成される国別文字ストリングを戻します。
この関数のタイプは国別です。
| フォーマット |
 >>-FUNCTION NATIONAL-OF--(--引数-1--+--------+--)--------------><
'-引数-2-'
|
- 引数-1
- 英字、英数字、または DBCS のクラスに属さなければなりません。引数-1 は変換に使用するソース・ストリングを示します。
- 引数-2
- 整数であるか、クラスが英数字でなければなりません。引数-2 は変換に使用するソース・コード・ページを示します。
引数-2 は、EBCDIC、ASCII、UTF-8、UTF-16、または EUC コード・ページ、あるいは 付録F. コード・ページ名に示される UTF-16LE 以外のコード・ページのいずれかでなければなりません。EBCDIC または ASCII コード・ページには 1 バイト文字と 2 バイト文字の両方を含めることができます。
引数-2 が整数の場合、整数は有効な CCSID 番号である必要があります。引数-2 のクラスが英数字の場合、内容は 付録F. コード・ページ名に示される基本または代替コード・ページ名である必要があります。
引数-2 を省略すると、ソース・コード・ページは以下のようにして決定されます。
- 引数-1 がネイティブ項目 (ASCII または ASCII DBCS データを含む USAGE
DISPLAY または USAGE DISPLAY-1) の場合、ソース・コード・ページはランタイムのロケールから決定されます。
- 引数-1 が EBCDIC または EBCDIC DBCS データを含む USAGE DISPLAY または USAGE DISPLAY-1 項目の場合、ソース・コード・ページは、EBCDIC_CODEPAGE 環境変数が設定されていればそこから決定されます。EBCDIC_CODEPAGE 環境変数が設定されていない場合、ソース・コード・ページは「COBOL for Windows プログラミング・ガイド」に示されるデフォルトのコード・ページです。
戻り値は、国別文字の表現に変換された引数-1 の文字で構成される国別文字ストリングです。
ソース文字を国別文字に変換できないときは、ソース文字は置換文字に変換されます。次のように変換されます。
- 1 バイト文字に変換する場合は X'001A'
- マルチバイト文字に変換する場合は X'FFFD'
例外条件は発生しません。
戻り値の長さは、引数-1 の内容およびソース・コード・ページの特性によって異なります。
使用上の注意:
- コード・ページ名を使用すると、他の Windows ソフトウェアとの整合性を保てますが、ソース・コードは Enterprise COBOL for z/OS に移植できません。
- UTF-8 を表す CCSID は 1208 です。
- UTF-16LE を表す CCSID は 1202 です。
例外: 変換が失敗した場合、重大なランタイム・エラーが発生します。
|