AW: Date problem in RPG

[Werner Noll <werner.noll@xxxxxxxxx>]

Jan,

two things may affect the date format in RPG:
1. The keyword DATFMT in the H-Spec
2. A data area named RPGLEHSPEC in *LIBL with defaults
3. A data area named DFTLEHSPEC in QRPGLE with defaults

Check this sources.
Regards,
Werner Noll

-----Ursprüngliche Nachricht-----
Von: Jan Rockstedt [mailto:jan.rockstedt@xxxxxxxxxxxxxxxxx]
Gesendet: Freitag, 18. Juli 2003 14:30
An: midrange-l@xxxxxxxxxxxx
Betreff: Date problem in RPG


Hi !
 
We have two as/400 with V5R2M0.
Our programmer is saying that she have problem in our Model 270 wit the
RPG program.
Our Model 170 there is no problem with.
It's only problem in RPG.
 
The Modell 270 is showing the date with DDMMYYYY but our Modell 170 is
showing YYYYMMDD.
We wan't to have both our as/400 with YYYMMDD
 
I have look at the sysval *DATTIM but they are the same in both as/400.
 
Here are some info from our programmer.
 
 
                           Display Program Variables

 
  Program . . . . . . . . . . . . . . . . : DORSB2     
  Recursion level . . . . . . . . . . . . : 1              
  Start position  . . . . . . . . . . . . : 1           
  Format  . . . . . . . . . . . . . . . . : *CHAR      
  Length  . . . . . . . . . . . . . . . . : *DCL       
 
  Variable  . . . . . . . . . . . . . . . : *DATE
    Type  . . . . . . . . . . . . . . . . :   ZONED
    Length  . . . . . . . . . . . . . . . :   8 0
   '  7182003'
 
 

 
 Press Enter to continue.                                              
 
 F3=Exit   F12=Cancel                                                  

 
 
 
 
                            Display Program Variables

 
  Program . . . . . . . . . . . . . . . . : DORSB2     
  Recursion level . . . . . . . . . . . . : 1              
  Start position  . . . . . . . . . . . . : 1           
  Format  . . . . . . . . . . . . . . . . : *CHAR      
  Length  . . . . . . . . . . . . . . . . : *DCL       
 
  Variable  . . . . . . . . . . . . . . . : *DATE
    Type  . . . . . . . . . . . . . . . . :   ZONED
    Length  . . . . . . . . . . . . . . . :   8 0
   '  20030718'
 
 
 Press Enter to continue.                                              
 
 F3=Exit   F12=Cancel         
                                
 
How do we change so we can have YYYYMMDD in both as/400 ?
 
Regards Jan Rockstedt


_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.