Re: Date in RPGLE

[Booth Martin <booth@xxxxxxxxxxxx>]

This code:

D wDate                           d   inz(*sys)    
D wChar10                       10 
C                   eval      wChar10 = %char(wDate: *cymd0)   
C     wChar10       dsply 
        
gave me this result.                          
DSPLY  1081222

(I wasn't sure if you wanted *CYMD0  or *YMD0.  )


anupam.sinha@xxxxxxxxxxxxxxxxxxxxxxx wrote:
> Hi All,
>
> Sorry if this was covered previously, but i could not find in relevant 
> google/archive search.
>
> Is there any opcode/function in RPGLE through which we can get the system 
> date in YYYMMDD format without any separators? I know how to do it with 
> data structures, but dont want to use it everytime.
>
> TIA
>
> Anupam Sinha
>