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

У меня проблема: при формировании отчета выдает ошибку "индекс находится за границами массива"

Постоянно ругается,
вот кусок модуля:

// В процедуре можно доработать компоновщик перед выводом в отчет
// Изменения сохранены не будут
Процедура ДоработатьКомпоновщикПередВыводом(ВнешниеНаборыДанных) Экспорт

Если ЗначениеЗаполнено(Счет) Тогда
ТиповыеОтчеты.УстановитьПараметр(КомпоновщикНастроек, "Счет", Счет);
КонецЕсли;
Если ЗначениеЗаполнено(НачалоПериода) Тогда
ТиповыеОтчеты.УстановитьПараметр(КомпоновщикНастроек, "НачалоПериода", НачалоДня(НачалоПериода));
Иначе
ТиповыеОтчеты.УстановитьПараметр(КомпоновщикНастроек, "НачалоПериода", Дата(1, 1, 1));
КонецЕсли;
Если ЗначениеЗаполнено(КонецПериода) Тогда
ТиповыеОтчеты.УстановитьПараметр(КомпоновщикНастроек, "КонецПериода", КонецДня(КонецПериода));
Иначе
ТиповыеОтчеты.УстановитьПараметр(КомпоновщикНастроек, "КонецПериода", Дата(3999, 11, 1));
КонецЕсли;

ТиповыеОтчеты.ДобавитьОтбор(КомпоновщикНастроек.Настройки.Структура[0].Структура[0].Отбор, "ПериодГруппировки",,ВидСравненияКомпоновкиДанных.Заполнено);
ТиповыеОтчеты.ДобавитьОтбор(КомпоновщикНастроек.Настройки.Структура[0].Структура[0].Структура[0].Отбор, "Регистратор",,ВидСравненияКомпоновкиДанных.Заполнено);
ТиповыеОтчеты.ДобавитьОтбор(КомпоновщикНастроек.Настройки.Структура[1].Структура[0].Отбор, "Регистратор",,ВидСравненияКомпоновкиДанных.Заполнено);

ТиповыеОтчеты.УстановитьПараметрВывода(КомпоновщикНастроек.Настройки.Структура[0].Структура[0], "ВыводитьОтбор", ТипВыводаТекстаКомпоновкиДанных.НеВыводить);
ТиповыеОтчеты.УстановитьПараметрВывода(КомпоновщикНастроек.Настройки.Структура[0].Структура[0].Структура[0], "ВыводитьОтбор", ТипВыводаТекстаКомпоновкиДанных.НеВыводить);
ТиповыеОтчеты.УстановитьПараметрВывода(КомпоновщикНастроек.Настройки.Структура[1].Структура[0], "ВыводитьОтбор", ТипВыводаТекстаКомпоновкиДанных.НеВыводить);

Если Периодичность = 0 Тогда
КомпоновщикНастроек.Настройки.Структура[0].Использование = Ложь;
КомпоновщикНастроек.Настройки.Структура[1].Использование = Истина;
Иначе
КомпоновщикНастроек.Настройки.Структура[0].Использование = Истина;
КомпоновщикНастроек.Настройки.Структура[1].Использование = Ложь;
КонецЕсли;

ТиповыеОтчеты.УстановитьПараметр(КомпоновщикНастроек, "Периодичность", Периодичность);
ТиповыеОтчеты.УстановитьПараметр(КомпоновщикНастроек, "ПС", Символы.ПС);

Если ЗначениеЗаполнено(Подразделение) Тогда
ТиповыеОтчеты.ДобавитьОтбор(КомпоновщикНастроек, "Подразделение", Подразделение, ВидСравненияКомпоновкиДанных.ВИерархии);
КонецЕсли;

ПоказателиОтчета = ДанныеОтчета.ПоказателиОтчета;

ЛинияСплошная = Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная, 1);


ТекущийНаборПоказателей = "" + ПоказателиОтчета.БУ.Значение + ПоказателиОтчета.НУ.Значение + ПоказателиОтчета.ПР.Значение + ПоказателиОтчета.ВР.Значение + ПоказателиОтчета.ВалютнаяСумма.Значение + ПоказателиОтчета.Количество.Значение;

МассивПоказателей = Новый Массив;
МассивПоказателей.Добавить("БУ");
МассивПоказателей.Добавить("НУ");
МассивПоказателей.Добавить("ПР");
МассивПоказателей.Добавить("ВР");
МассивПоказателей.Добавить("ВалютнаяСумма");
МассивПоказателей.Добавить("Количество");

Если ТекущийНаборПоказателей <> мТекущийНаборПоказателей Тогда

МассивМакетов = Новый Массив;
МассивМакетов.Добавить("ПериодГруппировкиЗаголовок");
МассивМакетов.Добавить("ОбщиеИтогиЗаголовок");
МассивМакетов.Добавить("ОбщиеИтогиПодвал");
МассивМакетов.Добавить("ПроводкиЗаголовок");

Для Каждого ЭлементМакет Из МассивМакетов Цикл
СхемаКомпоновкиДанных.Макеты[ЭлементМакет].Макет = СтандартныеОтчеты.ПолучитьКопиюОписанияМакета(СхемаКомпоновкиДанных.Макеты[ЭлементМакет + "Образец"].Макет);
ОписаниеМакета = СхемаКомпоновкиДанных.Макеты[ЭлементМакет].Макет;

МассивСтрокДляУдаления = Новый Массив;
Индекс = 0;
Для Каждого ЭлементМассива Из МассивПоказателей Цикл
Если Не ПоказателиОтчета[ЭлементМассива].Значение Тогда
МассивСтрокДляУдаления.Добавить(ОписаниеМакета[Индекс]);
КонецЕсли;
Индекс = Индекс + 1;
КонецЦикла;

Для Каждого Строка Из МассивСтрокДляУдаления Цикл
ОписаниеМакета.Удалить(Строка);
КонецЦикла;

КоличествоСтрок = ОписаниеМакета.Количество();

// Обвести область
Если КоличествоСтрок > 0 Тогда
Для Индекс = 0 По 12 Цикл
ПоследняяСтрока = ?(ЭлементМакет = "ОбщиеИтогиПодвал" И Индекс < 4, 0, КоличествоСтрок - 1);
ПараметрГраницы = ТиповыеОтчеты.ПолучитьПараметр(ОписаниеМакета[0].Ячейки[Индекс].Оформление.Элементы, "СтильГраницы");
ТиповыеОтчеты.УстановитьПараметр(ПараметрГраницы.ЗначенияВложенныхПараметров, "СтильГраницы.Сверху", ЛинияСплошная);
ПараметрГраницы = ТиповыеОтчеты.ПолучитьПараметр(ОписаниеМакета[ПоследняяСтрока].Ячейки[Индекс].Оформление.Элементы, "СтильГраницы");
ТиповыеОтчеты.УстановитьПараметр(ПараметрГраницы.ЗначенияВложенныхПараметров, "СтильГраницы.Снизу", ЛинияСплошная);
КонецЦикла;
КонецЕсли;

Для Индекс = 1 По КоличествоСтрок - 1 Цикл
ОписаниеМакета[Индекс].Ячейки[0].Элементы.Очистить();
ТиповыеОтчеты.УстановитьПараметр(ОписаниеМакета[Индекс].Ячейки[0].Оформление.Элементы, "ОбъединятьПоВертикали", Истина);
ТиповыеОтчеты.УстановитьПараметр(ОписаниеМакета[Индекс].Ячейки[0].Оформление.Элементы, "Расшифровка", Неопределено, Ложь);
ОписаниеМакета[Индекс].Ячейки[1].Элементы.Очистить();
ТиповыеОтчеты.УстановитьПараметр(ОписаниеМакета[Индекс].Ячейки[1].Оформление.Элементы, "ОбъединятьПоВертикали", Истина);
ТиповыеОтчеты.УстановитьПараметр(ОписаниеМакета[Индекс].Ячейки[1].Оформление.Элементы, "Расшифровка", Неопределено, Ложь);
ОписаниеМакета[Индекс].Ячейки[2].Элементы.Очистить();
ТиповыеОтчеты.УстановитьПараметр(ОписаниеМакета[Индекс].Ячейки[2].Оформление.Элементы, "ОбъединятьПоВертикали", Истина);
ТиповыеОтчеты.УстановитьПараметр(ОписаниеМакета[Индекс].Ячейки[2].Оформление.Элементы, "Расшифровка", Неопределено, Ложь);
ОписаниеМакета[Индекс].Ячейки[3].Элементы.Очистить();
ТиповыеОтчеты.УстановитьПараметр(ОписаниеМакета[Индекс].Ячейки[3].Оформление.Элементы, "ОбъединятьПоВертикали", Истина);
ТиповыеОтчеты.УстановитьПараметр(ОписаниеМакета[Индекс].Ячейки[3].Оформление.Элементы, "Расшифровка", Неопределено, Ложь);
Если ЭлементМакет = "ПроводкиЗаголовок" Тогда
ОписаниеМакета[Индекс].Ячейки[5].Элементы.Очистить();
ТиповыеОтчеты.УстановитьПараметр(ОписаниеМакета[Индекс].Ячейки[5].Оформление.Элементы, "ОбъединятьПоВертикали", Истина);
ТиповыеОтчеты.УстановитьПараметр(ОписаниеМакета[Индекс].Ячейки[5].Оформление.Элементы, "Расшифровка", Неопределено, Ложь);
ОписаниеМакета[Индекс].Ячейки[8].Элементы.Очистить();
ТиповыеОтчеты.УстановитьПараметр(ОписаниеМакета[Индекс].Ячейки[8].Оформление.Элементы, "ОбъединятьПоВертикали", Истина);
ТиповыеОтчеты.УстановитьПараметр(ОписаниеМакета[Индекс].Ячейки[8].Оформление.Элементы, "Расшифровка", Неопределено, Ложь);
КонецЕсли;
КонецЦикла;
КонецЦикла;
мТекущийНаборПоказателей = ТекущийНаборПоказателей;
КонецЕсли;

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

СтандартныеОтчеты.ДобавитьОтборПоОрганизации(ЭтотОбъект);

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



Подскажите, пожалуйста, как это исправить.