Загрузка выписки банка

Форум Учет и отчетность Общие вопросы по учету (Учет)

1С:ERP Управление предприятием 2 Платформа 1С v8.3

1. okulus 30.07.15 13:05 Сейчас в теме

При загрузке выписке с переводом между своими счетами ошибка в Обработка ОбменСБанками: Модуль менеджера

{Обработка.ОбменСБанками.МодульМенеджера(2266)}: Индекс находится за границами массива
				СтрокаДокумента.СчетКонтрагента = СобственныеСчетаПолучатели[0].Ссылка;

весь участок кода:

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

				СтрокаДокумента.ВидОперации = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствСДругогоСчета;
				СтрокаДокумента.СчетКонтрагента = СобственныеСчетаПолучатели[0].Ссылка;
			КонецЕсли;
		КонецЕсли;

Показать

1С:Предприятие 8.3 (8.3.6.2076)
1С:ERP Управление предприятием 2.1 (2.1.1.30)

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. PetrS 30.07.15 13:14 Сейчас в теме

Похоже ошибка в коде в условии после "Иначе", там небось перепутано СобственныеСчетаПолучатели с СобственныеСчетаОтправители. Скорее всего должно быть так:

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

                СтрокаДокумента.ВидОперации = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствСДругогоСчета;
                СтрокаДокумента.СчетКонтрагента = СобственныеСчетаОтправители[0].Ссылка;
            КонецЕсли;
        КонецЕсли;

Показать

3. okulus 30.07.15 13:41 Сейчас в теме

Спасибо! Помогло!

Оставьте свое сообщение

E-mail: