Функция WeekStr

WeekStr( Date_ )   Возвращает строку с названием дня недели по дате.

Date_  - Дата в формате Clarion

Прототип: WeekStr (Long), String

WeekStr FUNCTION (Date_)   ! Возвращает строку с названием дня недели по дате
CODE
case (Date_ % 7)
of 1
   s" = 'Понедельник'
of 2
   s" = 'Вторник'
of 3
   s" = 'Среда'
of 4
   s" = 'Четверг'
of 5
   s" = 'Пятница'
of 6
   s" = 'Суббота'
of 0
   s" = 'Воскресенье'
.
return( s" )