Список моих рабочих отчетов и обработок, рабочий стол

Запуск обработки лучше включить в те интерфейсы, где необходим запуск, например интерфейс "Полный" на одной из панелей в виде иконки.

Данная обработка тестировалась на конфигурации УТ 10.3 релиз 10.3.70.3.

При первоначальном запуске список  будет пустой. Необходимо  вначале зарегистрировать. Регистрация проходит при запуске отчета или обработки в списке справочника внешние обработки. Для тех пользователей, у которых закрыт доступ к справочнику внешних обработок, и для которых нужно указать разрешенные обработки или отчеты, регистрацию можно сделать за них. Для это в списке справочника добавляем команду Регистрация пользователя, в которой указываем для какого пользователя регистрируем текущий отчет или обработку в списке справочника. И тогда в списке пользователя будут отображены зарегистрированные отчеты или обработки. Для тех, у кого есть доступ к списку справочника внешние обработки, все запускаемые отчеты или обработки будут отображаться в списке пользователя, при этом указывая, когда в последний раз была запущена та или иная обработка. Теперь нет необходимости искать постоянно используемый отчет или обработку в списке справочника, достаточно запустить список моих обработок и выбрать в списке и запустить, нажав Enter.

Также можно за закладке Мой рабочий стол в списке указать нужные объекты конфигурации (справочник или документ),которые сложно найти в своем интерфейсе.Они будут всегда под рукой на "своем рабочем столе".

Ниже описываются, какие метаданные необходимы для работы  с данной обработкой.

Для использования необходимо создать регистр сведений РегистрацияВнешнихОбработокОтчетов
с тремя измерениями:

Пользователь - СправочникСсылка.Пользователи

Дата - Дата

Объект - СправочникСсылка.ВнешниеОбработки

И Ресурс "Количество" Число с разрядностью два

В обработке используются функции к модулю "ДопПроверки" .Текст процедуры "ОткрытьВнешнийОтчетОбработку" размещен в модуле обработки, его необходимо раскомментировать и перенести в общий модуль

Процедура ОткрытьВнешнийОтчетОбработку(СсылкаНаВнешнююОбработку,Параметры = Неопределено,Команда = Неопределено,Результат =Неопределено,УдалитьФайлОбработки = ЛОЖЬ) Экспорт
    Если ТипЗнч(СсылкаНаВнешнююОбработку) = Тип("Строка") Тогда
        СсылкаНаВнешнююОбработку = Справочники.ВнешниеОбработки.НайтиПоНаименованию(СсылкаНаВнешнююОбработку);
        Если СсылкаНаВнешнююОбработку = Справочники.ВнешниеОбработки.ПустаяСсылка() ИЛИ СсылкаНаВнешнююОбработку = Неопределено Тогда
            Возврат;
        КонецЕсли;    
    ИначеЕсли ТипЗнч(СсылкаНаВнешнююОбработку) <> Тип("СправочникСсылка.ВнешниеОбработки") Тогда    
        Возврат;
    КонецЕсли;
    
    Попытка
        Если ПравоДоступа("Просмотр",СсылкаНаВнешнююОбработку.Метаданные()) = Ложь Тогда
            Возврат;
        КонецЕсли;
        Если ТипЗнч(СсылкаНаВнешнююОбработку) = Тип("СправочникСсылка.ВнешниеОбработки") Тогда
            Если СсылкаНаВнешнююОбработку.ВидОбработки = Перечисления.ВидыДополнительныхВнешнихОбработок.Обработка Тогда
                ИмяФайла = ПолучитьИмяВременногоФайла("epf");
            ИначеЕсли    СсылкаНаВнешнююОбработку.ВидОбработки = Перечисления.ВидыДополнительныхВнешнихОбработок.Отчет Тогда
                ИмяФайла = ПолучитьИмяВременногоФайла("erf");
            Иначе
                Возврат;
            КонецЕсли;    
            ТекущийФайл = Новый Файл(ИмяФайла);
            Если ТекущийФайл.Существует() Тогда
                УдалитьФайлы(ТекущийФайл.Путь);
            КонецЕсли;   
            ДвоичныеДанные = СсылкаНаВнешнююОбработку.ХранилищеВнешнейОбработки.Получить();
            ДвоичныеДанные.Записать(ИмяФайла);
                
            Если СсылкаНаВнешнююОбработку.ВидОбработки = Перечисления.ВидыДополнительныхВнешнихОбработок.Обработка Тогда    
                ОбработкаОтчет = ВнешниеОбработки.Создать(ИмяФайла);
            Иначе
                ОбработкаОтчет = ВнешниеОтчеты.Создать(ИмяФайла);
            КонецЕсли;    
            ФормаОбработки =  ОбработкаОтчет.ПолучитьФорму();
            
            Если Параметры <> Неопределено И ТипЗнч(Параметры) = Тип("Структура") Тогда
                
                Для Каждого Стр ИЗ Параметры Цикл
                    
                    Попытка
                        ОбработкаОтчет[Стр.Ключ] = Стр.Значение;
                    Исключение    
                        Попытка
                              ФормаОбработки[Стр.Ключ] = Стр.Значение;
                        Исключение
                        
                        КонецПопытки;
                    КонецПопытки;    
                КонецЦикла;    
            КонецЕсли;        
            Если Команда <> Неопределено И Команда Тогда  
                Попытка
                    ФормаОбработки.Автозапуск = Истина;    
                Исключение
                    
                КонецПопытки;
            КонецЕсли; 
            Если Результат = Неопределено Тогда
                ФормаОбработки.Открыть();
            Иначе
                Результат = ФормаОбработки.ОткрытьМодально();
            КонецЕсли;
            Если УдалитьФайлОбработки Тогда
                УдалитьФайлы(ИмяФайла);
            КонецЕсли;    
        КонецЕсли;  
    Исключение
        
    КонецПопытки;

КонецПроцедуры    

В модуле формы обработки используется обращения к общему модулю "УниверсальныеМеханизмы".

В форме списка справочника ВнешниеОбработки нужно добавить модуль регистрации

Если ВыбраннаяСтрока.ПометкаУдаления Тогда
            СтандартнаяОбработка = Ложь;
            Предупреждение(?(ЭтоОбработка,"Данная обработка","Данный отчет")+" больше не используется!",10);
            Возврат;
        КонецЕсли;    
        
        ГруппаПользователей = Элемент.ТекущаяСтрока.ГруппаПользователей;
        Если НЕ ЗначениеЗаполнено(ГруппаПользователей) Тогда
            ГруппаПользователей = Элемент.ТекущаяСтрока.Родитель.ГруппаПользователей;
        КонецЕсли;    
        Если ЗначениеЗаполнено(ГруппаПользователей) И НЕ ДопПроверки.ЕстьВключениеВГруппуПользователя(ГруппаПользователей) ТОГДА 
            СтандартнаяОбработка = Ложь;
            Предупреждение("У вас нет прав на запуск данной обработки",10);
            Возврат;
        КонецЕсли;
        
        НаборЗаписей = РегистрыСведений.РегистрацияВнешнихОбработокОтчетов.СоздатьНаборЗаписей();
        НаборЗаписей.Отбор.Дата.Установить(ТекущаяДата());
        НаборЗаписей.Отбор.Пользователь.Установить(глЗначениеПеременной("глТекущийПользователь"));
        НаборЗаписей.Отбор.Объект.Установить(ВыбраннаяСтрока);
        НаборЗаписей.Прочитать();
        Если НаборЗаписей.Выбран() И НаборЗаписей.Количество()>0 Тогда
            НаборЗаписей[0].Количество = НаборЗаписей[0].Количество + 1;
        Иначе
            НоваяЗапись = НаборЗаписей.Добавить();
            НоваяЗапись.Дата = ТекущаяДата();
            НоваяЗапись.Пользователь = глЗначениеПеременной("глТекущийПользователь");
            НоваяЗапись.Объект  =  ВыбраннаяСтрока;
            НоваяЗапись.Количество = 1;
        КонецЕсли;    
        НаборЗаписей.Записать();

Для регистрации выбранной строки в списке внешних отчетов или обработок необходимо внести модуль команды
 

Процедура ДействияФормыДействиеРегистрация(Кнопка) 
    Если ДопПроверки.ЕстьАдминаБазы() Тогда
        ТекущаяСтрока = ЭлементыФормы.СправочникСписок.ТекущиеДанные;
        Если ТекущаяСтрока<>Неопределено И ТекущаяСтрока.ЭтоГруппа = ЛОЖЬ Тогда
            ФормаСписка = Справочники.Пользователи.ПолучитьФормуВыбора("ФормаВыбора");
            ВыбранныйПользователь = ФормаСписка.ОткрытьМодально();
            Если ВыбранныйПользователь<>Неопределено Тогда  
    
                Запрос = Новый Запрос;
                Запрос.Текст = 
                "ВЫБРАТЬ
                |    РегистрацияОбработокОтчетов.Дата
                |ИЗ
                |    РегистрСведений.РегистрацияОбработокОтчетов КАК РегистрацияОбработокОтчетов
                |ГДЕ
                |    РегистрацияОбработокОтчетов.Пользователь = &Пользователь
                |    И РегистрацияОбработокОтчетов.Объект = &Объект";
                
                Запрос.УстановитьПараметр("Объект", ТекущаяСтрока.Ссылка);
                Запрос.УстановитьПараметр("Пользователь", ВыбранныйПользователь);
                
                РезультатЗапроса = Запрос.Выполнить();
                Если РезультатЗапроса.Пустой() Тогда
                    НоваяЗапись = РегистрыСведений.РегистрацияВнешнихОбработокОтчетов.СоздатьМенеджерЗаписи();
                    НоваяЗапись.Дата = ТекущаяДата();
                    НоваяЗапись.Пользователь = ВыбранныйПользователь;
                    НоваяЗапись.Объект  =  ТекущаяСтрока.Ссылка;
                    НоваяЗапись.Количество = 1;
                    
                    НоваяЗапись.Записать();  
                    Если ТекущаяСтрока.ВидОбработки = Перечисления.ВидыДополнительныхВнешнихОбработок.Обработка Тогда
                        Сообщить("Обработка зарегистрировано для "+Строка(ВыбранныйПользователь))
                    Иначе
                        Сообщить("Отчет зарегистрирован для "+Строка(ВыбранныйПользователь))
                    КонецЕсли;    
                КонецЕсли;    
                
            КонецЕсли;    
        КонецЕсли;        
    КонецЕсли;
КонецПроцедуры