Бух 3.0 как к дате начала просрочки платежа добавить возможные праздничные дни ?

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