Загрузить надо номенклатуру с иерархией, есть файлы XLS со структурой причем по уровням, первый файл имеет колонку кода группы номенклатуры + название, второй файл имеет два кода, первый это код из первого файла (т.е. к которому он относиться), вторая колонка это собственный код и третья это название, так же четвертый есть файл со следующими подуровнями - это что касается иерархии номенклатуры.
Далее есть сама база товаров, которая так же в экселе и есть первые четыре колонки это коды, к которым относится данная номенклатура и + последняя это наименование номенклатуры,но надо что бы в ПОЛНОМ наименовании были название групп а только потом то что из экселе,а просто в наименовании это из экселя.
Как? Есть какие е нить наработки по импорту иерархии?
Тю, ну добавьте в таблицу єкселя колонку Группа.потом по ходу загрузки конкретной строки проверяйте значение этой колонки.
Дык у меня групп нет еще,база пустая, надо сначала загрузить как я понимаю группы все с кодами,А потом по коду импортить номенклатуру что бы она "распихивалась" согласно кода в свою папочку
Танцор с Бубном
Группа: Местный
Сообщений: 1121
Из: Днепра
Спасибо сказали: 232 раз
Рейтинг: 0
Цитата(bereznoy @ 04.09.11, 21:48)
Дык у меня групп нет еще,база пустая, надо сначала загрузить как я понимаю группы все с кодами,А потом по коду импортить номенклатуру что бы она "распихивалась" согласно кода в свою папочку
Так в чем проблема?Проверяйте по коду. Если код группы то, создаете новую группу.Далее записываете в нее элементы группы.
Можно проще... Сделать отдельный лист с каталогами и использовать примерно вот этот код
//Номер листа в книге Excel для получения данных НомерЛиста = 2;
//Пытаемся подключиться к Excel Попытка Excel = новый COMОбъект("Excel.Application"); Исключение Сообщить("Похоже, Excel на компьютере не установлен. Необходимо выполнить установку/переустановку Excel."); Возврат; КонецПопытки;
//Получим количество строк и колонок. //В разных версиях Excel получаются по-разному, поэтому сначала определим версию Excel Версия = Лев(Excel.Version,Найти(Excel.Version,".")-1); Если Версия = "8" тогда ФайлСтрок = Excel.Cells.CurrentRegion.Rows.Count; ФайлКолонок = Макс(Excel.Cells.CurrentRegion.Columns.Count, 13); Иначе ФайлСтрок = Excel.Cells(1,1).SpecialCells(11).Row; ФайлКолонок = Excel.Cells(1,1).SpecialCells(11).Column; Конецесли;
//Для установки цен необходимо создать документ "Установка цен номенклатуры" //Заполним шапку документа, в т.ч. заполним тип цены и валюту
//определим по файлу в каких колонках необходимые данные
// Выбираем данные из файла Для а = 1 по ФайлСтрок Цикл
//Полуим данные из соответсвующих ячеек НаименованиеТовара = СокрЛП(Excel.Cells(а,2).Value); Номенклатура = Справочники.Номенклатура.СоздатьГруппу(); Номенклатура.Наименование = НаименованиеТовара; Номенклатура.Записать();
Конеццикла;
//Если в документе есть товары записываем и проводим
//Закрываем Excel Excel.ActiveWorkbook.Close();
А потом в стандартной обработке использовать уже родителей.... стандартная обработка называется загрузка данных из табличных документов
Вы станете богаче, лишь став умнее... Чем дальше в лес, тем толще партизаны. Нельзя недооценивать, не предсказуемость тупизны...
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!