Обмен данными с Галактикой

[OldRus]

Здравствуйте, уважаемые.
Обращается программист по Галактике, наша компания переходит с Галактики на 1С, опыта программирования в 1C у меня нет.
Нужна помощь в перекачке (и последующей синхронизации) справочника организаций из Галактики в 1С (Документооборот 8, редакция КОРП 1.3). Что имеем: в информационной базе 1С планы обмена не редактируются и не добавляются.
Есть подходящий план обмена "ОбменУправлениеТорговлейД окументооборот", в котором есть справочник "Организации".
Есть XML- файл, выгруженный из Галактики, естесственно, со своей структурой.
Поизучал "Руководство разработчика" в части механизма обмена данными, но попробовать не получилось: непонятно, откуда запускается процесс обмена, в какую папку положить XML- файл из Галактики, каким образом модифицировать структуру этого файла под структуру 1С.
Перекачка должна быть регулярной, пока "жива" Галактика- а как добавить задание, если в "Регламентные задания" новое не добавишь?
Вопросов много у новичка, сроки сжатые. Буду рад любому дельному совету.

[arccos6pi]

самый простой вариант - написать обработку загрузки данных из XML

[OldRus]

А поподробней можно? Или ссылочку.. Что-то не нашёл здесь подходящей темы..

[arccos6pi]

давай xml или схему
щас че-нить навояем

[OldRus]

давай xml или схему
щас че-нить навояем
Отправил xml- файл почтой

[OldRus]

Люди, скажите, а в этом форуме поиск только у меня одного не работает?
Или вы также страдаете?

[OldRus]

давай xml или схему
щас че-нить навояем
epf- файл получил, разбираюсь.
Благодарю за помощь!

[OldRus]

Вопрос решён благодаря помощи arccos6pi. Справочник организаций импортирован в 1С. Спасибо!

[OldRus]

При импорте данных из xml-файла в справочник Корреспонденты возникла проблема при заполнении контактной информации: новая запись в КонтактнойИнформации создаётся, но не сохраняется:

Спр = Справочники.Корреспондент� �.НайтиПоКоду(Узел.Атрибуты[2].Значение);
Сообщить("Корреспондент " + Наименование + " найден в справочнике");
Спр = Спр.ПолучитьОбъект();
//Заполняем реквизиты
Спр.Наименование = Наименование;
Спр.ПолноеНаименование = Наименование;
Спр.ЮрФизЛицо = Перечисления.ЮрФизЛицо.ЮрЛ ицо;
Спр.КодПоОКПО = ОКПО;
Спр.КПП = КПП;
Спр.КонтактнаяИнформация.О чистить();
Спр.Родитель = Справочники.Корреспондент� �.НайтиПоНаименованию("Контрагенты");
Конт = Спр.КонтактнаяИнформация.Д обавить();
Конт.Город = Город;
Конт.НомерТелефона = "11111";
Конт.АдресЭП = "111@222";

1059

В чём проблема?

[OldRus]

Вопрос решился- помогла челябинская техподдержка. Проблема была в том, что новым записям надо было присваивать вид и тип, а я только строковый реквизит присваивал:

НовСтр = Спр.КонтактнаяИнформация.Д обавить();
НовСтр.АдресЭП = ЭлПочта;
НовСтр.Представление = ЭлПочта;
НовСтр.Вид = Справочники.ВидыКонтактно� �Информации.EmailКорреспонде� �та;
НовСтр.Тип = Перечисления.ТипыКонтактн� �йИнформации.АдресЭлектрон нойПочты;

ТелСтр = Спр.КонтактнаяИнформация.Д обавить();
ТелСтр.Представление = Тел;
ТелСтр.НомерТелефона = Тел;
ТелСтр.Вид = Справочники.ВидыКонтактно� �Информации.ТелефонКорресп ондента;
ТелСтр.Тип = Перечисления.ТипыКонтактн� �йИнформации.Телефон;

АдрСтр = Спр.КонтактнаяИнформация.Д обавить();
АдрСтр.Представление = Адрес;
АдрСтр.НомерТелефона = Адрес;
АдрСтр.Вид = Справочники.ВидыКонтактно� �Информации.ПочтовыйАдресК орреспондента;
АдрСтр.Тип = Перечисления.ТипыКонтактн� �йИнформации.Адрес;
Спр.Записать();[COLOR="Silver"]