TECHSPOT:CRM

Бот CRM: Перенос завершенной задачи в колонку Выполнено.

Данный Бот CRM позволяет переносить завершенные задачи в указанную вами колонку, в нашем случае бот будет переносить завершенные задачи в колонку Выполнено.

На доске с названием “CRM” есть колонки, на которых расположены задачи. Бот должен перемещать завершенные задачи в колонку Выполнено.

Для настройки Бота нужно заполнить следующие реквизиты:

Активен: Да
Наименование: Переместить выполненную задачу в колонку Выполнено (Доска:CRM). Можно указать любое.
Вид бота: Авторский.
Использовать скрипт иначе обработка по ключу: Да

Скрипт:

ОтборЗадача = Новый Массив;
	ОтборЗадача.Добавить(Новый Структура("Реквизит,Условие,Значение,ИмяЗначения", "Выполнена","=",Истина));
	//ОтборЗадача.Добавить(Новый Структура("Реквизит,Условие,Значение,ИмяЗначения", "ВАрхиве","=",Истина));
	
	ОтборКанбан = Новый Массив;
	ОтборКанбан.Добавить(Новый Структура("Реквизит,Условие,Значение,ИмяЗначения", "Проект","=",СтруктураДанныхБота.ПараметрыБота.Проект));
	ОтборКанбан.Добавить(Новый Структура("Реквизит,Условие,Значение,ИмяЗначения", "Доска","=",СтруктураДанныхБота.ПараметрыБота.Доска));
	ОтборКанбан.Добавить(Новый Структура("Реквизит,Условие,Значение,ИмяЗначения", "Колонка","<>",СтруктураДанныхБота.ПараметрыБота.Колонка));
	
	МассивЗадач = стс_ПользовательскиеФункцииСервер.ПолучитьМассивЗадачВКанбанеПоОтбору(ОтборКанбан,ОтборЗадача);
	
       СтруктураПараметров = Новый Структура;
       СтруктураПараметров.Вставить("Ссылка");
       СтруктураПараметров.Вставить("Проект",СтруктураДанныхБота.ПараметрыБота.Проект);
       СтруктураПараметров.Вставить("Доска",СтруктураДанныхБота.ПараметрыБота.Доска);
       СтруктураПараметров.Вставить("Колонка",СтруктураДанныхБота.ПараметрыБота.Колонка);
       СтруктураПараметров.Вставить("Воронка");
       СтруктураПараметров.Вставить("ЗначениеВоронки");
       СтруктураПараметров.Вставить("ТипОбъекта"); //Всегда пустой

	Для Каждого ТекЗадача Из МассивЗадач Цикл
      
              СтруктураПараметров.Ссылка = ТекЗадача.Задача;
              СтруктураПараметров.Воронка = ТекЗадача.Воронка;
              СтруктураПараметров.ЗначениеВоронки = ТекЗадача.ЗначениеВоронки;

              Попытка
                     стс_ЗадачаСервер.ПоставитьЗадачуВКанбан(СтруктураПараметров);  
                     Сообщить(ТекЗадача.Задача);
              Исключение
                     Сообщить(""+ТекЗадача.Задача+". "+ОписаниеОшибки());
              КонецПопытки;   

              //Прервать;
   
	КонецЦикла;

Параметры: Здесь необходимо указать куда будем перемещать задачу.

В нашем случае мы перемещаем задачу по адресу:
Проект: Основной,
Доска: CRM,
Колонка: Выполнено.

Планировщик: Необходимо указать расписание, по которому будет работать Бот.

В данном примере: каждый день с 8:00 до 22:00.

Для сохранения настроек Бота нажмите Записать.

Оцените документ