Реклама на этом месте
Форум 1С
Форум 1С
Программистам. Бухгалтерам. Администраторам. Пользователям
Задай вопрос - получи решение проблемы. Без троллинга и флуда.
20 Ноя 2018, 22:38
МультиВход
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?
 
collapse

Автор Тема: Программное создание элемента справочника на основе данных ТабДок  (Прочитано 57 раз)

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

Оффлайн helgе

  • *
  • Сообщений: 13
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2018-08-05
  • Сайт: 
  • Профессия: Ученик 1С
Ситуация такая: есть внешняя обработка есть файл *.xls, он загружается в ТабДок в этом документе к примеру есть поля: "Код", "Наименование", "Артикул" и там есть значения ну  типа: "00000025", "Кирпич", "НБ-789000". Так вот, задание такое, надо чтобы новый элемент справочника создавался программно, но для этих полей (Код,Артикул,Наименование) данные брались из ТабличногоДокумента.
Конфигурация УТ10.3.
Я сделал так:
Процедура ЗагрузитьНажатие(Элемент)
ТабДок = Новый ТабличныйДокумент;
ТабДок.Прочитать( ВыбратьФайл);
ТабДок.Показать("Мой файл");

РазмерТаблицы=ТабДок.ВысотаТаблицы;

Для строка=2 ПО РазмерТаблицы Цикл
НовыйСправочник=Справочники.Номенклатура.СоздатьЭлемент();
НовыйСправочник.Код=ТабДок.ПолучитьОбласть(Строка,1,Строка,1);
НовыйСправочник.Артикул=ТабДок.ПолучитьОбласть(Строка,2,Строка,2);
НовыйСправочник.Наименование=ТабДок.ПолучитьОбласть(Строка,3,Строка,3);
НовыйСправочник.БазоваяЕдиницаИзмерения = Справочники.КлассификаторЕдиницИзмерения.НайтиПоНаименованию("шт");
НовыйСправочник.ЕдиницаХраненияОстатков = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию("шт");
НовыйСправочник.ВидНоменклатуры = Справочники.ВидыНоменклатуры.НайтиПоНаименованию("Товар");
НовыйСправочник.Записать();
    КонецЦикла;
КонецПроцедуры
ТабДок показывает, но элемент справочника не создаёт.:dfbbdrfb:
Выдаёт ошибку: ""Ошибка при вызове метода контекста (Записать)  НовыйСправочник.Записать();""

Последний раз редактировалось: helgе; 08 Ноя 2018, 12:17


Оффлайн oleg-x

  • *****
  • Сообщений: 932
  • РЕПУТАЦИЯ: 216
  • КПД: 23%
  • Регистрация: 2016-11-02
  • Сайт: vk.com
  • Профессия: Программист 1С
Так посмотрите перед тем как записать, какие значения принимают реквизиты справочника.

   
НовыйСправочник.Код=ТабДок.ПолучитьОбласть(Строка,1,Строка,1); //Зачем присваивать код, он формируется автоматически, если хотите свой, то проверяйте уникальность кода перед присваиванием.
НовыйСправочник.БазоваяЕдиницаИзмерения = Справочники.КлассификаторЕдиницИзмерения.НайтиПоНаименованию("шт");//Здесь все ок, а вот дальше косяк.
НовыйСправочник.ЕдиницаХраненияОстатков = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию("шт");  // в УТ 10.3 это подчиненный справочник, у нового элемента его предварительно надо создать, если и найдется, то владелец будет другая номенклатура.
//Должно быть так
НовыйСправочник.ЕдиницаХраненияОстатков = фСоздатьЕденицуХраненияОстатков();
Помог, нажми спасибо. Не помог, нажми спасибо :-)
Если у Вас есть проблема, то её уже кто то решил @Yandex, @Google


 

Перенос данных из 1с 82 БП (базовая) в 1с 82 БГУ (базовая)

Автор Владимир87Раздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 4
Просмотров: 8461
Последний ответ 06 Дек 2014, 17:40
от дфтын
Поиск по бае данных,(полнотекстовый поиск)

Автор kot_ooРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 0
Просмотров: 4327
Последний ответ 19 Май 2014, 15:40
от kot_oo
Как исправить при обновлении ИБ: Ошибка в запросе набора данных по причине: {(58, 2)}: Несовместимые типы "ВЫБОР" <<?>>ВЫБОР

Автор dollРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 4
Просмотров: 3043
Последний ответ 26 Апр 2018, 06:45
от Геннадий ОбьГЭС
"Задваивание" данных в отчете

Автор mashencev_antonРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 13
Просмотров: 9118
Последний ответ 15 Окт 2015, 11:21
от Mari_beginner
Как вызвать "Анализ субконто" из справочника "Контрагенты"

Автор EnigManРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 1
Просмотров: 7115
Последний ответ 06 Фев 2012, 10:46
от cska-fanat-kz

* Живое общение

Не устроил ответ?

Зарегистрируйся и задай свой вопрос. Живое общение приносит результат намного быстрее.


Зарегистрироваться

* Реклама

* Поиск

* Последние задачи на разработку (фриланс)

* Реклама

* Последние вакансии

* Топ 10 авторов за месяц

oleg-x
73 Сообщений
AIFrame AIFrame
63 Сообщений
wise wise
50 Сообщений
alex0402
45 Сообщений
alexandr_ll
45 Сообщений
Геннадий ОбьГЭС Геннадий ОбьГЭС
38 Сообщений
BuhRust
28 Сообщений
andron81_81
24 Сообщений
byte777
21 Сообщений
LexaK
21 Сообщений

* Кто онлайн

  • Точка Гостей: 270
  • Точка Скрытых: 0
  • Точка Пользователей: 1
  • Точка Сейчас на форуме:

* Облако тэгов

* Форум 1С с мобильного

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

* Дополнительно

Поиск

 
SimplePortal 2.3.5 © 2008-2012, SimplePortal