Имя: Пароль:
1C
1С v8
УТ11 не создается номенклатура
0 maestro-72
 
27.02.14
12:07
из внешней обработки надо создать номенклатуру
на форме таблицазначений заполнена данными
Код вот:
&НаСервере
Процедура СоздатьНоменклатуру(ТЗ)
    
    //Создаем номенклатуру
    ТЗ.Сортировать("Артикул");
    Арт = "???"; //Будем оценивать по артикулу повторяющиеся номенклатуры
    Для Каждого СтрТаб из ТЗ Цикл
        Если СокрЛП(СтрТаб.Артикул) = Арт Тогда
            Продолжить;
        КонецЕсли;
        Арт = СокрЛП(СтрТаб.Артикул);
        //Проверим номенклатуру Может уже создана
        Номен = Справочники.Номенклатура.НайтиПоРеквизиту("Артикул", СтрТаб.Артикул);
        Если Не Номен.Пустая() Тогда
            Продолжить;
        КонецЕсли;    
            
            //Требуется создать номенклатуру
            Номен = Справочники.Номенклатура.СоздатьЭлемент();
            Номен.Наименование = СтрТаб.Наименование;
            Номен.ПолноеНаименование = СтрТаб.ПолноеНаименование;
            Номен.СтавкаНДС = Перечисления.СтавкиНДС.БезНДС;
            Номен.Артикул = СокрЛП(СтрТаб.Артикул);
            
                
            Попытка
                Номен.Записать();
            Исключение
                Сообщить("Не удалось записать элемент номенклатуры " + СтрТаб.Наименование);
            КонецПопытки;
            
    КонецЦикла;
КонецПроцедуры

&НаКлиенте
Процедура Создать(Команда)
    СоздатьНоменклатуру(Таблица);
КонецПроцедуры    

При нажатии на кнопку создать ничего не происходит, как правильно сделать, очень срочно нужно. Где я не прав?
1 Avganec
 
27.02.14
12:10
(0) посмотри здесь:

       Если СокрЛП(СтрТаб.Артикул) = Арт Тогда
            Продолжить;
        КонецЕсли;
2 Михаил Козлов
 
27.02.14
12:13
Скорее всего перед записью элемента номенклатуры происходит проверка, есть ли единица хранения остатков.
3 maestro-72
 
27.02.14
12:24
Всем спасибо, вроде нашел ошибку...
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший