This command may be discontinued in a future release. We highly recommend that you no longer use this command. To take advantage of newer Production Reporting functionality, use ALTER-LOCALE.
Redefines the currency symbol within numeric edit masks.
DOLLAR-SYMBOL new_symbol
new_symbol
A new, single character to be used in edit masks instead of the dollar sign ($).
The dollar sign ($) is the default currency symbol for coding edit masks in the program that prints on report listings. The DOLLAR‑SYMBOL provides a way to change that symbol for both the edit mask and for printing.
If you wish to change the symbol that prints on the report, use MONEY‑SYMBOL in the PROCEDURE section. DOLLAR‑SYMBOL and MONEY‑SYMBOL can be used together to customize your Production Reporting programs and the reports they produce.
This command is used only in the SETUP section.
MONEY-SYMBOL has the same effect as these options of the ALTER-LOCALE command: MONEY-SIGN and MONEY-SIGN-LOCATION=LEFT.
Table 109 lists the characters that DOLLAR-SYMBOL cannot take.
The following example shows how to use the DOLLAR-SYMBOL command:
begin-setup dollar-symbol £ ! Define £ as the currency symbol end-setup begin-procedure ... print #amount () edit £££,999.99 ... end-procedure
In the previous example, if you used the dollar sign in the edit mask after defining the dollar symbol as £, the following error message appears:
Bad numeric 'edit' format: $$$,999.99