1С Конвертация, использование внешнего источника данных

26.09.12

Интеграция - Внешние источники данных

Загрузка информации в базу данных платформы 1С 8.2 из внешних источников с помощью "Конвертации данных"

1С Конвертация, использование внешнего источника данных.

В процессе работы возникла потребность перенести информационную базу из древней программы, написанной еще на foxpro, на платформу 1С 8.2

Решил воспользоваться конфигурацией «Конвертация данных» и возможностью подключения к внешнему источнику данных платформы 1С 8.2.

Сначала надо было получить доступ к информационной базе, состоящей из  DBF-таблиц. Для этого я воспользовался возможностью подключения к внешним источникам данных платформы 1С 8.2.

 

Создал новый источник данных, обозвал его подходящим именем.  На вкладке «Данные» нажал кнопку «Добавить». В открывшемся конструкторе выбрал вариант «Выбрать из списка таблиц внешнего источника данных».

 

Открывшаяся форма потребовала ввести строку соединения с источником данных. Для меня строки соединения как шаманские заклинания. Погуглив маленько, я нарыл несколько вариантов строк соединения. Мне подошла строка:

Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;Dbq=c:\mydbpath;

Заменив в ней «Dbq=c:\mydbpath» на путь к моей локальной базе и нажав ОК, получил список таблиц:

 

Выбрал таблицу, к которой нужно подключиться и нажал ОК.

В результате во внешнем источнике данных сформировалась таблица KVART.

 

Для проверки возможности выборки информации из этой таблицы написал обработку Test01.

Модуль формы обработки:

&НаКлиенте
Процедура Загрузить(Команда)
    ЗагрузитьНаСервере();
КонецПроцедуры

&НаСервере
Процедура ЗагрузитьНаСервере()
    ПараметрыСоединения = Новый ПараметрыСоединенияВнешнегоИсточникаДанных;
    ПараметрыСоединения.СтрокаСоединения="Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;Dbq=d:\79;";
    ВнешниеИсточникиДанных.KV.УстановитьОбщиеПараметрыСоединения(ПараметрыСоединения);
    ВнешниеИсточникиДанных.KV.УстановитьСоединение();
    Запрос = Новый Запрос;
    Запрос.Текст = "ВЫБРАТЬ
                   |    KVART.KOD,
                   |    KVART.FIO,
                   |    KVART.SEMJA,
                   |    KVART.POLPLO,
                   |    KVART.LLIFT,
                   |    KVART.LZNAL
                   |ИЗ
                   |    ВнешнийИсточникДанных.KV.Таблица.KVART КАК KVART";
    тз = Запрос.Выполнить().Выгрузить();
КонецПроцедуры

С помощью отладчика можно просмотреть содержимое таблицы значений:

 

 

 

Все ОК. Информация присутствует.

На втором этапе необходимо загрузить информацию из внешней таблицы в соответствующий объект конфигурации.

Для этого использую конфигурацию «Конвертация данных».

В качестве источника и приемника данных будет использоваться одна конфигурация.  

Для начала создадим справочник, в который будем загружать информацию. Назовем его «ЛицевыеСчета».

 

С помощью соответствующей обработки конфигурации «Конвертация данных» выгрузим структуру метаданных нашей конфигурации. Зарегистрируем нашу конфигурацию в списке конфигураций. Далее необходимо настроить правила обмена.  Для реализации механизма выгрузки информации из внешнего источника создадим «правило выгрузки данных».

 

В событии «Перед обработкой»  разместим запрос к внешнему источнику данных и обработаем результат.

Текст обработчика:

 ПараметрыСоединения = Новый ПараметрыСоединенияВнешнегоИсточникаДанных;
 ПараметрыСоединения.СтрокаСоединения="Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;Dbq=d:\79;";
 ВнешниеИсточникиДанных.KV.УстановитьОбщиеПараметрыСоединения(ПараметрыСоединения);
 ВнешниеИсточникиДанных.KV.УстановитьСоединение();
 Запрос = Новый Запрос;
 Запрос.Текст = "ВЫБРАТЬ
                |    KVART.KOD КАК КОД,
                |    KVART.FIO КАК ФИО,
                |    KVART.SEMJA КАК СЕМЬЯ,
                |    KVART.POLPLO КАК ПЛОЩАДЬОБЩАЯ
                |ИЗ
                |    ВнешнийИсточникДанных.KV.Таблица.KVART КАК KVART";
 Результат = Запрос.Выполнить();
 Строки = Результат.Выгрузить();
 Для Каждого строка из Строки Цикл
     ИсходящиеДанные = Новый Структура("КОД,ФИО,СЕМЬЯ,ПЛОЩАДЬОБЩАЯ");
     ИсходящиеДанные.КОД = Строка.КОД;
     ИсходящиеДанные.ФИО = Строка.ФИО;
     ИсходящиеДанные.СЕМЬЯ = Строка.СЕМЬЯ;
     ИсходящиеДанные.ПЛОЩАДЬОБЩАЯ = Строка.ПЛОЩАДЬОБЩАЯ;
     ВыгрузитьПоПравилу(,,ИсходящиеДанные,,"ЛицевыеСчета");
 КонецЦикла;

Создадим «Правило конвертации объектов» для справочника «Лицевые счета». 

 

 Реквизит «Источник» не заполняем. Правила конвертации свойств будут выглядеть следующим образом:

 

 Сохраняем правила и выгружаем информацию. В результате формируется файл Данные.XML с таким содержимым:

 

 С помощью обработки загрузки данных загружаем информацию в приемник:

 

 

Задача выполнена.

См. также

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

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

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

84000 руб.

19.08.2020    22445    19    1    

22

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

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

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

60000 руб.

05.10.2022    9205    9    8    

10

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

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

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

24000 руб.

24.04.2017    48694    97    163    

86

Перенос начальных остатков из Парус 7.71 в БГУ

Внешние источники данных Взаиморасчеты Учет ОС и НМА Логистика, склад и ТМЦ Бюджетный учет Платформа 1С v8.3 Бухгалтерский учет 1С:Бухгалтерия 2.0 1С:Бухгалтерия государственного учреждения Государственные, бюджетные структуры Россия Бюджетный учет Платные (руб)

Перенос словарей и начальных остатков из ПП Парус-Бухгалтерия Бюджет 7.71 в 1Сv8 БГУ2. Заполнение словарей и документов по вводу начальных остатков. Не требуется установка ПП Парус7. Возможна дозагрузка. Позволит автоматически и наиболее полно ввести данные в программу для начала работы. 

15600 руб.

08.12.2011    81556    128    123    

147

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

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

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

24000 руб.

16.11.2018    29996    20    31    

21

Загрузка спецификаций в УНФ из системы Базис-мебельщик

Производство готовой продукции (работ, услуг) Внешние источники данных Платформа 1С v8.3 1С:Управление нашей фирмой 1.6 Лесное и деревообрабатывающее хозяйство Россия Управленческий учет Платные (руб)

Обработка предназначена для загрузки файлов, выгруженных из системы Базис-мебельщик, в справочник "Спецификации" для последующих процессов учета и диспетчирования полуфабрикатов и изделий.

7200 руб.

24.06.2021    19126    52    50    

29
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. yandextesting 148 26.09.12 14:47 Сейчас в теме
Чего-то я не понял: на кой в данном случае вообще используется конвертация данных, если мы все равно все в коде ручками прописываем? Куда интересней и универсальней, на мой взляд, реализация отсюда - "Загрузка информации из внешних данных с помощью конфигурации "Конвертация данных" "
daho; maXon777; +2 Ответить
3. comol 5051 02.10.12 08:58 Сейчас в теме
(1) там модификация КД, которая уже не актуальна ввиду развития самой КД. Здесь просто описание решения конкретной задачи штатными средствами.
2. comol 5051 02.10.12 08:57 Сейчас в теме
Хорошая идея. Вроде и просто а не всегда в голову придёт.
4. vahate 04.10.12 12:26 Сейчас в теме
очень интересует обработка для перехода (переноса) с Розница 1.0 для Украины (от российской почти ничем не отдичается) на Розница 2.0 для России.
5. klel 11.10.12 07:36 Сейчас в теме
хорошая статейка в особенности внешние источники данных
6. higs 11.10.12 10:23 Сейчас в теме
Довольно своеобразный подход к Конвертации данных, однако, имеет право на жизнь. Спасибо за альтернативную точку зрения!
7. Трактор 1246 11.10.12 10:23 Сейчас в теме
Это статья конкурса http://mg.spec8.ru/2012/10/06/competition-july2012/ На мой взгляд самая толковая статья из всех статей конкурса. Плюс от меня достался только двум статьям. Этой и про УРИБ
8. zipik 11.10.12 12:42 Сейчас в теме
9. pt_olga 61 11.10.12 17:27 Сейчас в теме
я бы конечно таким путем не пошла, т.к. к DBF таблицам можно обращаться и напрямую без бубна конвертации, автор использует достаточно креативный подход, за что ему плюс :)
PLAstic; mihan; +2 Ответить
10. Gawws 11.10.12 20:23 Сейчас в теме
Плюс здесь в том, что создаются с помощью КД правила конвертации данных. А для переноса используется универсальная загрузка данных из xml. Хорошая статья.
11. Kamikadze 46 11.10.12 21:48 Сейчас в теме
Плюс за идею однознчно
12. and_r 12.10.12 05:38 Сейчас в теме
Спасибо за статью, вроде все не сложно, но когда впервые сталкиваешься, убивается много времени, благодаря автору шишек набъется меньше :-)
13. EvgeniuXP 12.10.12 20:17 Сейчас в теме
Если честно, ничего не понял, где связь между внешними источниками и конвертацией даннных.... такое ощущение, что автор показал как подключаться через внешние источники и отдельно как перенести данные.... только откуда из дбф напрямую?... но в качестве источника ничего не указано...
14. EvgeniuXP 12.10.12 20:19 Сейчас в теме
всё, отбой, не доглядел :-\
15. Йожкин Кот 1006 17.10.12 17:16 Сейчас в теме
Я в своей разработке использую прослойку с виде подключаемой обработки, в которой реализованы методы подключения к внешним источникам и получения данных этих источников в виде ТЗ. Пользуюсь еще со времен 8.1, где объекта "Внешние источники данных" нет. Идею подсмотрел где-то на партнерском форуме.
Событие перед обработкой получается примерно похожее:
ОбработкаРаботаСВнешнимиДанными = ДопОбработки.РаботаСВнешнимиДанными;

ОбработкаРаботаСВнешнимиДанными.ТекстЗапроса =
"
|SELECT
|posts.code,
|posts.name
|
|FROM [posts] as posts
|";

Если ОбработкаРаботаСВнешнимиДанными.ВыполнитьЗапрос() Тогда

ВходящиеДанные = Новый Структура;

Таблица = ОбработкаРаботаСВнешнимиДанными.Таблица.Скопировать();

Для каждого СтрокаТаблицы Из Таблица Цикл

ВходящиеДанные.Очистить();
ВходящиеДанные.Вставить("Код", СокрЛП(СтрокаТаблицы.code));
ВходящиеДанные.Вставить("Наименование", СокрЛП(СтрокаТаблицы.name));

ВыгрузитьПоПравилу(,, ВходящиеДанные,, "ДолжностиОрганизаций");

КонецЦикла;

КонецЕсли;
daho; Новенький_2209; +2 Ответить
16. Новенький_2209 04.11.12 00:06 Сейчас в теме
(15) Йожкин Кот, хорошая идея! Надо будет попробовать.
17. daho 8 06.11.12 14:57 Сейчас в теме
Ставлю плюс, автору спасибо!
18. Franchiser 47 26.11.12 12:21 Сейчас в теме
Интересно, кто-нибудь проверял код работает? Обычно если источник пустой, нужно в любом случае указывать Значение= "1"; И еще КД запоминает выгруженные объекты и скорее всего нужно определять переменную "КлючВыгружаемыхданных", иначе может загрузиться, например, только 1 элемент.
24. daho 8 23.05.13 11:31 Сейчас в теме
(18) Franchiser, А если источник ТЗ или структура?
26. Franchiser 47 23.05.13 14:09 Сейчас в теме
(24) Что значит источник ТЗ или структура. Если из тз или из структуры требуется вытащить некое значение то нужно определять переменную КлючВыгружаемыхданных, т.к. это в другой объект тоже может быть передана эта же тз или структура и получится что проставится не то значение. Если же говорить о структуре ВходящиеДанные или ТЗ Выборка Данных тогда мы работаем уже не с самой ТЗ а со строкой ТЗ, не с самой структурой а значением из структуры, поэтому тут все хорошо.
19. SergeMalikov 571 27.11.12 15:24 Сейчас в теме
Работает. В screenshot-ах результаты работы на реальных данных.
20. Olga12 181 12.12.12 12:14 Сейчас в теме
Спасибо, было полезно познакомиться с такой возможностью
21. AlexO 135 18.01.13 14:16 Сейчас в теме
Только на курсах обучают грузить DBF через КД.
Да, кому ничего не понятно - то ну очень интересное решение :)
25. daho 8 23.05.13 11:33 Сейчас в теме
(21) AlexO, dbf потихоньку умирает...
22. MaxS 2826 13.04.13 00:27 Сейчас в теме
Самому в голову приходило такая идея. Но некогда было её исследовать и тем более оформить как статью. ;) +
23. Spacer 355 01.05.13 23:25 Сейчас в теме
Что-то я попробовал подключиться через внешние источники данных к dbf файлам FoxPro,
используя вашу строку подключения: "Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;Dbq=c:\mydbpath;".
Вроде подключилось, таблицы видит, а поля этих таблиц - нет.
И про каждую таблицу пишет: "Необъектные данные". Не могу понять в чем дело...
27. MaxS 2826 13.09.13 07:22 Сейчас в теме
Если в КД программно выбираются данные, зачем промежуточное звено в виде 1С и внешнего источника данных? Причем в примере выше, DBF выгружается в ТЗ.

С таким же успехом можно было в ПВД бы сделать так:

ДБФ = Новый XBase(ПолноеИмя,ИмяФайлаИндекса,Истина);

ДБФ.Первая();
  Пока НЕ ДБФ.ВКонце() Цикл
  ИсходящиеДанные = Новый Структура("КОД,ФИО,СЕМЬЯ,ПЛОЩАДЬОБЩАЯ");
  ИсходящиеДанные.КОД = ДБФ.ПолучитьЗначениеПоля("КОД");
  //...
  ВыгрузитьПоПравилу(,,ИсходящиеДанные,,"ЛицевыеСчета");
КонецЦикла;
Показать


В этом варианте если dbf файл огромный, мы читаем его последовательно, а не выгружаем целиком в таблицу значений.

Задача усложняется, если в dbf хранится например строковое поле УИД (ссылка на справочник), ссылающееся на другой dbf (справочник).
В КД нужно будет создать ПКО для заполнения реквизита, в этом случае ПВД не сработает, а данные из dbf получить как-то нужно. Т.е. читать dbf нужно в ПКО или ещё раньше...
28. Dragga 17.02.14 01:22 Сейчас в теме
Молодец, хорошая реализация. Как пример к использованию
29. ураниум 6 11.07.16 18:12 Сейчас в теме
как строку перенести в перечисление, справочник?
Оставьте свое сообщение