Date weirdness in RPGLE

[Peter.Colpaert@xxxxxxxxxxxx]

Hi group,

I have just come across this very strange phenomenon:

We have a program that contains the following code:

D  IsoDat         S               D   DATFMT(*ISO)

C                   Movel     *DATE         IsoDat

Now if we run this program on our development machine (V4R3M0) this works fine,
even though the system value QDATFMT is DMY.

However, when I run this same program on one of our production machines (V3R2M0
- I know, old but no
budget to upgrade) this doesn't work because the system value QDATFMT is DMY.

If I first move to an *EUR formatted date field and from there to the *ISO date
field, it works just fine.

Can anybody explain this?

Thanks.

Peter Colpaert
Analyst-Programmer
Honda Europe NV - Belgium
----------
A program is a device used to convert data into error messages.
----------