Re: Multi-currency -- RPG400-L

To my opinion there is more to multi currency than the representation of the 
amounts.
The representation in-fact has nothing to do with multi currency because it 
only reflects the local culture on how to represent an amount.
So in the USA you might represent all currency amounts (not only the USD) 
differently than in the rest of the world. The rest of the world will 
accordingly do just the opposite.
So the representation only makes it easy to instantly recognize and validate 
amounts based on what you are used to see.
Just the same as with dateformats. 
 
That kind of editing can be done based on *JOB or machine settings.
 
The Multi Currency 'problems' are more in the conversion issues involved. The 
different decimal positions used. The rate per 1, 10, 100 etc.. The different 
conversion rate per currency per region or country. Central Bank license fee's 
existence and types for Cross Border transfers. And just some more easily to 
imagine problems or challenges.
 
Have fun.
 
Eduard Sluis.

Frank.Kolmann@xxxxxxxxxx wrote:




I agree with Scott.
Did you consider using LOCALES.
I am using locales to control how dates are represented to users.

I have not tried to control curency formats, but there may be some way
using *DECFMT on the locale.

Your set access to locales vis the User Profile.
You need to create your locale. ( IBM ships a whole pile of default source
that are quite good)

The following parameters need to be set on the User Profile.
Locale job attributes . . . . . SETJOBATR *SYSVAL
Locale job attributes . . . . . *SYSVAL

Single Values
*SAME
*SYSVAL
*NONE
Other Values
*CCSID
*DATFMT
*DATSEP
*DECFMT
*SRTSEQ
*TIMSEP
Locale . . . . . . . . . . . . . LOCALE *SAME

Good Luck. If you get it to work can you post a reply, please.

Frank Kolmann

------------------------------
from: Scott Klement 
subject: Re: Multi-currency
Hi April,
> I am in the process of converting our applications software from USD to
> multi-currency. The question I have is there a way when printing within
> an RPG program I can change editing from USD editing to EUR. Example,
> USD is 999,999.99 EUR is 999.999,99

There was a good discussion on this topic in the iSeries Network's RPG
forums. Basically, what you need to do is:

1) code DECEDIT(*JOBRUN) on your H-spec.
2) format dates with *JOBRUN as well (charfld = %date(myDate: *JOBRUN))
3) Use the CHGJOB command to change the decimal format & date/time
separators as appropriate for the country.

4) Or, set up locales that will automatically set the job values.

--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.