Как блокировать всплывающее диалоговое окно?
13.07.2011
08:24
#1
"В результате выполнения внешней обработки в конфигурации УПП, несколько раз выдается диалоговое сообщение: "Установить счета бух. и налогового учета в соответствии со значениями по умолчанию?" "Да", "Нет". Как изменить внешнюю обработку чтобы диалоговое сообщение не выводилось, а все автоматически было "Да"?
Текст внешней обработки:
Процедура Сформировать() Экспорт
Выборка = Документы.РеализацияТоваровУслуг.Выбрать(Дата1,КонецДня(Дата2));
Пока Выборка.Следующий() Цикл
Если Не Выборка.ПометкаУдаления и Выборка.Проведен Тогда
Док = Выборка.ПолучитьОбъект();
Сообщить(СокрЛП(Выборка.Ссылка));
Док.ОтражатьВБухгалтерскомУчете=Истина;
Док.ОтражатьВНалоговомУчете=Истина;
Если Не СчетаУчетаВДокументах.ИнтерактивноПерезаполнитьСчетаУчета(Док, Истина, Новый Структура("Товары,ВозвратнаяТара,Услуги,СоставНабора"), Истина, Истина) Тогда
Сообщить(СокрЛП(Выборка.Ссылка) +" - Счета БУ и НУ не установлены!",СтатусСообщения.ОченьВажное);
Иначе
// Док.Записать();
Док.Записать(РежимЗаписиДокумента.Проведение);
КонецЕсли;
КонецЕсли;
КонецЦикла;
Предупреждение("Обработка завершена!");
КонецПроцедуры
Заранее благодарен."
Текст внешней обработки:
Процедура Сформировать() Экспорт
Выборка = Документы.РеализацияТоваровУслуг.Выбрать(Дата1,КонецДня(Дата2));
Пока Выборка.Следующий() Цикл
Если Не Выборка.ПометкаУдаления и Выборка.Проведен Тогда
Док = Выборка.ПолучитьОбъект();
Сообщить(СокрЛП(Выборка.Ссылка));
Док.ОтражатьВБухгалтерскомУчете=Истина;
Док.ОтражатьВНалоговомУчете=Истина;
Если Не СчетаУчетаВДокументах.ИнтерактивноПерезаполнитьСчетаУчета(Док, Истина, Новый Структура("Товары,ВозвратнаяТара,Услуги,СоставНабора"), Истина, Истина) Тогда
Сообщить(СокрЛП(Выборка.Ссылка) +" - Счета БУ и НУ не установлены!",СтатусСообщения.ОченьВажное);
Иначе
// Док.Записать();
Док.Записать(РежимЗаписиДокумента.Проведение);
КонецЕсли;
КонецЕсли;
КонецЦикла;
Предупреждение("Обработка завершена!");
КонецПроцедуры
Заранее благодарен."
Некорректно формируются суммы уплаченных страховых взносов в УСНКак сменить фамилию сотруднику в бухгалтерии
Читают тему
(гостей: 1)