+---------------------------------+
|          SET CURRENCY           |
+---------------------------------+
SET CURRENCY TO [<expC>]

SET CURRENCY LEFT | RIGHT

-----------------------------------
Specifies the currency symbol and position.
Default value - "$"
Default value - LEFT
-----------------------------------

<expC>
        A one- to nine-character string representing currency symbol. Using SET
CURRENCY TO without <expC> resets the currency symbol to the default
dollar sign ($).

LEFT | RIGHT
        Allows you to position currency symbol to left or right of currency
value.

+---------------------------------+
|             Example             |
+---------------------------------+
You can display a different currency symbol ('DM') on both sides of the
currency value.  Use PICTURE to display the currency symbol, be sure to
include an @ before the dollar sign.

STORE SET('CURRENCY') TO currposit
STORE 1234.56 TO dollaramnt
CLEAR

SET CURRENCY TO 'DM'
@ 2,2 SAY dollaramnt PICTURE '@$99,999.99'

IF currposit = 'LEFT'
        SET CURRENCY RIGHT
ELSE
        SET CURRENCY LEFT
ENDIF
@ 4,2 SAY dollaramnt FUNCTION '$99,999.99'