Внешняя обработка с несколькими командами, добавляемая в регламентные задания

СергейТ 132 5 11

Шаблон модуля объекта внешней обработки в стандарте БСП. Можно добавлять в регламентные задачи и/или размещать в разделах

#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда

#Область СлужебныйПрограммныйИнтерфейс

Функция СведенияОВнешнейОбработке() Экспорт
	
	ПараметрыРегистрации = ДополнительныеОтчетыИОбработки.СведенияОВнешнейОбработке("2.3.6.121");
	ПараметрыРегистрации.Вид = ДополнительныеОтчетыИОбработкиКлиентСервер.ВидОбработкиДополнительнаяОбработка();
	
	ПараметрыРегистрации.Наименование = "Наименование обработки"; // Как она будет написана в списке обработок
	ПараметрыРегистрации.Версия = "1.01.001";
	ПараметрыРегистрации.БезопасныйРежим = Ложь;
	ПараметрыРегистрации.Информация = "Текст описания обработки и команд";
	
	//ПараметрыРегистрации.Назначение.Добавить("");
	
	ТипКомандыВызовСерверногоМетода = ДополнительныеОтчетыИОбработкиКлиентСервер.ТипКомандыВызовСерверногоМетода();
	
	ДобавитьКоманду(ПараметрыРегистрации.Команды, "Обработка 1 с параметром 1", "Обработка_1_Параметр_1", ТипКомандыВызовСерверногоМетода, Истина);
	ДобавитьКоманду(ПараметрыРегистрации.Команды, "Обработка 1 с параметром 10", "Обработка_1_Параметр_10", ТипКомандыВызовСерверногоМетода, Истина);
	ДобавитьКоманду(ПараметрыРегистрации.Команды, "Обработка 2 с параметром 1", "Обработка_1_Параметр_1", ТипКомандыВызовСерверногоМетода, Истина);
	
	Возврат ПараметрыРегистрации;
	
КонецФункции

Процедура ВыполнитьКоманду(ИмяКоманды) Экспорт
	
	Если ИмяКоманды = "Обработка_1_Параметр_1" Тогда
		
		ПроцедураКоманды_1()
		
	ИначеЕсли ИмяКоманды = "Обработка_1_Параметр_10" Тогда
		
		ПроцедураКоманды_1(10)
		
	ИначеЕсли ИмяКоманды = "Обработка_2_Параметр_1" Тогда
		
		ДатаОбработки = НачалоДня(ТекущаяДатаСеанса());
		
		ПроцедураКоманды_2(ДатаОбработки, 1)
		
	КонецЕсли;
	
КонецПроцедуры

#КонецОбласти

#Область СлужебныеПроцедурыИФункции

Процедура ПроцедураКоманды_1(КоличествоДокументов = 1)
	// Тело процедуры
КонецПроцедуры

Процедура ПроцедураКоманды_2(ДатаПроверки, КоличествоДокументов = 1)
	// Тело процедуры
КонецПроцедуры

//

Процедура ДобавитьКоманду(ТаблицаКоманд, Представление, Идентификатор, Использование, ПоказыватьОповещение = Ложь, Модификатор = "")
	НоваяКоманда = ТаблицаКоманд.Добавить();
	НоваяКоманда.Представление = Представление;
	НоваяКоманда.Идентификатор = Идентификатор;
	НоваяКоманда.Использование = Использование;
	НоваяКоманда.ПоказыватьОповещение = ПоказыватьОповещение;
	НоваяКоманда.Модификатор = Модификатор;
КонецПроцедуры

#КонецОбласти

#Иначе
ВызватьИсключение НСтр("ru = 'Недопустимый вызов объекта на клиенте.'");
#КонецЕсли
1

Комментарии

См. также

Создание регламентного задания из внешней обработки

ОбновитьНастройкиПолучениеВнешнихКомпонент (БСП)

ДобавитьЗадание (БСП)

ПолучитьРегламентноеЗаданиеВнешнийВызов (БСП)

УдалитьРегламентноеЗаданиеВнешнийВызов (БСП)

ВыполнитьОбработкуПоРегламентномуЗаданию (БСП)

ОбработкаОчередиЗаданий (БСП)

ОбновлениеВнешнихКомпонент (БСП)

ВыполнитьКомандуИзФормыВнешнегоОбъекта (БСП)

Модератору