|
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 <rpg400-l@xxxxxxxxxxxxxxxx> 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.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.