Загрузка справочников и документов из Excel и *.dbf

03.12.09

Интеграция - Файловый обмен (TXT, XML, DBF), FTP

Обработка, с помощью которой можно загрузить данные из Экселя в документ или справочник (далее просто «документ»). Пока можно создавать документы без табличной части (обещаю доделать табличную часть). При создании документа, если реквизит ссылается на справочник, в соответствующем справочнике, при отсутствии такого элемента, создаётся новый.
Пока не решил проблему с записью элементов справочника, имеющих владельца.

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
-
.epf 20,20Kb
222
222 Скачать (1 SM) Купить за 1 850 руб.

При переносе данных пришлось писать много обработок, потом просто стали дописывать предыдущую для следующего случая. В конечном  счете, стало жалко потраченных сил и немного подрезав функциональные свойства, хочу выложить этот загрузчик, тем более для 8.0 ничего похожего не нашёл.

При помощи этой обработки можно загрузить данные из Экселя в документ или справочник (далее просто «документ»). Пока можно создавать документы без табличной части (обещаю доделать табличную часть). При создании документа, если реквизит ссылается на справочник, в соответствующем справочнике, при отсутствии такого элемента, создаётся новый.
Пока не решил проблему с записью элементов справочника, имеющих владельца.

Вообще много писать нечего, если будут вылетать ошибки – не ругайте, пишите, исправлю. Просто в процессе «подрезания» - с целью унификации, могло что-то нарушиться.

См. также

SALE! 15%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Россия Платные (руб)

Правила в универсальном формате обмена для ERP 2.5, КА 2.5, УТ 11.5, БП 3.0, Розница, УНФ, для последних версий конфигураций. Ссылки на другие конфигурации в описании публикации. Правила совместимы со всеми другими версиями конфигураций новыми и старыми, поддерживающими обмен и синхронизацию в формате EnterpriseData. Не требуется синхронного обновления правил после обновления другой конфигурации, участвующей в обмене. Типовой обмен через планы обмена кнопкой Синхронизация вручную или автоматически по расписанию, или вручную обработкой.

27660 руб.

12.06.2017    144031    833    297    

432

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 Оперативный учет 1С:Управление торговлей 10 Россия Управленческий учет Платные (руб)

Перенос данных из 1С:Управление торговлей 10.3 в 1С:Управление торговлей 11.5 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УТ 10.3 (10.3.88.x) и УТ 11.5 (11.5.20.x), также подходят для релиза 11.5 (11.5.19.x).

35000 31500 руб.

23.07.2020    54293    239    73    

194

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Программист Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Платные (руб)

Перенос данных из ERP в БП 3 | из КА 2 в БП 3 | из УТ 11 в БП 3 | из ЕРП в БП 3 | Сэкономьте время - используйте готовое решение для перехода! | Перенос разработан в формате КД 2 (правила конвертации данных) | Переносятся все возможные виды документов, начальных остатков и нормативно-справочная информация| Можно опционально выгружать каждую пару "номенклатура+характеристика" как отдельную номенклатуру | Есть выгрузка настроек счетов учета и зарплатных данных из ERP / КА 2 | Можно проверить на вашем сервере перед покупкой

55778 50200 руб.

15.04.2019    73215    193    152    

129

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Программист Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет Управленческий учет Платные (руб)

Перенос данных из ERP в ЗУП 3 | из КА 2 в ЗУП | Готовые правила конвертации данных (КД 2) для переноса остатков, документов с движениями и справочной информации 3 | Есть перенос начальной задолженности по зарплате и начальной штатной расстановки на выбранную дату | Обороты за прошлые годы (данные для расчета среднего) переносятся свернуто в документ "Перенос данных" | Есть фильтр по организациям | Документы за текущий период переносятся сразу с движениями, поэтому не потребуется делать перерасчеты | Перенос можно проверить перед покупкой, обращайтесь!

53111 47800 руб.

03.12.2020    37641    102    68    

97

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Управленческий учет Платные (руб)

Перенос данных из 1С:Управление производственным предприятием 1.3 в 1С:Бухгалтерия предприятия 3.0 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УПП 1.3 (1.3.240.x) и БП 3.0 (3.0.169.x). Правила подходят для версии ПРОФ и КОРП.

35000 31500 руб.

15.12.2021    25223    176    51    

134

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Комплексная автоматизация 1.х 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

Перенос данных из 1С:Управление производственным предприятием 1.3 в 1С:Бухгалтерия предприятия 3.0 с помощью правил обмена | Можно выполнить переход с УПП на БП 3 или запускать выгрузку данных за выбранный период времени | Переносятся документы, начальные остатки и вся справочная информация | Есть фильтр по организации и множество других параметров выгрузки | Поддерживается несколько сценариев работы: как первичный полный перенос, так и перенос только новых документов | Перенос данных возможен в "1С: Бухгалтерия 3.0" версии ПРОФ, КОРП или базовую | Переход с "1С: УПП1.3" / "1С:КА 1.1" на "1С:БП3.0" с помощью правил конвертации будет максимально комфортным! | Можно бесплатно проверить перенос на вашем сервере!

48278 43450 руб.

25.02.2015    172420    309    259    

385

SALE! 10%

Перенос данных 1C Взаиморасчеты Оптовая торговля Логистика, склад и ТМЦ Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Управление торговлей 10 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Управленческий учет Платные (руб)

Можно проверить до покупки, оставьте заявку! Воспользовались более 268 компаний! Перенос данных из УТ 10.3 в УТ 11 | из УТ 10.3 в КА 2 | из УТ 10.3 в ERP. Предлагаем качественное и проверенное временем решение для перехода с УТ 10.3. Можно перенести начальные остатки, нормативно-справочную информацию и все возможные документы. При выгрузке можно установить отбор по периоду, организациям и складам. При выходе новых релизов конфигураций 1C оперативно выпускаем обновление переноса данных.

55778 50200 руб.

24.04.2015    196338    156    244    

285

Загрузка и выгрузка в Excel Маркетплейсы Программист Бухгалтер Пользователь Платформа 1С v8.3 Бухгалтерский учет 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Бухгалтерский учет Управленческий учет Платные (руб)

Реальный помощник, с помощью которого Вы преобразуете необходимые документы для Wildberries, OZON, ЯндексМаркет, Мегамаркет, Aliexpress, Детский мир, МагнитЭкспресс (быв.Казань-Экспресс), Леруа Мерлен, ЭНФАНТА (Акушерство), ЛаМода, Летуаль, Твой дом, Золотое Яблоко в документы "Отчет комиссионера (агента) о продажах" и другие. Работает в 1С:БП 3.0, 1С:БП 3.0 КОРП, 1С:УТ 11, 1С:УНФ, 1С:КА 2, 1С:ERP Управление предприятием. Возможность подключить любые маркетплейсы. Анализ продаж ОZON. 30 дней БЕСПЛАТНОГО пользования!

5400 руб.

12.08.2021    36982    392    68    

167
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. пользователь 02.12.09 20:30
Сообщение было скрыто модератором.
...
3. annak2980 03.12.09 12:31 Сейчас в теме
А обработка выглядела наверно так:
Функция ИмпортEXL(Параметры)
Эксель = новый COMОбъект("Excel.Application");
Попытка
Эксель.DisplayAlerts = 0;
ИмяФайла = Параметры.ИмяФайла;
Файл = Эксель.Workbooks.Open(ИмяФайла);
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;

тзВыписка = Новый ТаблицаЗначений;
тзВыписка.Колонки.Добавить("НомерПП");
тзВыписка.Колонки.Добавить("Приход");
тзВыписка.Колонки.Добавить("Расход");
тзВыписка.Колонки.Добавить("ОКПО");
тзВыписка.Колонки.Добавить("Контрагент");
тзВыписка.Колонки.Добавить("МФО");
тзВыписка.Колонки.Добавить("РСчет");
тзВыписка.Колонки.Добавить("Содержание");

ВыбранныйЛист = Эксель.Sheets(1);
//можно еще и цикл по перебору листов организовать
//Или , например пеосмотрим, сколько колонок
ВсегоКолонок = ВыбранныйЛист.Cells(1,1).SpecialCells(11).Column;
ВсегоСтрок = ВыбранныйЛист.Cells(1,1).SpecialCells(11).Row;

для Строка = 1 по ВсегоСтрок цикл

//далее построчно разбираем клеточки
ТекДата = СокрЛП(ВыбранныйЛист.Cells(Строка,8).Value);
ТекДата = Лев(ТекДата,10);
Если ТекДата <> Формат(Параметры.ДатаДок,"ДФ=dd.MM.yyyy") Тогда
Продолжить;
КонецЕсли;

РС1 = СокрЛП(ВыбранныйЛист.Cells(Строка,21).Value);
//наш счет
РС2 = СокрЛП(ВыбранныйЛист.Cells(Строка,17).Value);
//счет корреспондента
ДК = СокрЛП(ВыбранныйЛист.Cells(Строка,3).Value);
//движение по дебету или кредиту

Если РС1 = Параметры.РСчет Тогда

Если ДК = "К" Тогда // списание со счета

НовСтрока = тзВыписка.Добавить();
НовСтрока.МФО = СокрЛП(ВыбранныйЛист.Cells(Строка,18).Value);
НовСтрока.РСчет= РС2;

сСумма = СокрЛП(ВыбранныйЛист.Cells(Строка,7).Value);
НовСтрока.Расход= сСумма;
НовСтрока.Приход= 0;
НовСтрока.Контрагент = СокрЛП(ВыбранныйЛист.Cells(Строка,16).Value);
НовСтрока.ОКПО= СокрЛП(ВыбранныйЛист.Cells(Строка,19).Value);

ИначеЕсли ДК = "Д" Тогда
// поступление на наш р/с

НовСтрока = тзВыписка.Добавить();
НовСтрока.МФО = СокрЛП(ВыбранныйЛист.Cells(Строка,18).Value);
НовСтрока.РСчет = РС2;

сСумма = СокрЛП(ВыбранныйЛист.Cells(Строка,7).Value);
сСумма = СтрЗаменить(сСумма," ","");

НовСтрока.Расход = 0;
НовСтрока.Приход = сСумма;
НовСтрока.Контрагент = СокрЛП(ВыбранныйЛист.Cells(Строка,16).Value);
НовСтрока.ОКПО= СокрЛП(ВыбранныйЛист.Cells(Строка,19).Value);

КонецЕсли;

Иначе
Продолжить;
КонецЕсли;

НовСтрока.Содержание = СокрЛП(ВыбранныйЛист.Cells(Строка,12).Value);

КонецЦикла;
Попытка
Эксель.Application.Quit();
Исключение
КонецПопытки
Возврат тзВыписка;
КонецФункции

Такое каждый малосведующий в 8-ке накропает быстро в каждом конкретном случае - перенос данных из Foxpro, загрузка из банковской выписки, перенос табелей в ЗУП и прочее.
Ничего нового.

P.S. Текст моего примера ламерский, но какая статья такие и комментарии.
2. sytkosa 119 03.12.09 10:10 Сейчас в теме
4. Boroda 90 03.12.09 14:08 Сейчас в теме
Что-то последнее время тут пиарщиков развелось много...: рекламу сделают, распишут..., а на выходе "ноль". Только текст голый...
5. WWW123 82 03.12.09 18:19 Сейчас в теме
annak2980 - совпадения конечно есть:
- Эксель = новый COMОбъект("Excel.Application");
- КонецЕсли;
-Попытка
Вот пожалуй и всё...

Eugeneer 02.12.2009 20:30:42
Вообще есть типовая обработка на ИТС
http://infostart.ru/public/19504/
Вообшето сказано по русски ДЛЯ 8.0



6. WWW123 82 03.12.09 18:21 Сейчас в теме
И только 8SiriuS8 заметил, что файл не прилепился, остальные просто хотели быть услышанными
7. dreamland 2 03.10.11 21:04 Сейчас в теме
Данная обработка на каких конфигурациях тестировалась? Мне надо конкретно для Бухгалтерии предприятия 2.0 и для Управления производственным предприятием 1.3
Оставьте свое сообщение