CURRENCY SIGN 節

通貨記号は通貨符号値 を表します。これは、以下のようになります。

• 前述のようなデータ項目が受け取り項目として使用された場合には、そのデータ項目に挿入されます。
• 受け取り側の数字または数字編集の送り出し項目として使用された場合には、そのデータ項目から除去されます。

一般に通貨符号値は、データ項目に保管される通貨単位を示します。 例えば、'$'、'EUR'、'CHF'、'JPY'、'HK$'、'HKD'、またはX'9F'（ユーロの通貨記号である€を表すいくつかのEBCDICコードページの16進コードポイント）。 ユーロを処理するためのプログラミング手法の詳細については、「 Enterprise COBOL プログラミング・ガイド」の「 通貨記号の使用 」を参照してください。

CURRENCY SIGN 節は、通貨符号値、 および PICTURE 節でその通貨符号値を表すために使用する通貨記号を指定します。

SPECIAL-NAMES 段落には複数の CURRENCY SIGN 節を含めることができます。 各 CURRENCY SIGN 節ごとに違う通貨記号を指定することが必要です。 他のすべての PICTURE 節記号とは異なり、通貨記号は大/小文字が区別されます。 例えば、'D' と 'd' は異なる通貨記号を指定します。

CURRENCY SIGN IS リテラル-6

リテラル-6 は英数字リテラルでなければなりません。 リテラル-6 は、形象定数またはヌル終了リテラルにすることはできません。 literal-6 には、 DBCS 文字を含めることはできません。

PICTURE SYMBOL 句が指定されていない場合、リテラル-6 は、以下のようになります。

• 通貨符号値と、その通貨符号値を表すための通貨記号を指定します。
• 単一文字でなければなりません。
• 以下の数字および文字は使用できません。
  • 数字 0 から 9
  • アルファベット A、B、C、D、E、G、N、P、R、S、U、 V、X、Z、小文字、またはスペース
  • 特殊文字 + - , . * / ; ( ) " = ' (正符号、負符号、コンマ、ピリオド、アスタリスク、スラッシュ、セミコロン、左括弧、右括弧、引用符、等号、等号、アポストロフィ)
• 小文字の英字 f、h、i、j、k、l、m、o、q、t、w、y のいずれかです。

PICTURE SYMBOL 句が指定されている場合、リテラル-6 は、以下のようになります。

• 通貨符号値を指定します。 PICTURE SYMBOL 句の中のリテラル-7 は、この通貨符号値を表すための通貨記号を指定します。
• 1 つ以上の文字で構成できます。
• 以下の数字および文字は使用できません。
  • 数字 0 から 9
  • 特殊文字 +-.,

PICTURE SYMBOL リテラル-7

PICTURE 節でリテラル-6 によって指定される通貨符号値を表すために使用できる通貨記号を指定します。

リテラル-7 は 1 つの 1 バイト文字で構成される英数字リテラルでなければなりません。 リテラル-7 には、以下の数字および文字を使用しないでください。

• 形象定数
• 数字 0 から 9
• アルファベット A、B、C、D、E、G、N、P、R、S、U、 V、X、Z、小文字、またはスペース
• 特殊文字 +-,. */; () " = '

CURRENCY SIGN 節が指定されている場合、CURRENCY および NOCURRENCY コンパイラー・オプションは無視されます。 CURRENCY SIGN 節が指定されない場合、NOCURRENCY コンパイラー・オプションが有効であれば、ドル記号 ($) がデフォルトの通貨記号値および通貨記号として使用される。 CURRENCY および NOCURRENCY コンパイラー・オプションについて詳しくは、 Enterprise COBOL プログラミング・ガイドの 通貨 を参照してください。