|
Yes, the *YMD format only has 6 digits in it. You would need to use *ISO in Factor 1 to get it to be YYYYMMDD format, which is what I think you want. -Bob Cozzi -----Original Message----- From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Joubert, Robert Sent: Wednesday, February 18, 2004 3:21 PM To: rpg400-l@xxxxxxxxxxxx Subject: What am I doing wrong... I just know that I am doing something wrong but I cannot figure it out. The field @todte has a value of 010105, the field USADate has a value of 01/01/2005 but BOTH #PToDate8 and #PToDate10 has the value of 00050101. Can anyone tell me what I have missed? The code look like this:- H DATEDIT(*YMD) ...... D @todte S 6 0 inz(0) D #PToDate8 S 8 0 inz(0) D #PToDate10 S 10 0 inz(0) D USADate S D DATFMT(*USA) ....... C *mdy move @todte USADate C *ymd move USADate #PToDate8 C *ymd move USADate #PToDate10 Rob Joubert Authentic Fitness Corporation (323) 837-6486 rjoubert@xxxxxxxxxxxxxxxxxxxx _______________________________________________ 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.
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.
midrange.com
