Как праздники включить в выходные дни

[skaut]

Создайте внешнюю обработку «Вычисление рабочих дней». Данная обработка должна
вычислять количество рабочих дней в году, исходя из следующих условий:
- нерабочими днями считаются субботы и воскресенья;
- праздниками являются 1 января, 23 февраля и 8 марта;
- если праздничный день попадает на субботу или воскресенье, то он не переносится.

[antoneus]

А зачем новую тему создавать? Как происходит вычисление количества рабочих дней?

[АлександрВладимирович]

как-то так:

Код Выделить Развернуть

Функция КоличествоРабочихДнейВГоду(Год)

Результат = 0;

ОчереднойДень = Дата(Год, 1, 1);

Пока Год(ОчереднойДень) = Год Цикл

Если НЕ (ДеньНедели(ОчереднойДень) > 5 ИЛИ ЭтоПраздник(ОчереднойДень)) Тогда
Результат = Результат + 1;
КонецЕсли;

ОчереднойДень = ОчереднойДень + 86400;

КонецЦикла;

Возврат Результат;

КонецФункции


Функция ЭтоПраздник(Дата)

Если (День(Дата) = 1 И Месяц(Дата) = 1) ИЛИ
(День(Дата) = 23 И Месяц(Дата) = 2) ИЛИ
(День(Дата) = 8 И Месяц(Дата) = 3) Тогда

  Возврат Истина;
 
  Иначе
 
  Возврат Ложь;

КонецЕсли;

КонецФункции