900-GET-WEEKDAY-LIT

900-GET-WEEKDAY-LIT converts the date in WSDR-FR-DATE to a display format of the name of the day of the week. Detects the end user's locale and translates the weekday literal for that locale. For an invalid date, the field is cleared and left blank. See Century Parameter Processing.

Library CALRTNS

Required Input

Field Type and length Definition
WSDR-FR-DATE N 8 Date to convert.

Output

Field Type and length Definition
WSDR-LITERAL-WEEKDAY A 20

Name of the day of the week. This variable returns the full weekday literal, never the abbreviation, in the language determined by the end user's locale.

When invalid, the field is cleared and left blank.
WSDR-ERROR-NBR N 9

Error number.

See Error Number.
WSDR-ERROR-VAR A 20 Input parameter is in error.

Programming Example

*       Convert date for report heading.
        MOVE report-date                    TO WSDR-FR-DATE.
        PERFORM 900-GET-WEEKDAY-LIT.