Изменение элементов справочника в выборке

[progmikon]

Кроме того, мы условием и проверяем нашел он или нет. Если не нашел, то и объект получать объект незачем.

[Zeratul]

Сделал Тестирование и Исправление БД
В итоге все OK!!!

Вот код


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

      Попытка
         Спр.Записать();
      Исключение
         КонецПопытки;
                    Сообщить(Спр.Код);

         КонецЕсли;
      

          КонецЦикла;

   
            
      
      ОбработкаПрерыванияПользователя();


      КонецЦикла;

Огромное спасибо!!!
Теперь буду дописывать полностью!

[progmikon]

Не за что.

[Zeratul]

еще один вопросик можно?
В данном справочнике есть Табличные части, так вот, я хочу в цикле также добавлять записи в эти табл.части тока в другой процедуре, я записывал код так:

Спр = Спр.Карт.СоздатьЭлемент();
Табл=Спр.Коровы.добавить();
Новстр = табл.дата;
Новстр=табл.вес;
и т.д....
так вот как мне в эту табл.часть добавить не одну запись с множество?

[progmikon]

еще один вопросик можно?
В данном справочнике есть Табличные части, так вот, я хочу в цикле также добавлять записи в эти табл.части тока в другой процедуре, я записывал код так:

Спр = Спр.Карт.СоздатьЭлемент();
Табл=Спр.Коровы.добавить();
Новстр = табл.дата;
Новстр=табл.вес;
и т.д....
так вот как мне в эту табл.часть добавить не одну запись с множество?

Спр = Спр.Карт.СоздатьЭлемент();
//тут вставляем цикл
Пока Выборка.Следующий() Цикл
Табл=Спр.Коровы.добавить();
Новстр = табл.дата;
Новстр=табл.вес;

[progmikon]

Если цикл не нужен,то придерживаемся правила, что для каждой новой строки нужно добавить:

Табл=Спр.Коровы.добавить();
Новстр = табл.дата;
Новстр=табл.вес;

[Zeratul]

а как записывать именно данную строку и переходить к следующей строке? Или в цикле всё это и будет производится?
Я как-то пробовал дело закончилось тем что в каждой элементе у меня было по одной строке

[Zeratul]

Теперь мне понятно=) Еще раз огромное спасибо!

[progmikon]

А вы что добавляете в табличную часть? какие данные и откуда?

[Zeratul]

Добавляю опять же из того же документа эксель данные в этот же справочник, вот только в другую табл часть!
Вот кстати нашел тот код который я делал:

//Кор = Справочники.КарточкаКоровы.Выбрать();
         //Пока Кор.Следующий() Цикл
         //объект = кор.ПолучитьОбъект();
         //
         //
         //НовСтр = КартКор.ПлемИсп.Добавить();
         ////НовСтр.ДатаОсеменения = Дата(ДатаРождения+" 00:00:00");
         //НовСтр.СпособОсеменения = Перечисления.Осеменение.Вольн;
         //НовСтр.ИндивНомерБыка =Справочники.КарточкаБыка.НайтиПоКоду("ДРЖ -" + НомерОтца);
         //НовСтр.ДатаОтела =  Дата(ДатаРождения+" 00:00:00");
         //Новстр.ПолТеленка = перечисления.ПолЖивотного.Телка;
         //новстр.КличкаИИндивНомерТеленка = "ДРЖ -"+КодЖивотного;
         //новстр.ЖивМассаПриРождении = ВесРожд;
         //новстр.ЖивМассаВ6мес = Вес6м;
         //новстр.ЖивМассаВ7мес = Вес6м;
         //новстр.ЖивМассаВ8мес = Вес8м;
         //новстр.ЖивМассаВ15мес = Вес15;
         //новстр.ЖивМассаВ18мес = Вес18;
         //объект.Записать();
         //КонецЦикла;