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

03.12.09

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

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

Скачать файлы

Наименование Файл Версия Размер
-
.epf 20,20Kb
222
.epf 20,20Kb 222 Скачать

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

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

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

См. также

SALE! 15%

[ED3] Обмен для ERP 2.5, КА 2.5, УТ 11.5 БП 3.0, Розница, УНФ и других с EnterpriseData (универсальный формат обмена), правила обмена

Обмен между базами 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. Не требуется синхронного обновления правил после обновления другой конфигурации, участвующей в обмене. Типовой обмен через планы обмена кнопкой Синхронизация вручную или автоматически по расписанию, или вручную обработкой.

25080 22572 руб.

12.06.2017    134954    721    291    

388

SALE! 20%

Перенос данных из ERP 2 / КА 2 / УТ 11 в БП 3.0. Переносятся документы, начальные остатки и справочники

Обмен между базами 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 | В продаже с 2019г. | Воспользовались более 176 предприятий! | Сэкономьте время - используйте готовое решение для перехода! | Перенос разработан в формате КД 2 (правила конвертации данных) | Переносятся все возможные виды документов, начальных остатков и нормативно-справочная информация| Можно опционально выгружать каждую пару "номенклатура+характеристика" как отдельную номенклатуру | Есть выгрузка настроек счетов учета и зарплатных данных из ERP / КА 2 | Можно проверить на вашем сервере перед покупкой, обращайтесь!

34650 27720 руб.

15.04.2019    68426    179    138    

111

SALE! 20%

Перенос данных из ERP 2 / КА 2 в ЗУП 3. Переносятся остатки, документы и справочники

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

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

43450 34760 руб.

03.12.2020    34173    80    58    

78

SALE! 10%

Перенос данных из УТ 10.3 в УТ 11.5. Переносятся документы (обороты за период), справочная информация и остатки

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

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

28000 25200 руб.

23.07.2020    46303    196    64    

158

Перенос данных из Парус 10 в ЗГУ ред.3

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

Обработка позволяет перенести кадровую информацию и данные по заработной плате, фактических удержаниях, НДФЛ, вычетах, страховых взносах из базы Парус 10 учреждений в конфигурацию 1С:Зарплата и кадры государственного учреждения ред. 3 (ЗГУ) и начать с ней работать с любого месяца года.

60000 руб.

05.10.2022    9214    9    8    

10

SALE! 10%

Загрузка номенклатуры из Excel в УТ11, КА 2, ERP 2, Розница 2. Дополнительные реквизиты и сведения, характеристики, картинки, цены, остатки

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

Загрузка из файлов xls, xlsx, ods, csv, mxl в УТ11, КА 2, ERP 2, Розница 2. Задействованы все возможности конфигурации - заполнение реквизитов номенклатуры, дополнительных реквизитов и сведений, характеристики, доп.реквизиты и сведения характеристик. Дополнительные обработки для расширения возможностей.

10560 9504 руб.

29.10.2014    210191    620    524    

439

SALE! 10%

Перенос данных из УПП 1.3 в БП 3.0. Переносятся документы (обороты за период), справочная информация и остатки

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

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

28000 25200 руб.

15.12.2021    20257    132    38    

90

SALE! 10%

Перенос данных из БП 3.0 в УНФ 3.0 / УНФ 1.6. Переносятся остатки, документы и справочная информация

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

В продаже с 2018г. | Воспользовались более 41 предприятия! | Правила конвертации (КД 2) для переноса данных из БП 3 в УНФ | Переносятся все виды документов, начальные остатки и вся возможная справочная информация | Есть фильтр по организациям | Оперативно обновляем на новые релизы | Оказываем техподдержку | В комплект файлов входит инструкция, авторская версия обработки "Универсальный обмен...", актуальные правила переноса данных и архив старых версий переноса | Учет в БП 3 должен быть корректным, некорректные данные не переносятся | Можно бесплатно проверить на вашем сервере до покупки!

50722 45650 руб.

10.07.2018    67449    41    122    

46
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
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
Оставьте свое сообщение