Enform Plus Reference Manual

Clauses
Enform Plus Reference Manual—422684-001
5-44
Display Format
Alternatively, convert the date to an integer that can be formatted with an AS clause. For
example:
date AS M<99-99-9999>
To convert a date stored as a yearly Julian date, where the day of the year is relative to
January 1 of that year, define each part of the date:
05 yearly-julian-date.
10 day-of-year PIC "999".
10 current-year PIC "9999".
Then add day-of-year to the internal date for December 31 of the previous year:
(JULIAN-DATE ((current-year - 1)), 12, 31) + day-of-year)
Display Format
To print a date in internal format on a report, convert the date to a display format with an
AS DATE clause. See the AS DATE Clause on page 5-22.