[AccessD] Currency symbols

I'm not sure this is less work but:

In a packaged app that I sell overseas (when I'm lucky) I took the Currency format out of the dollar figures throughout the app and replaced it with Standard.  On the user's Preferences form, I gave them a place where they could enter whatever currency symbol they want and made it big enough to hold three characters so they could put in Rls, Pta, or whatever. 

Then I put a text box to the left of the text box with the money numbers to print a currency symbol.  The control source for the currency symbol text box is =currencysymbol() where currencysymbol() is a function which returns the currency symbol from the user's preferences table.

So the user has control over what symbol they want on their money numbers. But this may be overkill for you.

Rocky



-----Original Message-----
From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Doug Steele
Sent: Thursday, November 26, 2009 8:47 AM
To: Access Developers discussion and problem solving
Subject: [AccessD] Currency symbols

I've just had a request to change a purchase order database to allow printing of Euro currency as required.  My first crack at this is to do the following in each currency text box on the printout:

=iif(CustCurrency="USD",format(POValue,"$#,###.00"),format(POValue,"€#,###.00")

(I hope the Euro sign came through in the second format string)

This is going to be a bit tedious - does anyone have a better method? Some reports will have to both both EUR and USD currencies, so I can't set anything before the report prints.

Doug Steele
--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com