Добрый день форумчане,подскажите почему происходит задвойка в цикле и как исправить.Это обработка по добавлению номенклатуры в регистр сервисМеню
код
Массив2 = Новый Массив;
    Для каждого стр из ВидРемонтаН цикл
        Если стр.Пометка Тогда
            Массив2.Добавить(стр.ВидРемонта)
        КонецЕсли;
    КонецЦикла;
    
    Массив3 = Новый Массив;
    Для каждого стр из ТипДвигателяН цикл
        Если стр.Пометка тогда
            Массив3.Добавить(стр.ТипДвигателя)
        КонецЕсли;
    КонецЦикла;
    
    Массив4 = Новый Массив;
    Для каждого стр из ТипыКпп цикл
        Если стр.Пометка тогда
            Массив4.Добавить(стр.ТипКПП)
        КонецЕсли;
    КонецЦикла;
    
    Массив5 = Новый Массив;
    Для каждого стр из Модели цикл
        Если стр.Пометка тогда
            Массив5.Добавить(стр.Модель)
        КонецЕсли;
    КонецЦикла;
    
    для каждого стр1 из Массив2 Цикл
        Для Каждого стр5 из Массив5 цикл
            Для каждого стр3 из Материалы цикл
                 Для каждого стр2 Из Массив3 Цикл
                    для Каждого стр4 из Массив4 цикл
                        рег = РегистрыСведений.СервисМеню.СоздатьМенеджерЗаписи();
                        рег.ВидРемонта = стр1;
                        рег.МодельныйГодС = НачПериода;
                        рег.МодельныйГодПо = КонПериода;
                        Рег.ТоварУслуга = стр3.Номенклатура;
                        Рег.ТипДвигателя = стр2;
                        Рег.КодМодели = "?";
                        рег.ТипКПП = стр4;
                        Рег.Стоимость = стр3.сумма;
                        рег.Модель = стр5;
                        Рег.Количество = стр3.Количество;
                        рег.Записать();
                    КонецЦикла;
                    //Для каждого стр5 из Работы цикл
                    //    рег1 = РегистрыСведений.ПрайсМенюСервис.СоздатьМенеджерЗаписи();
                    //    рег1.ВидТО = стр1;
                    //    рег1.КодМодели = стр2;
                    //    Рег1.ТоварУслуга = стр4.Запчасть;
                    //    Рег1.Стоимость = стр4.Цена*стр4.Количество;
                    //    рег1.Модель = стр2.Модель;
                    //    Рег1.Количество = стр4.Количество;
                    //    рег1.Записать();
                    //КонецЦикла;
                КонецЦикла;
            КонецЦикла;
        КонецЦикла;
    КонецЦикла;
КонецПроцедуры

(0) всё в топку

(0) садись, двойка за задвойку

пипец, я иногда удивляюсь

(3) ахахха

Подскажите как исправить в таком варианте,когда нибудь дойду до правильных вариантов)

(3) Стаж: 11 лет 3 месяца 28 дней vs Стаж: 1 месяц 4 дня
чего еще тут ожидать кроме как удивления

(5) цель какая ? Получить кортеж всех возможных вариантов из ВидРемонтаН/ТипДвигателяН/ТипыКпп/Модели  ?

по всем ВидРемонтаН/ТипДвигателяН/ТипыКпп/Модели добавить номенклатуру,он работает,но делает по 4 копии.

(7)  в (8)

(8) Так у тебя 5 массивов/циклов. Значит в лишнем 4 элемента

(10) https://pastenow.ru/7W6A8
я массивами получаю информацию из колонок и поля работа,и через них перебираю

Помойму поправил
перемещением цикла материалы в конец
щас проверю

(11) У тебя пятый цикл по материалам, он не указан в (8)

материал = номенклатура здесь,справочник не я делал

добавить по всем тем 4 1 новую номенклатуру в обязательные

(13) или про что ты?

не не решилось

хоть и пятнично, но толстовато

исправил
не знаю как но перестало)))

Тогда подскажите,есть переменная да, как мне прибавать 3 первых знака из этой переменной?

CX-9
37CX920072015
6AT
2007
2015
из этого получается вот это
CX9_37C_AT_07/15
как это сделать сложением строк?

СтрСоединить

(21)(22) или проще: ""+Рекв1+Рекв2+....

так он не целиком же берет реквезит
37CX920072015 из этого только 37С и так со всех типов двигла

с коробки только ат или мт

(25) Ну так оперируй Лев, Прав и прочими для такого стажа что-то и в самом деле толсто.

(26) я с нуля без знаний пришел,и походу монотонной работы,появляются знания,стаким еще не сталкивался

(26) спасибо про лев прав

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

Рег.КодМодели = стр5.НаименованиеТОЙОТА +"_"+ Лев(стр2,3) +"_"+Прав(стр4,2) +"_"+Прав(НачПериода,2) +"/"+Прав(КонПериода,2);
Вот так это сделал работает,всем спасибо.

(30) все закрываете 10 часов и требуйте с клиента 50К, а не будет платить, намекните, мол, "цифровая экономика, то, се"

(30) На будущее Если первый реквизит будет Число то Так склеить не получится. Нужно дописывать сначала ""+стр5.НаименованиеТОЙОТА +"_"+ Лев(стр2,3) +...
А в данном случае и так сойдет, так как первое слагоемое - это текст.

(0)Ух, а если в каком нибудь массиве строки не добавится на примере CX-9 ну не будет этих данных, и получится
CX-9
37CX920072015
4AT (коробка другая подставится)
1993 (год)
1997 (год)

Что делать будешь?

Откуда ты берешь таблицы?
ВидРемонтаН
ТипДвигателяН
ТипыКпп
Модели

(34) сам создал внутри обработки

(31) ахахахахахах

(33) в этом плане тянет нормально.перевпроверено

А вот и франчовые герои из ролика Охотницы...

(38) А ну просвятите,что за герои и что за ролик?

(0) говнокод детектед

(30) бгггг... НаименованиеТОЙОТА???  Мммуххаха

СХ-9 это не ТОЙОТА, это МАЗДА. Мазда,... Ть

(41) (42) Итс нот ми все прописывать,я только допиливаю и ввожу новые функции

(43) может не надо?

(44) может и не надо,но сижу просят дают тз делаю,говорят во так норм.

(44) но кушать и жить то хочется(

(42) А почему бы в поле НаименованиеТОЙОТА не быть значению Мазда? :))

(42) может тойота - это название магазина?

(45) надеюсь деньги не берешь...

второй атомный код за сегодня.

(49) не я не беру,сами дают

(50) ядрена кода