Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Очень нужна помощь в импорте из XLS
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.2 > Программирование обычных форм 1С 8.2 и не интерфейсной логики
bereznoy
Задача следующая. 1С 8.2 УТП

Загрузить надо номенклатуру с иерархией, есть файлы XLS со структурой причем по уровням, первый файл имеет колонку кода группы номенклатуры + название, второй файл имеет два кода, первый это код из первого файла (т.е. к которому он относиться), вторая колонка это собственный код и третья это название, так же четвертый есть файл со следующими подуровнями - это что касается иерархии номенклатуры.

Далее есть сама база товаров, которая так же в экселе и есть первые четыре колонки это коды, к которым относится данная номенклатура и + последняя это наименование номенклатуры,но надо что бы в ПОЛНОМ наименовании были название групп а только потом то что из экселе,а просто в наименовании это из экселя.


Как? Есть какие е нить наработки по импорту иерархии?
Fynjy
1000 грн и наработка ваша.
Vofka
999
Ardi
1001
bereznoy
За дэнги сделать не проблема, мне как бы помощь нужна, я не прошу тупо сделать,я прошу подобную обработку подкинуть,а там сам уже
Flexy
Цитата(bereznoy @ 04.09.11, 20:58) необходимо зарегистрироваться для просмотра ссылки
За дэнги сделать не проблема, мне как бы помощь нужна, я не прошу тупо сделать,я прошу подобную обработку подкинуть,а там сам уже

Поиск юзали?Хотя бы в рамках этого форума smile.gif
На Инфостарте этих обработок немерянно 32542270.gif
bereznoy
Цитата(Flexy @ 04.09.11, 22:04) необходимо зарегистрироваться для просмотра ссылки
Поиск юзали?Хотя бы в рамках этого форума smile.gif
На Инфостарте этих обработок немерянно 32542270.gif

Юзал, стандартная обрабока тянет как меня устраивает впринцыпе,но надо иерархию номенклатуры, т.к. там 500 папок
Ardi
Цитата(bereznoy @ 04.09.11, 21:58) необходимо зарегистрироваться для просмотра ссылки
За дэнги сделать не проблема, мне как бы помощь нужна, я не прошу тупо сделать,я прошу подобную обработку подкинуть,а там сам уже

Конечно делать это тупо.
И вообще работать это тупо.
bereznoy
x

1-е предупреждение!
Flexy
Тю, ну добавьте в таблицу єкселя колонку Группа.потом по ходу загрузки конкретной строки проверяйте значение этой колонки.
bereznoy
Цитата(Flexy @ 04.09.11, 22:42) необходимо зарегистрироваться для просмотра ссылки
Тю, ну добавьте в таблицу єкселя колонку Группа.потом по ходу загрузки конкретной строки проверяйте значение этой колонки.

Дык у меня групп нет еще,база пустая, надо сначала загрузить как я понимаю группы все с кодами,А потом по коду импортить номенклатуру что бы она "распихивалась" согласно кода в свою папочку
Flexy
Цитата(bereznoy @ 04.09.11, 21:48) необходимо зарегистрироваться для просмотра ссылки
Дык у меня групп нет еще,база пустая, надо сначала загрузить как я понимаю группы все с кодами,А потом по коду импортить номенклатуру что бы она "распихивалась" согласно кода в свою папочку

Так в чем проблема?Проверяйте по коду.
Если код группы то, создаете новую группу.Далее записываете в нее элементы группы.
bereznoy
Цитата(Flexy @ 04.09.11, 22:51) необходимо зарегистрироваться для просмотра ссылки
Так в чем проблема?Проверяйте по коду.
Если код группы то, создаете новую группу.Далее записываете в нее элементы группы.

У меня 500 групп, устану создавать группы и потом подвязывать к каждой номенклатуру
Fynjy
Как импортировать иерархию - бесплатный совет: рекурсия ...
Batchir
Цитата
я прошу подобную обработку подкинуть,а там сам уже

Думаю это как раз то что Вы ищете
Цитата
стандартная обрабока тянет как меня устраивает впринцыпе,но надо иерархию номенклатуры, т.к. там 500 папок

ИМХО, "стандартную" обработку нужно немного подправить что бы она различала группу и элемент. Это как раз, как Вы выразились, для "а там сам уже".
Kutuzov
Можно проще... Сделать отдельный лист с каталогами и использовать примерно вот этот код
   //Номер листа в книге Excel для получения данных
    НомерЛиста         = 2;
  
    //Пытаемся подключиться к Excel
    Попытка
        Excel = новый COMОбъект("Excel.Application");
    Исключение
        Сообщить("Похоже, Excel на компьютере не установлен. Необходимо выполнить установку/переустановку Excel.");
        Возврат;
    КонецПопытки;    
  
    //Подключились удачно, открываем файл
    Excel.Workbooks.Open("F:\группы.xls");
  
    //Открываем необходимый лист
    Excel.Sheets(НомерЛиста).select();  
  
    //Получим количество строк и колонок.
    //В разных версиях 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();

А потом в стандартной обработке использовать уже родителей....
стандартная обработка называется загрузка данных из табличных документов
MATEVI
необходимо зарегистрироваться для просмотра ссылки
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.