Единица измерения принадлежит другому элементу справочника номенклатура

Форум 1С: Одинэс.Ру

Найти!

Единица измерения принадлежит другому элементу справочника номенклатура

noviptr
05.04.2009 - 12:11
Имеется обработка по загрузке приходных накладных из ТХТ в ТиС. Все вроде грузится но для некоторых позиций (созданных этой обработкой)при попытке выписать заявку поставщику выскакивает сабж
Текст создания нового элемента справочника номенклатура из этой обработки:
Если СпрНом.Выбран()=0 тогда
СпрНом.Новый();
СпрНом.Наименование = Наименование;
СпрНом.ВидНоменклатуры = Перечисление.ВидыНоменклатуры.Прочее;
СпрНом.ПолнНаименование = Наименование;
Если ((Найти(СпрНом.Наименование, "Труб")>0) или (Найти(СпрНом.Наименование, "труб")>0) Тогда
КодЕд="006";
иначе
КодЕд="796";
КонецЕсли;    
Если СпрОКЕИ.НайтиПоКоду(КодЕд, 0) = 1 Тогда;
КодОк = СпрОКЕИ.ТекущийЭлемент();
КонецЕсли;
СпрЕд.ИспользоватьВладельца(СпрНом.ТекущийЭлемент());
Если СпрЕд.НайтиПоРеквизиту("ОКЕИ",КодОК, 1) = 1 Тогда
           СпрНом.БазоваяЕдиница = СпрЕд.ТекущийЭлемент();
Иначе
         СпрЕд.Новый();
СпрЕд.ОКЕИ=СпрНом.БазоваяЕдиница;
СпрЕд.Коэффициент=1;
СпрЕд.Записать();
СпрНом.БазоваяЕдиница = СпрЕд.ТекущийЭлемент();
КонецЕсли;  
СпрНом.Записать();  
СпрЦены= СоздатьОбъект("Справочник.Цены");
СпрЦены.ИспользоватьДату(ДатаДок);
СпрЦены.ИспользоватьВладельца(СпрНом.ТекущийЭлемент());
//****Приходные**************************************************
СпрЦены.Новый();
КодЦены="00001";
Цены.НайтиПоКоду(КодЦены);
СпрЦены.ТипЦен =Цены.ТекущийЭлемент();
Если СпрЕд.НайтиПоРеквизиту("ОКЕИ",КодОК, 1) = 1 Тогда
         СпрЦены.Единица = СпрЕд.ТекущийЭлемент();
Иначе
        СпрЕд.Новый();
СпрЕд.ОКЕИ=СпрОКЕИ.ТекущийЭлемент();
СпрЕд.Коэффициент=1;
СпрЕд.Записать();
СпрЦены.Единица = СпрЕд.ТекущийЭлемент();
КонецЕсли;
СпрЦены.Валюта=Константа.ВалютаБухУчета;
СпрЦены.Записать();      
К списку тем К списку форумов

Интересные темы

odines.ru
29.03.2024 - 02:12
Смотри также:
Опт и ЕНВД - как разделить входящий НДС?
Объясните про "ИтогиАктуальны()"
Не знаю что сказать.

Re: Единица измерения принадлежит другому элементу справочника номенклатура

noviptr
1 - 05.04.2009 - 12:13
Подскажите пожалуйста в чем ошибка?

Re: Единица измерения принадлежит другому элементу справочника номенклатура

victuan
2 - 05.04.2009 - 12:39
(1) Перед
СпрЕд.ИспользоватьВладельца(СпрНом.ТекущийЭлемент());
поставь строку
СпрНом.Записать();  
и подумай почему.

Re: Единица измерения принадлежит другому элементу справочника номенклатура

victuan
3 - 05.04.2009 - 12:48
А самое главное, в методе НайтиПоРеквизиту замени 1 на 0
И подумай почему.

Re: Единица измерения принадлежит другому элементу справочника номенклатура

noviptr
4 - 05.04.2009 - 12:55
Да там действительно нужно было поставить запись
Но проблема осталась

Re: Единица измерения принадлежит другому элементу справочника номенклатура

victuan
5 - 05.04.2009 - 14:21
(4) Проблема уйдет, если выполнить (3)

Интересные темы

odines.ru
29.03.2024 - 02:12
Смотри также:
права и время
Убрать все доки движение, или есть варианты ?
КАК в подборе товара сделать так, чтобы можно было выбирать цену?

Re: Единица измерения принадлежит другому элементу справочника номенклатура

noviptr
6 - 05.04.2009 - 15:18
Спасибо, Все получилось

Re: Единица измерения принадлежит другому элементу справочника номенклатура

Чучундер
7 - 05.04.2009 - 15:45
ну и заодно:
Если СпрОКЕИ.НайтиПоКоду(КодЕд, 0) = 1 Тогда;
КодОк = СпрОКЕИ.ТекущийЭлемент();
КонецЕсли;
.
если не отрабатывается ветка иначе - какой смысл в если?
К списку тем К списку форумов

Добавить новое сообщение

Ваше имя:
Тема сообщения:
Сообщение:
« Бухгалтер: При групповой печати ПКО (из обработки документов) устанавливается только альбомная ориентация Доступ к справочникам »
© 2009 Форум 1С: Одинэс.Ру