Бывает, что очередную админско/программерскую задачку (или проблему), решение которой когда-то давно (после долгих поисков) было найдено в необозримых глубинах интернет, приходится искать заново.
Само решение за это время было забыто и приходится снова и снова изучать web-странички.
Если небольшая справка по решению некоторых задач, которые приходилось решать мне,
кому-то сможет принести пользу, буду рад.
Пример содержимого:
|
Автоматическая выгрузка-загрузка |
1С 8.x : Автоматическая выгрузка / загрузка данных, используя регламентное задание
Для обмена данными между программами необходимо сделать следующее:
1. При помощи Конвертации Данных создать правила выгрузки данных
2. Нужно чтобы в конфигурации была обработка УниверсальныйОбменДаннымиXML, желательно последней версии!
(При помощи ее и созданных правил будут выгрузаться и заружаться данные)
3. В 1-вой базе Добавляем Регламентное задание:
Имя - Выгрузка
Использование - !(галочка)
Расписание настройте обязательно.
Имя метода - Общий модуль в котором процедура ВыгрузимИзЗУП():
//Код 1C v 8.х
//Выгрузка кадровых данных
Процедура ВыгрузимИзЗУП() Экспорт
Обработина = Обработки.УниверсальныйОбменДаннымиXML.Создать();
Обработина.РежимОбмена = "Выгрузка";
Обработина.ДатаНачала = НачалоДня(ДобавитьМесяц(ТекущаяДата(),-1));
Обработина.ДатаОкончания = КонецМесяца(ТекущаяДата());
Обработина.ИмяФайлаОбмена = "D:\ZUP_BUH_EXCH\Upload.xml";
Обработина.ИмяФайлаПравилОбмена = "D:\ZUP_BUH_EXCH\Zup-Buh.xml";
Обработина.ЗагрузитьПравилаОбмена();
Обработина.ВыполнитьВыгрузку();
КонецПроцедуры
4. Во 2-ой базе Добавляем Регламентное задание:
Имя - Загрузка
Использование - !(галочка)
Расписание настройте обязательно.
Имя метода - Общий модуль в котором процедура ЗагрузкаВБУХ():
//Код 1C v 8.х
Процедура ЗагрузкаВБУХ() Экспорт
Обработина = Обработки.УниверсальныйОбменДаннымиXML.Создать();
Обработина.ИмяФайлаОбмена = "D:\ZUP_BUH_EXCH\Upload.xml";
Обработина.РежимОбмена = "Загрузка";
Обработина.ОптимизированнаяЗаписьОбъектов = Истина;
Обработина.ЗаписыватьРегистрыНаборамиЗаписей = Истина;
Обработина.ЗаписыватьВИнформационнуюБазуТолькоИзмененныеОбъекты = Истина;
Обработина.ЗагружатьДанныеВРежимеОбмена = Истина;
Обработина.ВыполнитьЗагрузку();
КонецПроцедуры
Хочется выразить свою благодарность и всем тем, кто находил решение этих задачек и проблем и выкладывал эту информацию для общего пользования.
Сразу прошу прощения, если какие-то темы уже устарели, выражены «коряво», имеют лучшее решение или какое-то решение (всякое бывает) принесло проблему.
Справка предлагается «как есть».
