Имя: Пароль:
1C
1С v8
Записать элемент номенклатура
,
0 Эльчин
 
29.01.14
13:45
НовыйЭлемент = Справочники.Номенклатура.СоздатьЭлемент();
            НовыйЭлемент.Артикул = СтрАртикул;
            НовыйЭлемент.Наименование = СтрНоменклатура;
            НовыйЭлемент.НаименованиеПолное = СтрНоменклатура;
            НовыйЭлемент.ВидНоменклатуры = Справочники.ВидыНоменклатуры.НайтиПоКоду("000000001").Ссылка;
            НовыйЭлемент.БазоваяЕдиницаИзмерения = Единица.Ссылка;
            Попытка
                НовыйЭлемент.Записать();
            Исключение
                Сообщить("Не удалось записать НовыйЭлемент: " + ОписаниеОшибки(), СтатусСообщения.Важное);
                Отказ = Истина;
                Возврат;
            КонецПопытки;
            //Добаввление Единиц нового номенклатуры
            НайденнаяЕдиницаОбъект = Справочники.ЕдиницыИзмерения.СоздатьЭлемент();
            НайденнаяЕдиницаОбъект.Наименование            = СокрЛП(НовыйЭлемент.БазоваяЕдиницаИзмерения);
            НайденнаяЕдиницаОбъект.ЕдиницаПоКлассификатору = НовыйЭлемент.БазоваяЕдиницаИзмерения;
            НайденнаяЕдиницаОбъект.Коэффициент             = 1;
            НайденнаяЕдиницаОбъект.Владелец                = НовыйЭлемент.Ссылка;

            Попытка
                НайденнаяЕдиницаОбъект.Записать();
            Исключение
                Сообщить("Не удалось записать единицу хранения остатков: " + ОписаниеОшибки(), СтатусСообщения.Важное);
                Отказ = Истина;
                Возврат;
            КонецПопытки;
            НайденнаяЕдиница = НайденнаяЕдиницаОбъект.Ссылка;//Добавлен Единица
            
            НовыйЭлемент.ЕдиницаХраненияОстатков = НайденнаяЕдиница;
            НовыйЭлемент.ЕдиницаДляОтчетов= НайденнаяЕдиница;
            НовыйЭлемент.Записать();

Почему элемент не записывается?
1 Euguln
 
29.01.14
13:46
(0) Где конкретно?
2 Fish
 
29.01.14
13:46
А что сообщает? Или надо угадать сообщение об ошибке?
3 zak555
 
29.01.14
13:47
и что за ошибка ?
4 Beduin
 
29.01.14
13:47
(2) С сообщением каждый ответит. Попробуй без него.
5 Euguln
 
29.01.14
13:48
Я думаю дело в СтрНоменклатура
6 PR
 
29.01.14
13:48
(3) С какой целью интересуешься?
7 PR
 
29.01.14
13:48
Я думаю, дело в Эльчин
8 Эльчин
 
29.01.14
13:49
(2) нет ошибки
9 Эльчин
 
29.01.14
13:49
нет элемента в справочнике
10 Euguln
 
29.01.14
13:50
(9) Не там смотришь, отбор отключи
11 rbcvg
 
29.01.14
13:50
здесь ошибка: "НовыйЭлемент.БазоваяЕдиницаИзмерения = Единица.Ссылка;"
12 Apokalipsec
 
29.01.14
13:50
Потому что нет ещё единицы измерения - ты её потом создать пытаешься.
13 Эльчин
 
29.01.14
13:51
(11) Единица ето реквизить
14 Эльчин
 
29.01.14
13:51
+ я выбераю его
15 Beduin
 
29.01.14
13:51
(12) Шаман. Молодец.
16 Эльчин
 
29.01.14
13:52
(10) смотрел, отбор отключен
17 AliceLight
 
29.01.14
13:53
Немножко оффтоп: гуру-1Сники, скажите, а как правильнее писать:
Справочники.ВидыНоменклатуры.НайтиПоКоду("000000001").Ссылка
или
Справочники.ВидыНоменклатуры.НайтиПоКоду("000000001")
? Я всегда без ".Ссылка" пишу и работает вродь... Как правильнее?
18 Beduin
 
29.01.14
13:54
(17) Справочники.ВидыНоменклатуры.НайтиПоКоду("000000001").Ссылка.Ссылка
19 PR
 
29.01.14
13:54
(17) Правильнее Константы.ВидНоменклатурыСКодом1.Получить()
20 PR
 
29.01.14
13:55
(18) Неудачник. Меньше трех раз уже никто не пишет :))
21 Эльчин
 
29.01.14
13:55
смотрите, он уже есть как обект:
http://xmage.ru/?v=elementnom.jpg
22 zak555
 
29.01.14
13:57
СсылкаНаНовыйЭлемент = Справочники.Организации.ПолучитьСсылку();
НовыйЭлемент = Справочники.Номенклатура.СоздатьЭлемент();
НовыйЭлемент.УстановитьСсылкуНового(СсылкаНаНовыйЭлемент);


НовыйЭлемент.Артикул = СтрАртикул;
НовыйЭлемент.Наименование = СтрНоменклатура;
НовыйЭлемент.НаименованиеПолное = СтрНоменклатура;
НовыйЭлемент.ВидНоменклатуры = Справочники.ВидыНоменклатуры.НайтиПоКоду("000000001");

НайденнаяЕдиницаОбъект = Справочники.ЕдиницыИзмерения.СоздатьЭлемент();
НайденнаяЕдиницаОбъект.Наименование            = СокрЛП(НовыйЭлемент.БазоваяЕдиницаИзмерения);
НайденнаяЕдиницаОбъект.ЕдиницаПоКлассификатору = НовыйЭлемент.БазоваяЕдиницаИзмерения;
НайденнаяЕдиницаОбъект.Коэффициент             = 1;
НайденнаяЕдиницаОбъект.Владелец                = СсылкаНаНовыйЭлемент;
НайденнаяЕдиницаОбъект.Записать();

НайденнаяЕдиница = НайденнаяЕдиницаОбъект.Ссылка;//Добавлен Единица

            
НовыйЭлемент.ЕдиницаХраненияОстатков = НайденнаяЕдиница;
НовыйЭлемент.ЕдиницаДляОтчетов= НайденнаяЕдиница;
НовыйЭлемент.Записать();
23 AliceLight
 
29.01.14
13:57
(18) да-да, почти верю.
Ладно, не буду оффтопить и отвлекать внимание от автора
24 Эльчин
 
29.01.14
13:57
25 Beduin
 
29.01.14
13:58
Вычисли нам еще найденнаяединица.Владелец
26 Эльчин
 
29.01.14
14:01
(25) смотри (24)
27 zak555
 
29.01.14
14:02
СсылкаНаНовыйЭлемент = Справочники.Номенклатура.ПолучитьСсылку();
28 Beduin
 
29.01.14
14:02
(26) Журнал регистрации что говорит?
29 Эльчин
 
29.01.14
14:03
(25) 1 минуту
30 Эльчин
 
29.01.14
14:04
31 Эльчин
 
29.01.14
14:07
(22) не получился
32 Эльчин
 
29.01.14
14:21
простите ребята. не написал ЗафиксироватьТранзакцию() в конце
:) sorry
33 Strogg
 
29.01.14
14:25
И НачатьТранзакцию() в начале)))
34 zak555
 
29.01.14
14:26
(31) ты первую строку переделал с учётом 27 ?
AdBlock убивает бесплатный контент. 1Сергей