Chapter 4-6: ILF Keyword Reference
SET DAY
The SET DAY statement extracts the day of the week from a date/time field.
••••• SET DAY ••• •••••••••••••••••••••• ••• • ••• •••••••••••••••••••••• •••
(1) (2) (3) (4)(5) (6) (7) (8)
(5) Type (S=short name, L=long name) | |
(4) Destination occ (constant/index) |
(8) Source occurrence (constant/index) |
If the type (item 5) is S (short), the result is returned in the destination field as three characters (for example, “Wed”). If the type is L (long), the result is returned in the destination field as up to nine characters (for example, “Wednesday”). If the source field is blank, the destination field is set to blank.
The destination must be an alpha field type and the source must be a date/time field type containing at least year, month, and day.
If the source field is one of the Gregorian date/time field types, a non-recoverable error occurs if it does not contain the year, month, and day parts. If the source field is one of the Julian date/time field types, a non-recoverable error occurs if it does not contain the year and day parts.
The following example begins with an adjustment date, and retrieves and displays all of the days of the week, beginning with that day.
*
* Set and display days of the week
*
SET TAR WORK DATE = TAR ADJUST2 ADJ DATE
BEG LOOP X = 001 TO 007 STEP 001
SET DAY TAR WORK DAY DESCRIPT X S TAR WORK DATE
DATE ADD TAR WORK DATE 5 1
DISPLAY TAR WORK DAY DESCRIPT X (AT APPEARANCE # )
END LOOP X
APPX Application Design Manual (01/13/03)
© 2003 by APPX Software, Inc. All rights reserved