// Открытие периода

ДатаТА = ПолучитьДатуТА();

Если (РабочаяДата() > ДатаТА) И ((ДатаМесяц(ДатаТА) <> ДатаМесяц(РабочаяДата())) ИЛИ (ДатаГод(ДатаТА) <> ДатаГод(РабочаяДата()))) Тогда

     Если МонопольныйРежим()  =  0 Тогда

          Ответ=Вопрос("Не открыт период!" +  РазделительСтрок  + "Для открытия периода запустите программу в монопольном режиме!" +  РазделительСтрок  + "Завершить работу программы?","Да+Нет");

          Если Ответ="Да" Тогда

               СтатусВозврата(0);

               Возврат;

          КонецЕсли;        

     Иначе     // монопольный режим

          Ответ=Вопрос("Не открыт период!"+ РазделительСтрок +"Выполнить открытие& ;периода?","Да+Нет");

          Если Ответ="Да" Тогда

               УстановитьТАНа(РабочаяДата());

          КонецЕсли;

     КонецЕсли;

КонецЕсли;