1.3.1.108: fix обратного цикла удаления строк комиссии (#19).

Для Инд = N По 0 без Шаг -1 в 1С не выполняется; удаление через Пока Инд >= 0.

Co-authored-by: Cursor <cursoragent@cursor.com>
This commit is contained in:
mihailkudravcev
2026-08-31 14:41:28 +03:00
parent f419fe067c
commit 1e67e2d135
2 changed files with 4 additions and 2 deletions
+1 -1
View File
@@ -62,7 +62,7 @@
<xr:Item xsi:type="xr:MDObjectRef">Role.РК_ОсновнаяРоль</xr:Item> <xr:Item xsi:type="xr:MDObjectRef">Role.РК_ОсновнаяРоль</xr:Item>
</DefaultRoles> </DefaultRoles>
<Vendor/> <Vendor/>
<Version>1.3.1.107</Version> <Version>1.3.1.108</Version>
<DefaultStyle/> <DefaultStyle/>
<DefaultLanguage>Language.Русский</DefaultLanguage> <DefaultLanguage>Language.Русский</DefaultLanguage>
<BriefInformation/> <BriefInformation/>
@@ -365,10 +365,12 @@
КонецЦикла; КонецЦикла;
КонецЦикла; КонецЦикла;
Для Инд = ВходящиеКомиссионныеТовары.Количество() - 1 По 0 Цикл Инд = ВходящиеКомиссионныеТовары.Количество() - 1;
Пока Инд >= 0 Цикл
Если УдаляемыеИндексы.Получить(Инд) <> Неопределено Тогда Если УдаляемыеИндексы.Получить(Инд) <> Неопределено Тогда
ВходящиеКомиссионныеТовары.Удалить(Инд); ВходящиеКомиссионныеТовары.Удалить(Инд);
КонецЕсли; КонецЕсли;
Инд = Инд - 1;
КонецЦикла; КонецЦикла;
Результат.СталоСтрок = ВходящиеКомиссионныеТовары.Количество(); Результат.СталоСтрок = ВходящиеКомиссионныеТовары.Количество();