Заполнение Типа цен, наценок, базы на основании данных из другого справочника УТ 10.3

Форум Программирование Общие вопросы программирования (Dev)

1С:Управление торговлей 10

1. Гость 17.12.17 14:53

Здравствуйте! Написал нечто, что должно заполнять наценки номенклатуры на основании данных другого справочника. Вроде работает, но иногда после выполнения обработки, в самом верху появляется пустая строчка с левой наценкой, либо вообще без нее. Я совсем новичок в 1с, даж не знаю в чем проблема. Буду благодарен за помощь) Рад, если кого-то развеселил своим кодом и описанием задачи))

Процедура КоманднаяПанель2ЗаполнитьПоОбразцу(Кнопка) 
	ВыбЭлемент = ПолеВвода1;
    ЗаполнениеРегистраЦенПоОбразцу(ВыбЭлемент);
КонецПроцедуры

Процедура ЗаполнениеРегистраЦенПоОбразцу(Образец)
	//Если Образец <> Неопределено Тогда
		 Отбор = Новый Структура("Номенклатура", Образец.Ссылка);
		Выборка = РегистрыСведений.НаценкиНоменклатурыПоТипамЦен.Выбрать(Отбор);
		Пока Выборка.Следующий() Цикл
			Для Каждого Элемент Из ЭлементыФормы.ПолеВвода2.Значение Цикл
				НовЗапись = РегистрыСведений.НаценкиНоменклатурыПоТипамЦен.СоздатьМенеджерЗаписи();
				НовЗапись.Номенклатура = Элемент.Значение;
				НовЗапись.ТипЦен = Выборка.ТипЦен;
				НовЗапись.База = Выборка.База;
				НовЗапись.Фиксированная = Выборка.Фиксированная;
				НовЗапись.Наценка = Выборка.Наценка;
			Попытка
				НовЗапись.Записать();
			Исключение
				Сообщить(ОписаниеОшибки());
			КонецПопытки;
			КонецЦикла;
		КонецЦикла;	
	//КонецЕсли;
КонецПроцедуры

Показать

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

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

Свернуть все

Внимание! Не забывайте отмечать решение на ваш вопрос, если оно найдено. Это повысит ваш рейтинг на форуме.

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

E-mail: