Есть справочники номенклатуры.
Там 10 товар.2 родитель.
Родитель 1
И
Родитель 2
Родитель 2 пока что пусто.
выбрал товары из Номенклатуры. ( Товар 1 , Товар 3 ) потом выбрал товары из Номенклатуры.Родитель 1 ( Товар 8 , Товар 10 )..
Нужно,загрузить товары в на Номенклатуру.Родитель 2 из Документа Инвентаризации.
Я написал код.Но не могу дальше идти.
Помогите пожалуйста, не могу решать .
Заранее спасибо.
Там 10 товар.2 родитель.
Родитель 1
И
Родитель 2
Родитель 2 пока что пусто.
выбрал товары из Номенклатуры. ( Товар 1 , Товар 3 ) потом выбрал товары из Номенклатуры.Родитель 1 ( Товар 8 , Товар 10 )..
Нужно,загрузить товары в на Номенклатуру.Родитель 2 из Документа Инвентаризации.
Я написал код.Но не могу дальше идти.
Помогите пожалуйста, не могу решать .
Заранее спасибо.
По теме из базы знаний
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(4)выбрал товар из номенклатуры , добавил их на документ инвентаризации.Те товары которые я добавил в на документу инвентаризации,сейчас нужно выбрат эти товары из этого документа ( документ Инвертаризации ) и добавить этих товаров в на Справочники номенклатуру на выбронному родителу , например (РОДИТЕЛЬ 2 ).
Процедура КнопкаВыполнитьНажатие(Кнопка)
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| Инвентаризация.Ссылка
|ИЗ
| Документ.Инвентаризация КАК Инвентаризация
|ГДЕ
| Инвентаризация.Ссылка В ИЕРАРХИИ(&Ссылка)";
Запрос.УстановитьПараметр("Ссылка", ПолеВвода1);
РезультатЗапроса = Запрос.Выполнить();
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
ЗаписатьДок = ложь;
Док = ВыборкаДетальныеЗаписи.Ссылка.ПолучитьОбъект();
КолВо = Док.Товары.Количество()-1;
ИндексСтроки = КолВо;
Для Счетчик = 0 по КолВо Цикл
Запись = Док.Товары.Получить(ИндексСтроки);
Сообщить(Запись.Товар);
КонецЦикла;
КонецЦикла;
КонецПроцедуры
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| Инвентаризация.Ссылка
|ИЗ
| Документ.Инвентаризация КАК Инвентаризация
|ГДЕ
| Инвентаризация.Ссылка В ИЕРАРХИИ(&Ссылка)";
Запрос.УстановитьПараметр("Ссылка", ПолеВвода1);
РезультатЗапроса = Запрос.Выполнить();
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
ЗаписатьДок = ложь;
Док = ВыборкаДетальныеЗаписи.Ссылка.ПолучитьОбъект();
КолВо = Док.Товары.Количество()-1;
ИндексСтроки = КолВо;
Для Счетчик = 0 по КолВо Цикл
Запись = Док.Товары.Получить(ИндексСтроки);
Сообщить(Запись.Товар);
КонецЦикла;
КонецЦикла;
КонецПроцедуры
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот