Различия

Показаны различия между двумя версиями страницы.

--- podkljuchenie_vneshnej_obrabotki_v_1s_tonkij_klient [2021/08/02 11:42]
tro
+++ podkljuchenie_vneshnej_obrabotki_v_1s_tonkij_klient [2024/03/07 12:03] (текущий)
tro
@@ Строка 1: / Строка 1: @@
-Она должна быть экспортной и располагаться в модуле внешней обработки:
+В модуле внешней обработки:
-**Вариант 1**
+**Вариант 1 - Для открітия формі обработки**
 <code>
-Функция СведенияОВнешнейОбработке() Экспорт
-ДанныеДляРег = Новый Структура();
-ДанныеДляРег.Вставить("Наименование", "Исправления в документах движения ДС");
-ДанныеДляРег.Вставить("БезопасныйРежим", Истина);
-ДанныеДляРег.Вставить("Версия", "ver.: 1.000");
-ДанныеДляРег.Вставить("Информация", "Обработка для анализа и исправленя реквизитов в документах поступления и списания безналичных ДС. Анализ по связанным документам заказа клиента.");
-ДанныеДляРег.Вставить("Вид", "ДополнительнаяОбработка");
-ТабЗнКоманды = Новый ТаблицаЗначений;
-ТабЗнКоманды.Колонки.Добавить("Идентификатор");
-ТабЗнКоманды.Колонки.Добавить("Использование");
-ТабЗнКоманды.Колонки.Добавить("Представление");
-НовСтрока = ТабЗнКоманды.Добавить();
-НовСтрока.Идентификатор = "ИсправленияВДокументахДвиженияДС";
-НовСтрока.Использование = "ОткрытиеФормы";
-НовСтрока.Представление = "Исправления в документах движения ДС";
-ДанныеДляРег.Вставить("Команды", ТабЗнКоманды);
-Возврат ДанныеДляРег;
-КонецФункции
-</code>
-{{:svedeniya-o-vneshney-obrabotke.png|}}
-**Вариант 2**
-<code>
-#Область Регистрация_ОТЧЕТА_ОБРАБОТКИ
-/////////////////////////////////////////////////////////////////////////
-// РЕГИСТРАЦИЯ ВНЕШНЕГО ОТЧЕТА
-//
 Функция СведенияОВнешнейОбработке() Экспорт
@@ Строка 54: / Строка 15: @@
     ТаблицаКоманд = ПолучитьТаблицуКоманд();
     // Добавим команду в таблицу
     ДобавитьКоманду(ТаблицаКоманд, Синоним, "1" , "ОткрытиеФормы", Истина, );
-    // Сохраним таблицу команд в параметры регистрации обработки
+       // Сохраним таблицу команд в параметры регистрации обработки
     РегистрационныеДанные.Вставить("Команды", ТаблицаКоманд);
@@ Строка 66: / Строка 25: @@
 КонецФункции
 Функция ПолучитьТаблицуКоманд()
@@ Строка 73: / Строка 30: @@
     // Создадим пустую таблицу команд и колонки в ней
     Команды = Новый ТаблицаЗначений;
     // Как будет выглядеть описание печатной формы для пользователя
     Команды.Колонки.Добавить("Представление", Новый ОписаниеТипов("Строка"));
     // Имя нашего макета, что бы могли отличить вызванную команду в обработке печати
     Команды.Колонки.Добавить("Идентификатор", Новый ОписаниеТипов("Строка"));
     // Тут задается, как должна вызваться команда обработки
@@ Строка 92: / Строка 43: @@
     // - ВызовСерверногоМетода - вызвать серверную экспортную процедуру из модуля объекта обработки
     Команды.Колонки.Добавить("Использование", Новый ОписаниеТипов("Строка"));
     // Следующий параметр указывает, необходимо ли показывать оповещение при начале и завершению работы обработки. Не имеет смысла при открытии формы
     Команды.Колонки.Добавить("ПоказыватьОповещение", Новый ОписаниеТипов("Булево"));
     // Для печатной формы должен содержать строку ПечатьMXL
@@ Строка 105: / Строка 52: @@
 КонецФункции
 Процедура ДобавитьКоманду(ТаблицаКоманд, Представление, Идентификатор, Использование = "ОткрытиеФормы", ПоказыватьОповещение = Ложь, Модификатор)
@@ Строка 119: / Строка 64: @@
     НоваяКоманда.Модификатор = Модификатор;
+КонецПроцедуры
+</code>
+**Вариант 2 - Для возможности запуска внешней обработки в регламенте**
+<code>
+Функция СведенияОВнешнейОбработке() Экспорт
+	ПараметрыРегистрации = ДополнительныеОтчетыИОбработки.СведенияОВнешнейОбработке("3.0.1.400");
+	ПараметрыРегистрации.Вид = ДополнительныеОтчетыИОбработкиКлиентСервер.ВидОбработкиДополнительнаяОбработка();
+	ПараметрыРегистрации.БезопасныйРежим = Ложь;
+	НоваяКоманда = ПараметрыРегистрации.Команды.Добавить();
+	НоваяКоманда.Идентификатор = "ПроверкаНаличияКурсовВалют";
+	НоваяКоманда.Представление = "Регламент по отправке писем в случае отсутствия курсов валют";
+	НоваяКоманда.Использование = ДополнительныеОтчетыИОбработкиКлиентСервер.ТипКомандыВызовСерверногоМетода();
+	Возврат ПараметрыРегистрации;
+КонецФункции
+Процедура ВыполнитьКоманду(ИдентификаторКоманды,ПараметрыКоманды) Экспорт
+	Если ИдентификаторКоманды = "ПроверкаНаличияКурсовВалют" Тогда
+		ВыполнитьОтправкуСообщений_Вчасно();
+	КонецЕсли;
 КонецПроцедуры
-#КонецОбласти
+Процедура ВыполнитьОтправкуСообщений_Вчасно() Экспорт
+//Код виполняемій в регламенте
+КонецПроцедуры
 </code>