The CURRENCY SIGN clause affects numeric-edited data items whose PICTURE character-strings contain a currency symbol. A currency symbol represents a currency sign value that is:
Typically, currency sign values identify the monetary units stored in a data item. For example: '$', 'EUR', 'CHF', 'JPY', 'HK$', 'HKD', or X'9F' (hexadecimal code point in some EBCDIC code pages for ph conref="lrsymbols.dita#lrm/euro">, the Euro currency sign). For details on programming techniques for handling the Euro, see the Enterprise COBOL Programming Guide.
The CURRENCY SIGN clause specifies a currency sign value and the currency symbol used to represent that currency sign value in a PICTURE clause.
The SPECIAL-NAMES paragraph can contain multiple CURRENCY SIGN clauses. Each CURRENCY SIGN clause must specify a different currency symbol. Unlike all other PICTURE clause symbols, currency symbols are case sensitive. For example, 'D' and 'd' specify different currency symbols.
If the PICTURE SYMBOL phrase is not specified, literal-6:
If the PICTURE SYMBOL phrase is specified, literal-6:
literal-7 must be an alphanumeric literal consisting of one single-byte character. literal-7 must not be any of the following:
If the CURRENCY SIGN clause is specified, the CURRENCY and NOCURRENCY compiler options are ignored. If the CURRENCY SIGN clause is not specified and the NOCURRENCY compiler option is in effect, the dollar sign ($) is used as the default currency sign value and currency symbol. For more information about the CURRENCY and NOCURRENCY compiler options, see the Enterprise COBOL Programming Guide.