Функция МетодСервера(Знач ИмяМодуля= "", ИмяМетода,
Параметр0= NULL, Параметр1= NULL, Параметр2= NULL, Параметр3= NULL, Параметр4= NULL,
Параметр5= NULL, Параметр6= NULL, Параметр7= NULL, Параметр8= NULL, Параметр9= NULL) Экспорт
Если НЕ ЗначениеЗаполнено(ИмяМодуля) Тогда
ИмяМодуля = ПараметрыКлиентСервер.ИмяОбработки;
ИначеЕсли ИмяМодуля = "Модуль_Интеграция" Тогда
ИмяМодуля = ПараметрыКлиентСервер.ИмяФормыИнтеграции;
ИначеЕсли ИмяМодуля = "Модуль_ИнтеграцияУниверсальный" Тогда
ИмяМодуля = ПараметрыКлиентСервер.ИмяОбработки;
КонецЕсли;
Результат = ВыполнитьМетод(ИмяМодуля, ИмяМетода
, Параметр0, Параметр1, Параметр2, Параметр3, Параметр4
, Параметр5, Параметр6, Параметр7, Параметр8, Параметр9
);
Возврат Результат;
КонецФункции
Процедура ПовторноеИспользованиеСброситьЗначение(Знач ИмяМодуля= "", ИмяМетода,
Параметр0= NULL, Параметр1= NULL, Параметр2= NULL, Параметр3= NULL, Параметр4= NULL,
Параметр5= NULL, Параметр6= NULL, Параметр7= NULL, Параметр8= NULL, Параметр9= NULL) Экспорт
Если НЕ ЗначениеЗаполнено(ИмяМодуля) Тогда
ИмяМодуля = ПараметрыКлиентСервер.ИмяОбработки;
ИначеЕсли ИмяМодуля = "Модуль_Интеграция" Тогда
ИмяМодуля = ПараметрыКлиентСервер.ИмяФормыИнтеграции;
ИначеЕсли ИмяМодуля = "Модуль_ИнтеграцияУниверсальный" Тогда
ИмяМодуля = ПараметрыКлиентСервер.ИмяОбработки; // Рома
КонецЕсли;
МассивПараметров= МассивПараметров(
Параметр0, Параметр1, Параметр2, Параметр3, Параметр4,
Параметр5, Параметр6, Параметр7, Параметр8, Параметр9);
УдалитьРезультатФункцииИзКэш(ИмяМодуля, ИмяМетода, МассивПараметров);
КонецПроцедуры
Функция ИмяМенеджераИнтеграции()
Возврат "Модуль_ИнтеграцияУниверсальный";
КонецФункции
Функция МенеджерИнтеграции_НоваяНоменклатураИнформационнойБазы(Номенклатура = Неопределено, Характеристика = Неопределено, Упаковка = Неопределено)
Результат = МетодСервера("Модуль_ИнтеграцияУниверсальный", "НоваяНоменклатураИнформационнойБазы"
, Номенклатура
, Характеристика
, Упаковка);
Возврат Результат;
КонецФункции
Процедура МенеджерИнтеграции_НайтиНоменклатуруИнформационнойБазы(НоменклатураИБ, НоменклатураКонтрагента)
МетодСервера("Модуль_ИнтеграцияУниверсальный", "НайтиНоменклатуруИнформационнойБазы"
, НоменклатураИБ
, НоменклатураКонтрагента);
КонецПроцедуры
Функция КаталогиВложенныхОбработокВРежимеОтладки()
КаталогБиблиотек = "libs";
КаталогИнтеграции = "include";
Результат = Новый Соответствие;
Результат.Вставить("Модуль_РаботаСВнешнимиПечатнымиФормами" , КаталогИнтеграции);
Результат.Вставить("Модуль_ИнтеграцияУниверсальный" , КаталогИнтеграции);
Результат.Вставить("Модуль_ИнтеграцияБП30" , КаталогИнтеграции);
Результат.Вставить("Модуль_ИнтеграцияУТ11" , КаталогИнтеграции);
Результат.Вставить("Модуль_ИнтеграцияБГУ20" , КаталогИнтеграции);
Результат.Вставить("Модуль_ИнтеграцияУНФ16" , КаталогИнтеграции);
Результат.Вставить("Модуль_ИнтеграцияРозница" , КаталогИнтеграции);
Результат.Вставить("Модуль_ИнтеграцияАльфаАвто6" , КаталогИнтеграции);
Результат.Вставить("ГенерацияXML" , КаталогБиблиотек);
Результат.Вставить("ПечатныеФормы" , КаталогБиблиотек);
Возврат Результат;
КонецФункции
Функция МетаданныеСчетовФактурПолученных()
Результат = Новый Массив;
ВидыЭД = МетодСервера("Модуль_ИнтеграцияУниверсальный", "ВидыЭлектронныхДокументов");
ВидыСФ = Новый Массив;
ВидыСФ.Добавить(ВидыЭД.СчетФактура);
ВидыСФ.Добавить(ВидыЭД.КорректировочныйСчетФактура);
Для Каждого ВидЭД Из ВидыСФ Цикл
ПравилаЗагрузки = МетодСервера("Модуль_ИнтеграцияУниверсальный", "ПравилаЗагрузкиПоВидуЭД", ВидЭД);
Для Каждого Элемент Из ПравилаЗагрузки Цикл
ВидМетаданных = Элемент.Ключ;
Если Результат.Найти(ВидМетаданных) = Неопределено Тогда
Результат.Добавить(ВидМетаданных);
КонецЕсли;
КонецЦикла;
КонецЦикла;
Возврат Результат;
КонецФункции
Функция ОбъектКонстант() Экспорт
Результат = МетодСервера("Модуль_ИнтеграцияУниверсальный", "ВладелецОбщихНастроекМодуля");
Возврат Результат;
КонецФункции
|