v8: Заполнить справочник из xls файла #388759

Здравствуйте! Я учусь программировать в 8-ке, такой вопрос - нужно, что бы в данной процедуре отрабатывалась уникальность значений xls файла (по столбцу 1, к примеру), т.е. в справочник два раза не попадала одна и та жа позиция. КонецПроцедуры Или, если есть более грамотное решение по заполнению справочников, тоже интересно узнать профессиональное мнение, спасибо!!

загрузи все в ТЗ - сверни, а потом создавай.

"загрузи все в ТЗ - сверни, а потом создавай" Дико извиняюсь, но не понял чего сверни, чего создавай )). Задача заполнить справочник в 1с 8 из xls, в котором есть 3 поля. В 1-м номера (сервисов). Так вот, надо, чтобы в справочник попадали значения из 1-го столбца, и при повторной загрузке не попадали в справочник, т.к. уже есть в нем. Плюс данные во 2-м и 3-м столбцах должны должны соответствовать номерам 1-го столбца, т.о. заносится в справочник весь 1-й столбец, и, если есть, то соответствующие данные по 2-му и 3-му столбцу. Такую обработку видел на 7-ке, может получится по аналогии сделать,

Тебе нужно проверить, есть ли уже элемент с таким реквизитом -> ищи элемент по реквизиту и создавай новый только если не нашел.

НовыйЭлемент=Спр.СоздатьЭлемент; Пытаюсь такую вещь сделать, только ругается на параметр 3: {Справочник.СервисЦентры.Форма.ФормаСписка}: Ошибка при вызове метода контекста (Выбрать): Недопустимое значение параметра (параметр номер "3")        Если Спр.Выбрать(,,Новый Структура("НомерСЦ",ПроверяемоеЗначение)).Следующий Тогда Продолжить; Что-то упустил явно

Валялась дома обработка - могу поискать

КонецПроцедуры

Это чо касается использования таблицы значений, немного дольше правда будет, зато проблем меньше

Смотри в отладчике, чему равно ПроверяемоеЗначение. Видимо, в нем косяк. И еще: "В качестве полей для отбора могут задаваться только поля "Код", "Наименование" и реквизиты справочника, для которых в конфигураторе признак индексирования установлен в значение "Индексировать" или в значение "Индексировать с доп. упорядоч."

Стандартная обработка "Загрузить данные из табличного документа". В ЗУПе она точно есть, в других конфигурациях вроде тоже.

Вернее "Загрузка данных из табличного документа". У нее неплохое описалово. Данные можно загружать из экселя, текстового файла, плюс дбф. Есть также встроенные обработчики событий - в них можно вставлять свой код. Описалово у обработки довольно приличное.

Вроде как на ИТС лежит обработка "Заполнение документов и справочников из табличных частей"... простая и надежная до безобразия!

Сначала поставил признак индексации для поля НомерСЦ, и обработка заполнила значениями справочник. Зато когда проверил второй раз- цикл снял через диспетчер задач только)) Woldemar177, если не трудно, было бы супер! (bannndi@gmail.com) Буду пробовать другие предложенные решения пока что, спасибо всем!)) СноваЗдорова, сейчас поищу))

СноваЗдорова, глупый вопрос: ИТС, а сайт какой? google выдает мешанину, сейчас еще поищу))

Тебе осталось отладить - минуты три...)

Feday, да я это понимаю, но пока что в тупике, не знаю что вызывает повторный бесконечный цикл))

Потому что ты забыл перед "Продолжить" увеличить инкремент, по которому значение получаешь (i = i + 1)

Я может не туда вставляю i = i + 1, но выдает ошибку        ПроверяемоеЗначение=ConExcel.Sheets("Сервисы").Cells(i,1).Value;        Если Спр.Выбрать(,,Новый Структура("НомерСЦ",ПроверяемоеЗначение)).Следующий

Просто Лёха, пока ничего не получается(( По нажатию на кнопке видно что процесс прошел, но ничего не записалось в справочник, видно мне чего-то дописать нужно здесь?: Конеццикла Я пока совсем начинающий, мне помощь и здесь нужна)) Спасибо!

КонецПроцедуры

Ошибочка, щас напищу

Вот как-то так

Просто Лёха, спасибо большое, сейчас поиспытываю!))

Если НайдЭлемент=Неопределено Тогда //такого элемента еще нет ,т.е. все равно элементы справочника дублируются, а так все супер!

Может все же в справочнике искать дубли? А то каждый раз запуская, все добавляем и добавляем...

Почту посмари

Если уникальность проверять в пределах справочника, тогда вот так, а если в пределах загружаемых значений тогда

Просто вот это "отрабатывалась уникальность значений xls файла (по столбцу 1, к примеру), т.е. в справочник два раза не попадала одна и та жа позиция" - я понял как уникальность именно загружаемых значений

СноваЗдорова, спасибо большое, пока не разбирался, ошибку выдала! Просто Лёха, тоже спасибо, сейчас попроверяю у себя))

Опять будет бесконечный цикл.)

еще раз проверь =))

Ну да пропсутил, бывает

Просто Лёха, пишет Процедура или функция с указанным именем не определена (ЗначениеЗаполнено) Полностью вот текст:

Тогда вместо Если ЗначениеЗаполнено(НайдЭлемент) Тогда, Если НайдЭлемент <> Справочники.СервисЦентры.ПустаяСсылка

Если НайдЭлемент <> Справочники.СервисЦентры.ПустаяСсылка Тогда

Просто Лёха, сделал так:           НайдЭлемент=Справочники.СервисЦентры.НайтиПоНаименованию(СокрЛП(НаимСервис),ИСТИНА);            Сообщить ("Элемент справочника "+СокрЛП(НаимСервис)+" уже существует в базе!"); Справочник заполнился, только пошел бесконечный цикл сообщения что первая строка xls уже существует)) Ц У, еще не проверял, обязательно посмотрю твой вариант,спасибо!

В этой проверке перед продолжить  i = i + 1, я просто пропустил

Ц У, пока не понял как-куда вставить твой код ошибку выдает;) Пока код такой,слегка изменил: В принципе загрузка устраивает,спасибо всем!))