Пример получения значений из календаря:
Функция ДнейЧасов(Начало,Окончание,Часов=0,Праздничных=0,Выходных=0) Календарь=СоздатьОбъект("СписокЗначений"); ЗначениеИзФайла(КаталогИБ()+"kalendar.rvs",Календарь); Дней=0; Для Сч=Начало По Окончание Цикл Значение=Календарь.Получить(Сч); Часы=Число(Значение); Если Часы=0 Тогда Если Найти(Значение,"П")=0 Тогда Выходных=Выходных+1; Иначе Праздничных=Праздничных+1; КонецЕсли; Иначе Дней=Дней+1; Часов=Часов+Часы; КонецЕсли; КонецЦикла; Возврат Дней; КонецФункции