Функция ПолучитьКоличествоДней()

    

    Счетчик = 1;

    НачалоПериода = Объект.НачалоПериода;

    

    Пока НачалоПериода < Объект.КонецПериода Цикл 

        

        Счетчик = Счетчик + 1;

        

        НачалоПериода = НачалоПериода + 86400;

        

    КонецЦикла;

    

    Возврат Счетчик

    

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