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

Индекс находится за границами массива
{ОбщийМодуль.ОбщегоНазначенияУТКлиент.Модуль(1957)}: Результат = Форма.Записать(ПараметрыЗаписи);
{Документ.ПриобретениеТоваровУслуг.Форма.ФормаДокумента.Форма(8382)}: ОбщегоНазначенияУТКлиент.ОбработатьЗаписьОбъектаВФорме(ЭтотОбъект, ПараметрыДляЗаписи);

по причине:
Ошибка при выполнении обработчика - 'ОбработкаПроведения'
по причине:
Индекс находится за границами массива
{ОбщийМодуль.ПроведениеСерверУТ.Модуль(355)}: Объект.Движения.Записать();
{Документ.ПриобретениеТоваровУслуг.МодульОбъекта(891)}: ПроведениеСерверУТ.ЗаписатьНаборыЗаписей(ЭтотОбъект);

по причине:
Ошибка при выполнении обработчика - 'ПриЗаписи'
по причине:
Индекс находится за границами массива
{ОбщийМодуль.ОперативныеВзаиморасчетыСервер.Модуль(4576)}: Если сч <= КурсыВалютыРасчетов.Количество()
{ОбщийМодуль.ОперативныеВзаиморасчетыСервер.Модуль(150)}: ТаблицаКурсовВалют = ПолучитьКурсыВалют(Запрос, ДатаНачалаКурсов, ГлобальныеПеременные);
{ОбщийМодуль.ОперативныеВзаиморасчетыСервер.Модуль(1408)}: ЗаполнитьОперативныеВзаиморасчеты(ОсновныеПараметры);
{РегистрНакопления.РасчетыСПоставщиками.МодульНабораЗаписей(313)}: ОперативныеВзаиморасчетыСервер.РассчитатьПоИзменениям(Запрос.МенеджерВременныхТаблиц, Ложь, Отбор.Регистратор.Значение, ДополнительныеСвойства);
{ОбщийМодуль.ПроведениеСерверУТ.Модуль(355)}: Объект.Движения.Записать();
{Документ.ПриобретениеТоваровУслуг.МодульОбъекта(891)}: ПроведениеСерверУТ.ЗаписатьНаборыЗаписей(ЭтотОбъект);


Потом посоветовали сделать так:
поменять
Если сч <= КурсыВалютыРасчетов.Количество()
на
Если сч < КурсыВалютыРасчетов.Количество()
в ОМ ОперативныеВзаиморасчетыСервер

После стало так:

Индекс находится за границами массива
{ОбщийМодуль.ОбщегоНазначенияУТКлиент.Модуль(1957)}:    Результат = Форма.Записать(ПараметрыЗаписи);
{Документ.ПриобретениеТоваровУслуг.Форма.ФормаДокумента.Форма(8382)}:    ОбщегоНазначенияУТКлиент.ОбработатьЗаписьОбъектаВФорме(ЭтотОбъект, ПараметрыДляЗаписи);

по причине:
Ошибка при выполнении обработчика - 'ОбработкаПроведения'
по причине:
Индекс находится за границами массива
{ОбщийМодуль.ПроведениеСерверУТ.Модуль(355)}:    Объект.Движения.Записать();
{Документ.ПриобретениеТоваровУслуг.МодульОбъекта(891)}:    ПроведениеСерверУТ.ЗаписатьНаборыЗаписей(ЭтотОбъект);

по причине:
Ошибка при выполнении обработчика - 'ПриЗаписи'
по причине:
Индекс находится за границами массива
{ОбщийМодуль.ОперативныеВзаиморасчетыСервер.Модуль(4583)}:            Если КурсыВалютыРасчетов[сч].КурсРегл = 0 Тогда
{ОбщийМодуль.ОперативныеВзаиморасчетыСервер.Модуль(150)}:        ТаблицаКурсовВалют = ПолучитьКурсыВалют(Запрос, ДатаНачалаКурсов, ГлобальныеПеременные);
{ОбщийМодуль.ОперативныеВзаиморасчетыСервер.Модуль(1408)}:        ЗаполнитьОперативныеВзаиморасчеты(ОсновныеПараметры);
{РегистрНакопления.РасчетыСПоставщиками.МодульНабораЗаписей(313)}:        ОперативныеВзаиморасчетыСервер.РассчитатьПоИзменениям(Запрос.МенеджерВременныхТаблиц, Ложь, Отбор.Регистратор.Значение, ДополнительныеСвойства);
{ОбщийМодуль.ПроведениеСерверУТ.Модуль(355)}:    Объект.Движения.Записать();
{Документ.ПриобретениеТоваровУслуг.МодульОбъекта(891)}:    ПроведениеСерверУТ.ЗаписатьНаборыЗаписей(ЭтотОбъект);


Кто подскажет как быть?

Хм. А отладчиком посмотреть?

Вчера было уже что-то похожее

Индекс находится за границами массива при проведении документа "Приобретение товаров и усл

У Вас явная беда с валютами и/или курсами. Смотри какие в документе выбраны (и выбраны ли вообще). Валюты взаиморасчетов в договоре. Если другие документы проводятся, то попробуйте не копировать, а создать этот документ с нуля.

Если было обновление конфигурации, то почистить кеш.

(0) отладкой посмотри что у тебя в "КурсыВалютыРасчетов" и на каком значении "сч" отваливается
//{ОбщийМодуль.ОперативныеВзаиморасчетыСервер.Модуль(4583)}:            Если КурсыВалютыРасчетов[сч].КурсРегл = 0 Тогда

(6) Не знаю что нужно, скопировал все,,,:))

Функция ПолучитьКурсыВалют(Запрос, ДатаНачала, ГлобальныеПеременные)
    
    ДатаОкончания = НачалоДня(ТекущаяДатаСеанса());
    
    Запрос.Текст = "
    |ВЫБРАТЬ
    |    ДанныеПроизводственногоКалендаря.Дата КАК Дата
    |ПОМЕСТИТЬ ПериодыКурсов
    |ИЗ
    |    РегистрСведений.ДанныеПроизводственногоКалендаря КАК ДанныеПроизводственногоКалендаря
    |ГДЕ
    |    ДанныеПроизводственногоКалендаря.Дата МЕЖДУ &ДатаНачала И &ДатаОкончания
    |;
    |ВЫБРАТЬ
    |    ПериодыКурсов.Дата КАК Дата,
    |    ВЫБОР
    |        КОГДА ЕСТЬNULL(КурсыВалютыРасчетов.Курс,0) = 0 И &ВалютаРасчетов <> &ВалютаРегл
    |            ТОГДА 0
    |        ИНАЧЕ ЕСТЬNULL(КурсыВалютыРасчетов.Курс,1) / ЕСТЬNULL(КурсыВалютыРасчетов.Кратность,1)
    |    КОНЕЦ КАК КурсРегл,
    |    ВЫБОР
    |        КОГДА ЕСТЬNULL(КурсыВалютыРасчетов.Курс,0) = 0 И &ВалютаРасчетов <> &ВалютаРегл
    |            ТОГДА 0
    |        КОГДА ЕСТЬNULL(КурсыВалютыУпр.Курс,0) = 0 И &ВалютаУпр <> &ВалютаРегл
    |            ТОГДА 0
    |        ИНАЧЕ (ЕСТЬNULL(КурсыВалютыРасчетов.Курс,1) / ЕСТЬNULL(КурсыВалютыРасчетов.Кратность,1)) / (ЕСТЬNULL(КурсыВалютыУпр.Курс,1) / ЕСТЬNULL(КурсыВалютыУпр.Кратность,1))
    |    КОНЕЦ КАК КурсУпр
    |ИЗ
    |    ПериодыКурсов КАК ПериодыКурсов
    |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют КАК КурсыВалютыРасчетов
    |            ПО ПериодыКурсов.Дата = КурсыВалютыРасчетов.Период
    |                И КурсыВалютыРасчетов.Валюта = &ВалютаРасчетов
    |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют КАК КурсыВалютыУпр
    |            ПО ПериодыКурсов.Дата = КурсыВалютыУпр.Период
    |                И КурсыВалютыУпр.Валюта = &ВалютаУпр
    |УПОРЯДОЧИТЬ ПО
    |    Дата ВОЗР
    |;
    |ВЫБРАТЬ
    |    &ДатаНачала КАК Дата,
    |    ЕСТЬNULL(КурсыВалют.Курс,1) / ЕСТЬNULL(КурсыВалют.Кратность,1) КАК КурсРегл,
    |    (ЕСТЬNULL(КурсыВалют.Курс,1) / ЕСТЬNULL(КурсыВалют.Кратность,1)) / (ЕСТЬNULL(КурсыВалютыУпр.Курс,1) / ЕСТЬNULL(КурсыВалютыУпр.Кратность,1)) КАК КурсУпр
    |ИЗ
    |    РегистрСведений.КурсыВалют.СрезПоследних(&ДатаНачала) КАК КурсыВалют
    |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&ДатаНачала) КАК КурсыВалютыУпр
    |            ПО КурсыВалютыУпр.Валюта = &ВалютаУпр
    |ГДЕ КурсыВалют.Валюта = &ВалютаРасчетов";
    
    Запрос.УстановитьПараметр("ЕжедневнаяПереоценка", ГлобальныеПеременные.ЕжедневнаяПереоценка);
    Запрос.УстановитьПараметр("ДатаНачала",           НачалоДня(ДатаНачала));
    Запрос.УстановитьПараметр("ДатаОкончания",        ДатаОкончания);
    Запрос.УстановитьПараметр("ВалютаРасчетов",       ГлобальныеПеременные.ВалютаРасчетов);
    Запрос.УстановитьПараметр("ВалютаУпр",            Константы.ВалютаУправленческогоУчета.Получить());
    
    Результаты = Запрос.ВыполнитьПакет();
    
    КурсыВалютыРасчетов = Результаты[1].Выгрузить();
    КурсыВалютСрезПоследних = Результаты[2].Выгрузить();
    
    ТекущийКурсРегл = ?(КурсыВалютСрезПоследних.Количество() > 0, КурсыВалютСрезПоследних[0].КурсРегл, 1);
    ТекущийКурсУпр = ?(КурсыВалютСрезПоследних.Количество() > 0, КурсыВалютСрезПоследних[0].КурсУпр, 1);
    
    ТекущаяДата = НачалоДня(ДатаНачала);
    сч = 0;
    Пока ТекущаяДата <= ДатаОкончания Цикл
        Если сч < КурсыВалютыРасчетов.Количество()
            И КурсыВалютыРасчетов[сч].Дата <> ТекущаяДата Тогда
            НовСтр = КурсыВалютыРасчетов.Вставить(сч);
            НовСтр.Дата = ТекущаяДата;
            НовСтр.КурсРегл = ТекущийКурсРегл;
            НовСтр.КурсУпр = ТекущийКурсУпр;
        Иначе
            Если КурсыВалютыРасчетов[сч].КурсРегл = 0 Тогда
                КурсыВалютыРасчетов[сч].КурсРегл = ТекущийКурсРегл;
            Иначе
                ТекущийКурсРегл = КурсыВалютыРасчетов[сч].КурсРегл;
            КонецЕсли;
            Если КурсыВалютыРасчетов[сч].КурсУпр = 0 Тогда
                КурсыВалютыРасчетов[сч].КурсУпр = ТекущийКурсУпр;
            Иначе
                ТекущийКурсУпр = КурсыВалютыРасчетов[сч].КурсУпр;
            КонецЕсли;
        КонецЕсли;
        ТекущаяДата = ТекущаяДата + 24*60*60;
        сч = сч + 1 ;
    КонецЦикла;
    
    КурсыВалютыРасчетов.Индексы.Добавить("Дата");
    
    Возврат КурсыВалютыРасчетов;
    
КонецФункции

т.е. прошло два дня, а человек не удосужился поставить точку останова и посмотреть, что у него в КурсыВалютыРасчетов

(8) А нельзя подсказать, как и что сделать.?

(9) подсказать это в (6) сделали
отладчиком совсем не умеешь пользоваться?
а то получается надо не подсказать, а научить

(10) в том то и дело, что не умею...

Ну что ни кто не поможет???