v7: Как определить, что период не открыт?

//==============================================================================
// глНужноОткрытьПериод() © ТрДм 2007
Функция глНужноОткрытьПериод()
    //  Периодичность итогов регистров остатков устанавливается в меню Операции - Управление оперативными тогами-Периодичность сохранения остатков:
    // F – 5 дней. C – Декада (10 дней). T – 15 дней. M – месяц. Тип-Строка(1)
    вПериодичность = 5; // 5,10,15, месяц не указываем...
    ЗначВозврата = 0;
    вДней = ДатаЧисло(ПолучитьДатуТА());
    вДнейОткрытых = Цел(вДней/вПериодичность)* вПериодичность + ?(вДней % вПериодичность>0,вПериодичность,0);
    вТАОткрытаПо = НачМесяца(ТекущаяДата()) -1 + вДнейОткрытых;

    Если ТекущаяДата()>вТАОткрытаПо Тогда
        ЗначВозврата = 1;
    КонецЕсли;
    Возврат ЗначВозврата;
КонецФункции // глНужноОткрытьПериод()