|
UDATE is formatted based on the DATEDIT keyword on the header specification. If DATEDIT is not specified, then the format is always *MDY. If they have the DATEDIT keyword, then that will still be in effect when you consolidate your systems. >From the RPG IV manual: "Use the DATEDIT keyword on the control specification to specify the date formats of UDATE and *DATE: DATEDIT UDATE format *DATE format *MDY *MDY *USA (mmddyyyy) *DMY *DMY *EUR (ddmmyyyy) *YMD *YMD *ISO (yyyymmdd) Note that the DATEDIT keyword also controls the format of the Y edit code. If this keyword is not specified, the default is *MDY." -----Original Message----- From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Forbes, Vincent Sent: Thursday, October 07, 2004 3:29 PM To: 'RPG programming on the AS400 / iSeries' Subject: RE: System Date Problem LPAR is out, because of the cost to do it. Isn't the date format part of the locale? In other words, by specifying a different locale in the user profile, he'd get the correct format without needing the DCR, wouldn't he? Doesn't matter much since he's using QDATE instead of the job date, so changing the format of the job date doesn't help. Changing the user profile looks promising. Sorry, I meant UDATE. We have a lot of old RPG code that we are not going to convert to RPGLE {ain't broke...don't fix}. Thanks. It looks like it is going to be a lot of work & testing. \Vincent -----Original Message----- From: Bob Cozzi [mailto:cozzi@xxxxxxxxx] Sent: October 7, 2004 3:32 PM To: 'RPG programming on the AS400 / iSeries' Subject: RE: System Date Problem You can: 1) Change the job using CHGJOB and specify the desired date format. 2) Change your CL so that in addition to the date, you retrieve the job's date format and then act accordingly. 3) Already have code that is date-format independent (you should be here anyway.) 4) Explain exactly what you mean by RPG IV programs use "QDATE"?. QDATE is a system value, whereas RPG IV uses true date fields, or the old fashion *DATE/UDATE fields (which should be avoided). -----Original Message----- From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Forbes, Vincent Sent: Thursday, October 07, 2004 2:12 PM To: 'RPG programming on the AS400 / iSeries' Subject: System Date Problem We are going to merge 2 development boxes into one & upon looking at the system values, we found that one group has the system value QDATFMT "Date format" set to MDY & the other has it set to YMD. Is there a simple way {without changing all programs} to get around this? In other word, when one application's RPG {LE} program uses QDATE, it gets it in MDY format while the other application get it in YMD format. Vincent Forbes CIBC -- 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-2024 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.