gifts2017

Обработка формирования файлов экспорта контрагентов (DBF) для загрузки в M.E.DOC IS

Опубликовал Володя Долінський (vdolynsky) в раздел Обмен - Обмен через DBF

Данная обработка формирует пакет файлов DBF (контрагент-Partner.dbf, адрес-Partnadr.dbf, телефон-Partntel.dbf) для возможности последующей загрузки в систему M.E.DOC IS.
Обработка работает для конфигураций "1С:Предприятия 7.7": "Бухгалтерский учет для Украины", "Производство+Услуги+Бухгалтерия для Украины", "Комплексная для Украины".


Обработка реализует возможность заполнения карточки контрагента в системе M.E.DOC IS в минимально необходимой структуре (без разбивки адреса по полям: индекс, страна, область, район, улица, тип улицы, и т.д.). Адрес и телефон импортируется в виде представления.
Для загрузки DBF файлов в систему M.E.DOC IS в M.E.DOC IS нужно открыть картотеку контрагентов (розділ - довідники - контрагенти) - файл імпорт з DBF - указать папку для обмена.

Особенностью информационной структуры контрагентов в M.E.DOC IS является структура, в которой Телефон подчинен адресу, адрес - контрагенту, изменения в карточке контрагента - подчинены таблице История. Все поля идентифицируются числовым десятизначным кодом (для каждой таблицы свой). Для простоты использования использовал код контрагента (без префикса) из справочника Контрагенты 1С (при повторной выгрузке код будет таким же). 

Описание структуры файлов обмена получен следующим способом: в системе M.E.DOC IS формируем карточку контрагента, в которой заполняем все поля. Созданную запись экспортируем в DBF. Полученные таблицы позволяют определить структуру файлов для импорта.

 При експопрте через dbf существует две сложности: 1) нужно перед 
Експортом получить последние коды классификаторов МЕДКа: контрагенты, адреса, телефоны, договора. 2) При повторном експорте объектов коды соответсвенные  желательно присвоить с предыдущей выгрузки. Данная обработка наверное временная. Для обхода этих двух условий желательно експортировать через OLE объект.

Обработка написана под свои нужды - поэтому выкладываю её в таком виде, как есть.

Кроме данной обработки ведется работа по разработке для "Бухгалтерский учет для Украины 7.7" заполнения адреса и телефона контрагента  (справочники с класификаторами и импорт в DBF) "1в1" как в M.E.DOC IS.  Если надо - пишите.

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

Наименование Файл Версия Размер
Импорт контрагентов в M.E.DOC 5
.ert 72,00Kb
10.01.15
5
.ert ExpK_MEDoc 72,00Kb Скачать

См. также

Подписаться Добавить вознаграждение

Комментарии

1. script Мальчинко (script) 23.12.14 11:00
Автор исправь заголовок. "Обработка формирования файлов импорта контрагентов (DBF) для загрузки в M.E.DOC IS"
Импортируют (загружают) "из", а не "в". Если "в" то - экспортируют.
2. Александр (popenko) 23.12.14 11:14
полезно. для борьбы бухов с медком. но не совсем понятно по - Кроме данной обработки есть в наличии разработка для "Бухгалтерский учет для Украины 7.7" заполнения адреса и телефона контрагента (справочники с класификаторами и импорт в DBF) "1в1" как в M.E.DOC IS
3. Володя Долінський (vdolynsky) 23.12.14 14:37
(2) popenko,
В МЕДку адрес состоит из 12 полей: индекс, страна (справочник), область(справочник), район (справочник), район города (справочник), город (справочник), тип улицы (справочник), улица, № дома, дробь номера дома, корпус, тип квартиры(справочник), номер квартиры. В даный момент работаю над реализацией такой структуры в "Бух.учет для Украины".
4. Александр (popenko) 24.12.14 13:25
спасибо (3)
по поводу обработки - есть вариант обмена в формате XML, мне кажется так проще. По поводу адреса - в "бухгалтерии" текстовое поле, но была конфигурация АБТ 3,5 - 3,6 и там эта проблема обыгрывалась - бухгалтер заполняла адрес через дополнительную обработку (получалось как шаблон), поля переводились в тестовую строку и через точку с запятой записывались в адрес.
5. script Мальчинко (script) 24.12.14 22:24
У медка есть файлик medoc1c.dll, а еще в каталоге медка есть папка с файлом Инструкция по СОМ объектам.pdf
И если детально ознакомиться с материалом то окажеться что можно сделать вот так:

Простым копированием код работать не будет - предоставлен как пример возможностей.

App = Новый COMОбъект("MEDOC.ZApplication");
или для 7.7
App=СоздатьОбъект("MEDOC.ZApplication");
Dict = App.GetDictionary();
tabl = Dict.Open("HBPARTNER");
tabl.Edit();
tabl.Append();
КлючПартнера=Dict.GetGenID("HBPARTNER");
tabl.Fields.Item("CODE").Value = КлючПартнера;
tabl.Fields.Item("IDPARTNERGRP").Value = СокрЛП(КодГруппы);

Если СтрДлина(СокрЛП(Контр.КодПоЕдрпоу))<=10 Тогда
tabl.Fields.Item("NUM").Value= СокрЛП(Контр.КодПоЕдрпоу);
Иначе
Предупреждение(НСтр("ru = 'ЕДРПОУ слишком длинное: ';uk = 'ЄДРПОУ надто велике: '") + СтрДлина(Контр.КодПоЕдрпоу) + НСтр("ru = ' символов!';uk = ' символів!'"));
Возврат;
КонецЕсли;

tabl.Fields.Item("SHORTNAME").Value= Лев(СокрЛП(Контр.Наименование), 150);
tabl.Fields.Item("NAME").Value= Лев(СокрЛП(Контр.НаименованиеПолное), 250);
tabl.Fields.Item("INDTAXNUM").Value= СокрЛП(Контр.ИНН);
tabl.Fields.Item("CODENDS").Value= СокрЛП(Контр.НомерСвидетельства);
tabl.Fields.Item("NREZ").Value = ?(Контр.НеЯвляетсяРезидентом=Истина, 1,0);

isReadOnly = Dict.IsReadOnly();
Если НЕ isReadOnly Тогда
Dict.Save();
КонецЕсли;

Дальше записать адрес
и готово.
6. Володя Долінський (vdolynsky) 26.12.14 17:36
(5) script, Спасибо за предложенный вариант. В моём случае так не получится - у заказчика 1с и МЕДОК через OLE не соединить.
Для написания сообщения необходимо авторизоваться
Прикрепить файл
Дополнительные параметры ответа