Имя: Пароль:
1C
1С v8
Регламентное задание- обмен хмл
0 lite777
 
07.08.20
17:46
Добрый день,пытаюсь делать универсальный обмен хмл регламентным заданием
Вопрос- после загрузки правил обмена, ставил галку на форме выгружать только приходы ,
как это делать програмно ? -

    Обр=Обработки.УниверсальныйОбменДаннымиXML.Создать() ;
    Обр.РежимОбмена="Выгрузка" ;
    Обр.НепосредственноеЧтениеВИБПриемнике=Истина ;
    Обр.ТипИнформационнойБазыДляПодключения=Ложь ;
        Обр.ИмяСервераИнформационнойБазыДляПодключения="server1" ;
    Обр.ВерсияПлатформыИнформационнойБазыДляПодключения="8.3.16.1296" ;

        Обр.ПользовательИнформационнойБазыДляПодключения="";
    Обр.ПарольИнформационнойБазыДляПодключения="" ;
    Обр.ВыводВПротоколСообщенийОбОшибках=Истина;
    Обр.ДописыватьДанныеВПротоколОбмена=Истина;
    Обр.ЗагружатьДанныеВРежимеОбмена=Истина ;
    Обр.ЗаписыватьВИнформационнуюБазуТолькоИзмененныеОбъекты=Ложь ;
        
    Обр.ДатаНачала=НачалоДня( НачалоДня(ТекущаяДата())-1);
    Обр.ДатаОкончания=КонецДня( НачалоДня(ТекущаяДата())-1) ;
    Обр.ИмяИнформационнойБазыНаСервереДляПодключения="Real" ;
    Обр.ИмяФайлаПравилОбмена="C:\ПравилаОбменаДанными-.xml" ;
    Обр.ЗагрузитьПравилаОбмена()   ;
    //Обр.ТаблицаПравилВыгрузки ;
    Обр.КомментарийПриВыгрузкеДанных="Рег Задание "+НачалоДня( НачалоДня(ТекущаяДата())-1) ;
    
    Обр.БезопасныйРежим=Истина ;


    Попытка
        Обр.ВыполнитьВыгрузку();
    Исключение    
        Сообщить(ОписаниеОшибки()) ;
    КонецПопытки
1 lite777
 
07.08.20
17:58
Есть кто ?
2 azernot
 
07.08.20
18:00
Найти в ТаблицаПравилВыгрузки нужную строку и установить в этой строке (и подчинённым) реквизит "Включить" = 1
3 lite777
 
07.08.20
20:22
Спасибо.
Здесь можно обсудить любую тему при этом оставаясь на форуме для 1Сников, который нужен для работы. Ymryn