RE: Source code retrieval from opbject of display file

["Nicolay, Paul" <paul_nicolay@xxxxxxxxx>]

Oscar,

Could you check the job settings of the job having problems ?

Do you have header specifications (coded in the program, or via the dataarea
mentioned earlier) ?

Kind regards,
Paul

-----Original Message-----
From: Oscar Barberá [mailto:barberao@yahoo.es]
Sent: 20 March, 2002 16:05
To: rpg400-l@midrange.com
Subject: RE: Source code retrieval from opbject of display file


Paul, We have the system value  QDATFMT set to DMY, but we get
03/20/2002 for 20th of April of 2002.

Am I missing anything?

--- "Nicolay, Paul" <paul_nicolay@merck.com> escribió: > Hi,
>
> This can be accomplished by different methods...
>
>       - The system value QDATFMT
>       - RPG header specifications
>
> A better solution is however to work with Date data types.
>
> Kind regards,
> Paul
>
> -----Original Message-----
> From: Oscar Barberá [mailto:barberao@yahoo.es]
> Sent: 20 March, 2002 14:32
> To: rpg400-l@midrange.com
> Cc: R_C_DuVall@daaokc.com
> Subject: RE: Source code retrieval from opbject of display
> file
>
>
> Dear friends,
>
> I have some programs with the next code line:
>
> C                 z-add     *DATE         xpdat0            8
> 0
>
>
> Until now, the result of this operaction was DDMMYYYY. But
> last
> week, our AS/400 was broken down, and we had to restore all
> the
> OS. And here comes the problem. Now, the result of the
> operation
> is MMDDYYYY.
>
> Do you know how to solve this?
>
> TIA,
> Oscar Barbera
>
>
>
_______________________________________________________________
> Do You Yahoo!?
> Yahoo! Messenger
> Comunicación instantánea gratis con tu gente.
> http://messenger.yahoo.es
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>

_______________________________________________________________
Do You Yahoo!?
Yahoo! Messenger
Comunicación instantánea gratis con tu gente.
http://messenger.yahoo.es
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.