Re: Multi-currency

[Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>]

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.

You can get details by checking out the thread I'm referring to at the
following link (requires a membership to the iSeries Network, but a free
"associate" membership will work):

http://www.iseriesnetwork.com/Forums/Thread.cfm?CFApp=54&&Message_ID=137718