Функция Выходной(ТекДень)
Если
ДеньНедели(ТекДень) >= 6
Или
ТекДень = Дата(Год(ТекДень),01,01)
Или
ТекДень = Дата(Год(ТекДень),02,23)
Или
ТекДень = Дата(Год(ТекДень),03,08)
Тогда
Возврат Истина;
Иначе
Возврат ЛОЖЬ
КонецЕсли;
КонецФункции
Функция ПодсчетВЦикле(ТекГод)
КолДнейВГоду = ?((ТекГод%4) = 0, 366, 365);

ТекДата = НачалоГода(Дата(ТекГод,01,01));
Счетчик = 0;
Для Итератор = 1 По КолДнейВГоду Цикл
Если Не Выходной(ТекДата) Тогда
Счетчик = Счетчик + 1;
КонецЕсли;

ТекДата = ТекДата + (24*3600);
КонецЦикла;
Возврат Счетчик;
КонецФункции

Для Счетчик = ПодсчетВЦикле(2010) по ПодсчетВЦикле(2015)Цикл
   
   Сообщить(Счетчик)
   
КонецЦикла;

А вопрос какой?

дарю

Функция Выходной(ТекДень)
возврат
ДеньНедели(ТекДень) >= 6
Или
ТекДень = Дата(Год(ТекДень),01,01)
Или
ТекДень = Дата(Год(ТекДень),02,23)
Или
ТекДень = Дата(Год(ТекДень),03,08)
КонецФункции

(1) юзай telepatbot.dll :)

Надо вывести сообщение например сколько рабочих дней в году 2010 по 2030 например без перебирания
Сообщить ПодсчетВЦикле(2010)
Сообщить ПодсчетВЦикле(2011)
Сообщить ПодсчетВЦикле(2012)
Сообщить ПодсчетВЦикле(2013)
Сообщить ПодсчетВЦикле(2014)
Сообщить ПодсчетВЦикле(2015)
Сообщить ПодсчетВЦикле(2016)
Сообщить ПодсчетВЦикле(2017) без этого сразу как сделать

Для н = 2010 по 2030 Цикл
Сообщить ПодсчетВЦикле(н)

для и=2010 по 2017 цикл
сообщить(подсчетвцикле(и))
конеццикла

спасибо

Функция ПодсчетБезЦикла(Год)
   Запрос = Новый Запрос;
   Запрос.Текст =
   "ВЫБРАТЬ
   |    СУММА(РегламентированныйПроизводственныйКалендарь.Пятидневка) КАК КоличествоДней
   |ИЗ
   |    РегистрСведений.РегламентированныйПроизводственныйКалендарь КАК РегламентированныйПроизводственныйКалендарь
   |ГДЕ
   |    РегламентированныйПроизводственныйКалендарь.Год = &Год";
   Запрос.УстановитьПараметр("Год",Год);
   Результат = Запрос.Выполнить();
   Выборка = Результат.Выбрать();
   Выборка.Следующий();
   Если Выборка.КоличествоДней = NULL Тогда
       ВызватьИсключение "Необходимо заполнить регл. календарь за " + XMLСтрока(Год) + " год";
   Иначе
       Возврат Выборка;
   КонецЕсли;
КонецФункции

ну и да - для заполнения календаря в типовых и БСП есть кнопка.

(8) ну ты лошара. ни версии платформы не знаешь, ни конфигурации. а если там самописка голимая?

пздц

(10) я д'Артаньян, ибо смотрю глубже. Количество и даты праздников имеют тенденцию меняться год от года, что, каждый раз обновление выкатывать?

если же его в конфе нету - он впиливается из БСП за 15 минут

(13) куда ты впиливать собрался? в клюшкину избушку? ты на версию ветки не смотри. она ни о чем

(14) А вы "Возврат А = Б" в клюшки собрался впилить? ну-ну...

*ты

ну что, получилось?

(15) пля. 1:1