Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
23 ноя 2024, 00:44

создание номенклатуры

Автор надюшка, 07 апр 2011, 11:06

0 Пользователей и 1 гость просматривают эту тему.

надюшка

Функция СоздатьНоменклатуру(СтрокаК)     ///Работает!!!

ОбъектН = Справочники.Номенклатура.СоздатьЭлемент();
ОбъектН.Родитель = ОбработкаОбъект.НоменклатурнаяГруппа;
ОбъектН.НоменклатурнаяГруппа = Справочники.НоменклатурныеГруппы.НайтиПоНаименованию("Оптовая торговля");
***ОбъектН.БазоваяЕдиницаИзмерения = Справочники.КлассификаторЕдиницИзмерения.НайтиПоНаименованию(ЕдиницаИзмерения);
ОбъектН.СтавкаНДС = Перечисления.СтавкиНДС.НДС18;
ОбъектН.Наименование = СтрокаК.Номенклатура;
ОбъектН.НаименованиеПолное = СтрокаК.Номенклатура;
ОбъектН.Записать();

Возврат ОбъектН.Ссылка;

КонецФункции


Данные в функцию передаются так

Для каждого СтрокаК из ОбработкаОбъект.Релизация цикл
если  ЗначениеЗаполнено (Строкак.НоменклатураСправочника) тогда
иначе 
СсылкаН = СоздатьНоменклатуру(СтрокаК);
СтрокаК.Номенклатура = СсылкаН;
***СтрокаК.ЕдиницаИзмерения = СсылкаН;
конецЕсли;
КонецЦикла;
    Ном=0;


Строки выделенные *** скорее всего не верные. В строкеК содержаться данные Номенклатура, ЕдиницаИзмерения, Количество
как передать данные единицы измерения, чтобы правильно занести потом данные в справочник номенклатур

cska-fanat-kz

Ну а чем вам не нравится
ОбъектН.БазоваяЕдиницаИзмерения = Справочники.КлассификаторЕдиницИзмерения.НайтиПоНаименованию(СтрокаК.ЕдиницаИзмерения);
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск