retriving system date

[sriram]

hai this is sriram
how to reterive system date in rpgle?and coding is needed for me?

[arrow483]

Re: retriving system date

Define a date field (for example SysDate)

Calc line

Eval SysDate = %date()

[ReachKrishna]

Re: retriving system date

You can also use the following

MOVE *DATE RDATE

Where RDATE will be character of length 8.

-KR

[arrow483]

Re: retriving system date

*DATE and UDATE will retrieve the job date, not the system date. The job date is the date the job entered the system. System date is the actual date from the system clock. These are different when, for example, a job is started and runs beyond midnight.

To get the system date, you need to use the TIME command or the %DATE() function.

[Red]

Re: retriving system date

You could also pick it up in the program status data structure - positions 276-281

[Ashutoshj]

Re: retriving system date

Can u send me code for retriving system date using TIME or %date

[arrow483]

Re: retriving system date

SysDate = %date()

[BenThurley]

Re: retriving system date

Personally I have a copy of Bob Cozzi's book "The modern RPG IV language" sat on the end of my desk.

If you can't stretch to that then there's a similar body of information here:

http://publib.boulder.ibm.com/iseries/v5r2/ic2924/books/c092508402.htm