Re: I guess I don't know dates -- RPG400-L

Subject: Re: I guess I don't know dates
From: Jon Paris <jon.paris@xxxxxxxxxxxxxx>
Date: Wed, 27 Jun 2012 14:57:38 -0400
List-archive: <http://archive.midrange.com/rpg400-l>
List-help: <mailto:rpg400-l-request@midrange.com?subject=help>
List-id: RPG programming on the IBM i / System i <rpg400-l.midrange.com>
List-post: <mailto:rpg400-l@midrange.com>
List-subscribe: <http://lists.midrange.com/mailman/listinfo/rpg400-l>, <mailto:rpg400-l-request@midrange.com?subject=subscribe>
List-unsubscribe: <http://lists.midrange.com/mailman/listinfo/rpg400-l>, <mailto:rpg400-l-request@midrange.com?subject=unsubscribe>

On 2012-06-27, at 1:16 PM, rpg400-l-request@xxxxxxxxxxxx wrote:

However, when these values are then moved into the fields as defined in the
DDS PF (definition example shown below), they all get *MDY. Doesn't matter
how they are defined in the DDS.

First of all there was no need to use the *ISO date field - why not simply target the fields in the PF with the %Date() directly?

As to what's going on - there is a "missing piece" - you haven't told us how you are checking.

In order to preserve format your best bet is to define an externally defined DS using the PF as the source and then read the records. I'm certain you will find that they all have exactly the format they should have.

Jon Paris

www.partner400.com
www.SystemiDeveloper.com

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.