Имя: Пароль:
1C
1С v8
При создании элементов в справочнике
0 maxi0n
 
20.01.15
15:24
Добрый день может быть кто нибудь подскажет есть код:
Функция ВернутьЕдИзм(Номенклатура)

        Запрос = Новый Запрос;
        Запрос.Текст =
        "ВЫБРАТЬ
        |    ЕдиницыИзмерения.Ссылка КАК ЕдИзм
        |ИЗ
        |    Справочник.ЕдиницыИзмерения КАК ЕдиницыИзмерения
        |ГДЕ
        |    ЕдиницыИзмерения.Владелец = &Владелец
        |    И ЕдиницыИзмерения.ЕдиницаПоКлассификатору = &ЕдиницаПоКлассификатору";
        
        Запрос.УстановитьПараметр("Владелец",Номенклатура);
        Запрос.УстановитьПараметр("ЕдиницаПоКлассификатору",Номенклатура.ЕдиницаХраненияОстатков);        
        Выборка = Запрос.Выполнить().Выбрать();
        
        Пока Выборка.Следующий() Цикл
            Возврат Выборка.ЕдИзм.Ссылка;
        КонецЦикла;
КонецФункции

//------------------------------------------------------------------------------
Процедура КнопкаВыполнитьНажатие(Кнопка)

        
    СпрХарактеристикиНоменклатуры = Справочники.ХарактеристикиНоменклатуры;
    СпрНоменклатура = Справочники.Номенклатура;
    Наменклатура = СпрНоменклатура.Выбрать(Родитель);

    
    Пока Наменклатура.Следующий() Цикл
        
        Элемент = Наменклатура.ПолучитьОбъект();
        Элемент.ВестиУчетПоХарактеристикам = Истина;
        Элемент.Записать();        
                    
        ЭлементХар = СпрХарактеристикиНоменклатуры.СоздатьЭлемент();
        ЭлементХар.Владелец     = Элемент.Ссылка;
        ЭлементХар.Наименование = "Брак";
        ЭлементХар.Активная     = Истина;
        ЭлементХар.Записать();

        
        //ЭлементХар = СпрХарактеристикиНоменклатуры.СоздатьЭлемент();
        //ЭлементХар.Владелец     = Элемент.Ссылка;
        //ЭлементХар.Наименование = "Бой";
        //ЭлементХар.Активная     = Истина;
        //ЭлементХар.Записать();
КонецЦикла;    
    Предупреждение("Загрузка завершена");
КонецПроцедуры

Нужно,если есть элемент в справочники "Бой" или "Брак" не создавал повторно и пропускал этот элемент.
1 vicof
 
20.01.15
15:31
Справочники.ХарактеристикиНоменклатуры.НайтиПоНаименованию()
2 maxi0n
 
20.01.15
15:36
(1) а как правильно написать в коде