Define a date field in a date format of your choice: D Sysdate S D DatFmt(*USA) or D SysDate S D DatFmt(*ISO) The first format is MM/DD/YYYY, the second is YYYY-MM-DD. Retrieve the system date: C Move UDATE Sysdate *********************************************************************** Actually UDATE is the JOB date, not the system date. You can get the system date by just EVAL SysDate = %date() As noted above, you can define the date field any way you want. *********************************************************************** If you define a date field in D-specs tou can add an Inz(*Sys) after DatFmt and this will set the variable to the system date automatically at program startup. Likewise if you add an Inz(*Job) you get the job date or UDATE value.

Define a date field in a date format of your choice: D Sysdate S D DatFmt(*USA) or D SysDate S D DatFmt(*ISO) The first format is MM/DD/YYYY, the second is YYYY-MM-DD. Retrieve the system date: C Move UDATE Sysdate *********************************************************************** Actually UDATE is the JOB date, not the system date. You can get the system date by just EVAL SysDate = %date() As noted above, you can define the date field any way you want. *********************************************************************** If you define a date field in D-specs tou can add an Inz(*Sys) after DatFmt and this will set the variable to the system date automatically at program startup. Likewise if you add an Inz(*Job) you get the job date or UDATE value.