//ирМобильный Перем ирМобильный Экспорт; //ирМобильный Перем ирОбщий Экспорт; //ирМобильный Перем ирСервер Экспорт; //ирМобильный Перем ирКэш Экспорт; //ирМобильный Перем ирПривилегированный Экспорт; Перем ПараметрСсылка Экспорт; Процедура НайтиИПоказатьСсылки(СсылкаНаКоторуюИщемСсылки) Экспорт ПараметрСсылка = СсылкаНаКоторуюИщемСсылки; ПолучитьФорму().Открыть(); КонецПроцедуры // НайтиСсылки() // Заново заполняет табличное поле НайденныйСсылки. // // Параметры: // Нет. // Процедура ОбновитьНайденныеСсылки(МассивСсылок, ЛиОпределятьСтатусСсылки = Истина) Экспорт тзНайденныеСсылки = Новый ТаблицаЗначений; #Если Клиент Тогда Состояние("Поиск ссылок..."); #КонецЕсли ирПривилегированный.НайтиПоСсылкамЛкс(МассивСсылок, тзНайденныеСсылки); #Если Клиент Тогда Состояние(""); #КонецЕсли НайденныеСсылки.Очистить(); Для Каждого Строка Из тзНайденныеСсылки Цикл СтрокаТЧ = НайденныеСсылки.Добавить(); НайденнаяСсылка = ЗначениеИзСтрокиВнутр(Строка.Данные); СтрокаТЧ.Метаданные = Строка.Метаданные; КорневойТипСсылки = ирОбщий.ПолучитьПервыйФрагментЛкс(СтрокаТЧ.Метаданные); Если КорневойТипСсылки = "РегистрСведений" Тогда СтрокаТЧ.Данные = Строка.Данные; Иначе СтрокаТЧ.Данные = НайденнаяСсылка; КонецЕсли; Если НайденнаяСсылка = Неопределено Тогда НайденнаяСсылка = СтрокаТЧ.Метаданные; КонецЕсли; СтрокаТЧ.КартинкаСсылки = ирОбщий.ПолучитьИндексКартинкиСсылкиЛкс(НайденнаяСсылка, ЛиОпределятьСтатусСсылки); МетаданныеСсылки = Метаданные.НайтиПоПолномуИмени(СтрокаТЧ.Метаданные); СтрокаТЧ.ТипДанных = МетаданныеСсылки.Представление(); СтрокаТЧ.Ссылка = Строка.Ссылка; СтрокаТЧ.ТипМетаданных = ирОбщий.ПолучитьПервыйФрагментЛкс(СтрокаТЧ.Метаданные); СтрокаТЧ.Пометка = 1; КонецЦикла; ЭтотОбъект.Количество = тзНайденныеСсылки.Количество(); КонецПроцедуры // ОбновитьНайденныеСсылки() //ирМобильный #Если Клиент Тогда //ирМобильный Контейнер = Новый Структура(); //ирМобильный Оповестить("ирПолучитьБазовуюФорму", Контейнер); //ирМобильный Если Не Контейнер.Свойство("ирМобильный", ирМобильный) Тогда //ирМобильный ПолноеИмяФайлаБазовогоМодуля = ВосстановитьЗначение("ирПолноеИмяФайлаОсновногоМодуля"); //ирМобильный ирМобильный = ВнешниеОбработки.ПолучитьФорму(ПолноеИмяФайлаБазовогоМодуля); //ирМобильный КонецЕсли; //ирМобильный ирОбщий = ирМобильный.ПолучитьОбщийМодульЛкс("ирОбщий"); //ирМобильный ирКэш = ирМобильный.ПолучитьОбщийМодульЛкс("ирКэш"); //ирМобильный ирСервер = ирМобильный.ПолучитьОбщийМодульЛкс("ирСервер"); //ирМобильный ирПривилегированный = ирМобильный.ПолучитьОбщийМодульЛкс("ирПривилегированный"); //ирМобильный #КонецЕсли