How to get current date in DDS

5 pts.
Tags:
DDS
is it possible to get the current date (CUR_DATE()). how? R SERFMT                    PFILE(BLUSOC)     K SERSN                                       S SERIND                    COMP(NE 0)           SEROTD                    VALUES(0 99999999) S SEROTD                    COMP(GE CURDAT())

Software/Hardware used:
A/S400

Answer Wiki

Thanks. We'll let you know when a new response is added.

I have not seen it done. We get around a situation like this by using the OPNQRYF command. get date as a system variable and use that.

Similar to this.

OPNQRYF FILE((AFP)) FORMAT(*LIBL/AFP01) +
QRYSLT(‘(AFDATE *GE ‘ || &DTYMD ||
*AND AFDATE *LE ‘ || &DT2YMD || ‘)

Discuss This Question:  

 
There was an error processing your information. Please try again later.
Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.

Forgot Password

No problem! Submit your e-mail address below. We'll send you an e-mail containing your password.

Your password has been sent to:

To follow this tag...

There was an error processing your information. Please try again later.

Thanks! We'll email you when relevant content is added and updated.

Following

Share this item with your network: