Открытие периода оперативных итогов
// Открытие периода ДатаТА = ПолучитьДатуТА(); Если (РабочаяДата() > ДатаТА) И ((ДатаМесяц(ДатаТА) <> ДатаМесяц(РабочаяДата())) ИЛИ (ДатаГод(ДатаТА) <> ДатаГод(РабочаяДата()))) Тогда Если МонопольныйРежим() = 0 Тогда Ответ=Вопрос(“Не открыт период!” + РазделительСтрок + “Для открытия периода запустите программу в монопольном режиме!” + РазделительСтрок + “Завершить работу программы?”,“Да+Нет”); Если Ответ=“Да” Тогда СтатусВозврата(0); Возврат; КонецЕсли; Иначе // монопольный режим Ответ=Вопрос(“Не открыт период!”+ РазделительСтрок +“Выполнить открытие периода?”,“Да+Нет”); Если Ответ=“Да” Тогда УстановитьТАНа(РабочаяДата()); КонецЕсли; КонецЕсли; КонецЕсли;
|