индекс находится за границами массива

Документооборот
ввожу информацию в справочник.корреспонденты.ТЧ.оборудование
есть три поля : наименование, марка, номер
наименование забираю из справочника оборудование
при окончании редактирования поля наименование выдает ошибку индекс находится за границами массива

код: &НаКлиенте
Процедура Оборудование1ПриОкончанииРедактирования(Элемент, НоваяСтрока, ОтменаРедактирования)
    мИнвентарныйНомер = "";
    СписокЛицензиатов = Новый СписокЗначений;
    ВыполнитьПроверку(Элемент.ТекущаяСтрока, мИнвентарныйНомер, СписокЛицензиатов);

    Для каждого Эл из СписокЛицензиатов Цикл
        Сообщение = Новый СообщениеПользователю;
        Сообщение.Текст = "Введенный инвентарный номер: " + мИнвентарныйНомер + " уже зарегистрирован у лицензиата " + Эл.Значение;
        Сообщение.КлючДанных = Эл.Значение;
        Сообщение.Сообщить();
    КонецЦикла;

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

&НаСервере
Процедура ВыполнитьПроверку(ИндексСтроки, мИнвентарныйНомер, СписокЛицензиатов)

    мИнвентарныйНомер = Объект.Оборудование[ИндексСтроки].ИнвентарныйНомер;
    Если ЗначениеЗаполнено(мИнвентарныйНомер) Тогда
        Запрос = Новый Запрос;
        Запрос.Текст = "ВЫБРАТЬ
                       |    КорреспондентыОборудование.Ссылка КАК Лицензиат
                       |ИЗ
                       |    Справочник.Корреспонденты.Оборудование КАК КорреспондентыОборудование
                       |ГДЕ
                       |    КорреспондентыОборудование.ИнвентарныйНомер = &ИнвентарныйНомер
                       |    И НЕ КорреспондентыОборудование.Ссылка = &Ссылка";

        Запрос.УстановитьПараметр("ИнвентарныйНомер", мИнвентарныйНомер);
        Запрос.УстановитьПараметр("Ссылка", Объект.Ссылка);

        Результат = Запрос.Выполнить();
        Выборка = Результат.Выбрать();

        Пока Выборка.Следующий() Цикл
            СписокЛицензиатов.Добавить(Выборка.Лицензиат);
        КонецЦикла;
    КонецЕсли;


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