Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиКалендарьОблакоЗаметкиВсе проекты

Как записать новый элемент в подчиненного справочника?

Азимбой Собиров Знаток (266), закрыт 13 лет назад
Здравствуйте! За ранее прощу прощения за простой вопрос дело в том я ещё чайник в 1С. Я создал два справочника ЕдиницыИзмерения и ЕдИзмМатериалов. 2 подчинен на 1. Хочу сдлелать так, если создаю новый элемент на ЕдиницыИзмерения надо автоматический добавляется наименования на подчиненного. Сделал такой процедура:

Процедура ЗаписьНаПод()

РС = СоздатьОбъект("Справочник.ЕдИзмМатериалов");
РС.ИспользоватьВладельца(Наименование);
РС.ПорядокНаименований();
РС.ВыбратьЭлементы();
ВозврРС = "";
НеНайден = 1;
Пока (РС.ПолучитьЭлемент() = 1) И (НеНайден = 1) Цикл
Если РС.ПометкаУдаления() = 0 Тогда
ВозврРС = РС.ТекущийЭлемент();
НеНайден = 0;
КонецЕсли;
КонецЦикла;
Если ВозврРС="" Тогда
Рс.Новый();
Рс.Наименование=Наименование;
Рс.Записать();
КонецЕсли;

КонецПроцедуры

но дает такой ошибка:
Рс.Записать();
{Справочник.ЕдиницыИзмерения.ФормаСписка.ФормаСписка.Модуль(18)}: Не выбран элемент справочника-хозяина! Элемент не может быть записан!
Помогите пожалуйста как сделать эту. За ранее Спасибо!
Лучший ответ
makfromkz Высший разум (129291) 13 лет назад
РС. ИспользоватьВладельца (Наименование) ; - в этой строчке темное место, на самом деле под идентификатором Наименование должен быть элемент справочника а не текстовое название
Правильнее:
рез= РС. НайтиПоНаименованию ("НаименованиеЕдИз");
Если рез = 1 Тогда
влад1 = РС. ТекущийЭлемент ();
Иначе
Предупреждение ("Не найден владелец!!! ");
Возврат;
КонецЕсли;

// и еще нужно дополнить ваши строчки:
Рс. Новый ();
Рс. Наименование=Наименование;
РС. Владелец = влад1; // надо обязательно указать владельца для создаваемого элемента подчиненного справочника
Рс. Записать ();
Остальные ответы
Похожие вопросы