...
4) В режиме приложения настроить обработки и добавить в константы Значения:
DocsInBox_Фирма - фирма заведенная в обработки
ПутьОбработкиDcBx - Пусть в формате строка (C:\dxbx\обработка.epf)
Для конфигурации Торговля и склад 9.2
...
| Code Block |
|---|
//+Docsinbox
Процедура ВыборФайлаОбработкиDcBx()
Каталог = "";
Стр = "Файлы обработок (*.ert) |*.ert";
Если ФС.ВыбратьФайл(0, ПутьОбработкиDcBx, Каталог, "Выберите файл", Стр, , ) = 1 Тогда
ПутьОбработкиDcBx = Каталог + ПутьОбработкиDcBx;
КонецЕсли;
КонецПроцедуры // ВыборФайла()
//-Docsinbox |
...
| Code Block |
|---|
//+Docsinbox
Если глПользователь.ЗапускDcBx = 1 Тогда
Если ПустоеЗначение(глПользователь.ПутьОбработкиDcBx) = 0 Тогда
ФайлОбработки = глПользователь.ПутьОбработкиDcBx;
Если ФС.СуществуетФайл(ФайлОбработки)=1 Тогда
ОткрытьФорму("Отчет","AutoStart",ФайлОбработки);
// ОбработкаОжидания("ЗапуститьЗавершениеСеанса",30);
КонецЕсли;
КонецЕсли;
КонецЕсли;
//-Docsinbox |
...
В глобальном модуле конфигурации (правой кнопкой мыши по конфигурации – Глобальный модуль) Добавить код в процедуру ПриНачалеРаботы Системы()
| Code Block |
|---|
//+Docsinbox
Если ИмяПользователя()="" тогда
Если ПустоеЗначение(Константа.ПутьОбработкиDcBx) = 0 Тогда
ФайлОбработки = Константа.ПутьОбработкиDcBx;
Если ФС.СуществуетФайл(ФайлОбработки)=1 Тогда
ОткрытьФорму("Отчет","AutoStart",ФайлОбработки);
//ОбработкаОжидания("ЗапуститьЗавершениеСеанса",30);
КонецЕсли;
КонецЕсли;
КонецЕсли;
//-Docsinbox |
...