Превышен максимальный расход памяти сервера за один вызов

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