УТМ, связь с сервером ЕГАИС

10.09.15

✎

16:19

Кто бьется над данной темой?
У меня складывается стойкое впечатление что УТМ не может с серваком ЕГАИС соединится.
Какие бы запросы не посылал - папка out пуста.

Логи смотрел - ошибок нет.
Но по адресу https://balancer.fsrar.ru/ через браузер зайти не могу - ругается на сертификат.

1 H A D G E H O G s

10.09.15

✎

16:20

Делай 2 рестарта службе transport

2 Широкий

10.09.15

✎

16:26

Делал и не раз - тут походу в другом дело.
Кстати - улыбнуло что пин-пароли в файле в открытом виде лежат.

3 H A D G E H O G s

10.09.15

✎

16:28

Какая версия транспорта? Может он обновиься не может. Что говорит браузер на http://localhost:8080 ?

4 Широкий

10.09.15

✎

16:30

version:1.0.4

changeSet:c04e317d53a3+

buildNumber:549

5 H A D G E H O G s

10.09.15

✎

16:31

Последняя. Ну тогда хз

6 Широкий

10.09.15

✎

16:34

(5) У тебя на https://balancer.fsrar.ru/ нормально заходит?

7 Evladar

10.09.15

✎

17:08

Аналогично.
Пустая папка. Что бы не запрашивал: справочники, остатки.
Всё пусто.

8 Широкий

10.09.15

✎

17:12

Интересно УТМ для опта и для розницы чем то отличаются?

9 Ёпрст

10.09.15

✎

17:15

(8) ничем

10 zippygrill

10.09.15

✎

17:15

https://balancer.fsrar.ru/ - также не открывается

11 Ёпрст

10.09.15

✎

17:15

http://egais.ru/files/EGAISsetup.exe

12 Ёпрст

10.09.15

✎

17:15

прикольно, можно качнуть транспорт просто так..

13 Ёпрст

10.09.15

✎

17:15

без личного кабинета

14 H A D G E H O G s

10.09.15

✎

17:33

(6) Не могу узреть под таким углом. Я в Черногории на 2 недели и УТМ меня счаст волнует меньше всего.

15 Garykom

гуру

10.09.15

✎

17:35

иногда эти алкоголики у них сервер глючит и все
подождать пару дней может заработает

16 Широкий

11.09.15

✎

09:59

Подниму ветку.
Кто добился успеха с УТМ?

17 nettoxic

11.09.15

✎

10:26

делать нужно http://localhost:8080/opt/out?refresh=true

18 nettoxic

11.09.15

✎

10:27

У меня вопрос в другом 1с 7.7

делаю так:

Процедура POST2(URL,ПараметрыЗапроса)
Сообщить(URL); // здесь http://localhost:8080/opt/in/QueryPartner
Сообщить(ПараметрыЗапроса); //Здесь путь до файла

xml_fso=СоздатьОбъект("Scripting.FileSystemObject"); //XML
xml_file=xml_fso.OpenTextFile(ПараметрыЗапроса, 1, 0, 0);
стр=xml_file.ReadAll();
Boundary = "------------------------f7df2a70ffaea677";
ФайлДанных = "client.xml";
РС = Симв(13)+Симв(10);
Зп = "--" + Boundary + "
|Content-Disposition: form-data; name=""xml_file""; filename=""" + ФайлДанных + """
|Content-Type: application/xml;" + РС + РС + "
|" + стр + РС + РС +"
|--" + Boundary + "--";

WinHttp=СоздатьОбъект("WinHttp.WinHttpRequest.5.1");

WinHttp.Option(2,"utf-8");

WinHttp.Open("POST",URL);

WinHttp.SetRequestHeader("Content-Type","multipart/form-data; boundary=" + Boundary+РС+РС);
WinHttp.SetRequestHeader("Content-Length", СтрДлина(Зп));

WinHttp.Send(Зп);
Т = СоздатьОбъект("Текст");
Т.ДобавитьСтроку(WinHttp.ResponseText());
Т.Записать(КаталогИБ()+СокрЛП(Константа.ЕГАИС_ПапкаОбмена)+"otvet.xml");
КонецПроцедуры

Ответ от сервера:

A>
<error>org.xml.sax.SAXParseException; lineNumber: 2; columnNumber: 6; The processing instruction target matching "[xX][mM][lL]" is not allowed.</error>
<ver>2</ver>
</A>

Что делаю не так?

19 Широкий

11.09.15

✎

10:37

(17) Блин, что то проявилось. Откуда данный параметр? В доках не вижу ничего рро это

20 nettoxic

11.09.15

✎

10:37

Скачай новое ТЗ с сайта ЕГАИС.
версия 1.1

21 nettoxic

11.09.15

✎

10:38

Кто на 7.7 пишит, как файлы xml на сервер отсылаете??

22 Широкий

11.09.15

✎

10:51

(21) Можешь заюзать curl.exe, как описано в документации

23 nettoxic

11.09.15

✎

11:00

Ну так ща его и использую. Хочу без него сделать.

24 Широкий

11.09.15

✎

11:42

(23) На 7-ке вряд ли получится.
Я на 8.1 сижу. Использую HTTPСоединение. Правда пришлось с бубнами поплясать. На 8.2 думаю вообще идеально бы взлетело

25 Широкий

11.09.15

✎

11:52

(18) Мне кажется ты баундари указываешь не так.
Так попробуй:

ЗаписьХМЛ.ЗаписатьБезОбработки("--$#$"+Символы.ВК+Символы.ПС+"Content-Disposition: form-data; name=""xml_file""; Content-Type: application/xml"+Символы.ВК+Символы.ПС+Символы.ВК+Символы.ПС);

--Мой xml--

ЗаписьХМЛ.ЗаписатьБезОбработки(Символы.ВК+Символы.ПС+"--$#$--");

В 7-ке Символы.ВК+Символы.ПС соответствует РазделительСтрок

26 Широкий

11.09.15

✎

11:53

+25 У меня разделитель это "$#$"

27 nettoxic

11.09.15

✎

13:11

Вот рабочая процедура. Досмотрел в Content-Type: application/xml - убрал точку с запятой в конце.

Процедура ПослатьXML(URL,ПараметрыЗапроса)
    Сообщить(URL);
    Сообщить(ПараметрыЗапроса);

    xml_fso=СоздатьОбъект("Scripting.FileSystemObject"); //XML
    //
    xml_file=xml_fso.OpenTextFile(ПараметрыЗапроса, 1, 0, 0);
    //
    стр=xml_file.ReadAll();
    //
    Boundary = "------------------------f7df2a70ffaea677";      //40
    ФайлДанных = "client.xml";
    РС = Симв(13)+Симв(10);
    Зп = "--" + Boundary + РС+"Content-Disposition: form-data; name=""xml_file""; filename=""" + ФайлДанных + ""+РС+"Content-Type: application/xml" + РС + РС + стр + РС + "--" + Boundary + "--";

    WinHttp=СоздатьОбъект("WinHttp.WinHttpRequest.5.1");

    WinHttp.Option(2,"utf-8");

    WinHttp.Open("POST",URL);

    WinHttp.SetRequestHeader("Accept", "100-continue");
    WinHttp.SetRequestHeader("Content-Type","multipart/form-data; boundary=" + Boundary+РС+РС);
    WinHttp.SetRequestHeader("Content-Length", СтрДлина(Зп));

    //WinHttp.SetRequestHeader("Content-Disposition", "form-data; name=""xml_file""; filename=""client.xml""");
    //WinHttp.SetRequestHeader("Accept-Charset","utf-8");
    //WinHttp.setRequestHeader("Content-Language", "ru");
    //WinHttp.setRequestHeader("Content-Charset", "utf-8");
    //WinHttp.SetRequestHeader("Accept", "application/xml");
    //WinHttp.setRequestHeader("Content-Type","application/xml; charset=Windows-1251");

    WinHttp.Send(Зп);
    Сообщить(Зп);
    //WinHttp.Send();
    Т = СоздатьОбъект("Текст");
    Т.ДобавитьСтроку(WinHttp.ResponseText());
    Т.Записать(КаталогИБ()+СокрЛП(Константа.ЕГАИС_ПапкаОбмена)+"otvet.xml");
//    Сообщить(НайтиСтрокуВЗапросе(Т,"url"));
КонецПроцедуры

28 Широкий

11.09.15

✎

13:13

РС = Симв(13)+Симв(10);

РС=РазделительСтрок;

29 nettoxic

11.09.15

✎

13:21

28
согласен

30 nettoxic

11.09.15

✎

13:26

Такс. Теперь другая качеля, на отосланный мною запрос, приходит xml ответ без клиентов. Наводит на мысль, что запрос отсылается не в той кодировке, и соответственно в поле "ИНН" отсылается абракадабра.

31 nettoxic

11.09.15

✎

13:27

+30
Хотя этот же xml отсылаю через curl и всё ок.

32 Широкий

11.09.15

✎

13:39

Кодировка должна быть UTF-8.
Там же долбанутая система
Отправляешь запрос, получаеть ID запроса.
По этому ID запроса в папке in находишь свой запрос и запоминаешь url.

Обновляешь папку оut и ищещь по url ответ. Если нашел - переходишь по ссылке на файл и читаешь его

33 nettoxic

11.09.15

✎

14:48

Кодировка файла у меня и так utf-8.

ПРоблема в xml_file=xml_fso.OpenTextFile(ПараметрыЗапроса, 1, 0, 0);

OpenTextFile не может открывать в utf-8, из-за этого и косяк с кодировкой.

34 Teodor

16.09.15

✎

13:13

Добрый день.
Подскажите, пожалуйста.
У меня 8.2 Розница.

При посылке система выдает ошибку:

{Форма.Форма.Форма(64)}: Ошибка при вызове метода контекста (Получить)
Результат = ОтправкаЗапроса.Получить(НовыйЗапрос,ФайлОтветаЗапросы);
по причине:
Ошибка работы с Интернет: Couldn't resolve host name

35 Широкий

16.09.15

✎

13:17

Неверный адрес сервера или адрес ресурса

36 demoninf

17.09.15

✎

21:59

У меня другая проблема. Я УТМ даже поставить не могу. То есть я начинаю его ставить, дохожу до этапа, где написано "Вставьте носитель с ключом доступа к системе ЕГАИС (аппаратный ключ JaCarta).
Введите ПИН-код и нажмите поиске для выбора ключа",
а ниже поле для ввода пина и кнопка "Поиск". Я ввожу пин 8 единиц, нажимаю "поиск" и получаю чуть ниже надпись "Вставьте носитель содержащий ключ доступа к ЕГАИС". И все, все последующие попытки ввести пин даже этой надписи не дают. Пробовал 0987654321, тоже не подходит. У меня два ключа JaCarta, с обоими удается войди в ЛК на egais.ru, но ни с одним не прокатывает установка.
Кто нибудь сталкивался? Какой пин надо вводить в этом окошке?

37 demoninf

17.09.15

✎

23:33

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

38 zippygrill

30.09.15

✎

11:33

Кстати, в процессе установки ТМ, мастер потребовал параметры соединения. Указал прокси сервер и порт. А вот аутентификацию не где указать.
Из 1С отправляю HTPP запрос и возвращается ошибка о том что не смогли установить соединение. Думается мне что из за аутентификации на прокси сервер...

39 zippygrill

30.09.15

✎

11:37

все манипуляции провожу в Рознице

40 Axel2009

20.10.15

✎

00:22

(27) помоги плиз
[code]
    Boundary = "$#$";

    РазделительСтрок = Символ(10)+Символ(13);

    ИмяФайлаОтправки = "D:\egais\t.xml";

    тт = Новый ТекстовыйДокумент;
    тт.Прочитать(ИмяФайлаОтправки);
    текст = тт.ПолучитьТекст();

    СтрокаBase64 = Base64Строка(Новый ДвоичныеДанные(ИмяФайлаОтправки));

    ПараметрыПОСТ = "";
    ПараметрыПОСТ = ПараметрыПОСТ + "--" + Boundary + РазделительСтрок;
    ПараметрыПОСТ = ПараметрыПОСТ + "Content-Disposition: form-data; name=""xml_file""; filename=""client.xml""" + РазделительСтрок;
    ПараметрыПОСТ = ПараметрыПОСТ + "Content-Type: application/xml" + РазделительСтрок;
    ПараметрыПОСТ = ПараметрыПОСТ + РазделительСтрок;
    ПараметрыПОСТ = ПараметрыПОСТ + текст + РазделительСтрок;
    ПараметрыПОСТ = ПараметрыПОСТ + "--" + Boundary + "--";


    WinHttp = Новый COMОбъект("WinHttp.WinHttpRequest.5.1");
    WinHttp.Option(2,"utf-8");
    WinHttp.Open("POST", "http://192.168.0.10:8080/opt/in/QueryPartner",0);

    РазмерФайлаОтправки = XMLСтрока(СтрДлина(ПараметрыПОСТ));

    WinHttp.setRequestHeader("Content-Type", "multipart/form-data; boundary="+Boundary);
    WinHttp.setRequestHeader("Content-Length", РазмерФайлаОтправки);
    WinHttp.SetRequestHeader("Connection", "keep-alive");
    WinHttp.SetRequestHeader("Keep-Alive", "300");
    WinHttp.Send(ПараметрыПОСТ);
[/code]

на выходе дает ошибку,
<A><error>null</error><ver>2</ver></A>

не могу понять, куда копать...

41 trad

20.10.15

✎

00:52

фрагменты связанные с отправкой запросов в УТМ

Перем фсрарИД;
Перем АдресУТМ,ВходУТМ,ВыходУТМ;

//*******************************************
Функция ДобавитьЭлемент(ДокXML, Родитель, ИмяЭлемента, Значение="")

    Узел = ДокXML.createElement(ИмяЭлемента);
    Если Значение<>"" Тогда
        Узел.text = Строка(Значение);
    КонецЕсли;
    Возврат Родитель.appendChild(Узел);

КонецФункции

//*******************************************
Процедура ОтправитьЗапрос(ИмяЗапроса, Запрос)

    boundary = "a1cf4s35";
    Query = СоздатьОбъект("Msxml2.ServerXMLHTTP");
    Query.open("POST", ВходУТМ+"/"+ИмяЗапроса, 0);
    Query.setRequestHeader("Content-Type", "multipart/form-data; boundary="+boundary);

    // тело запроса, все переводы строк и границы обязательны
    Тело = "--"+boundary+"
    |Content-Disposition: form-data; name=""xml_file""
    |
    |"+Запрос+"
    |--"+boundary+"--
    |";
    Query.send(Тело);

    Если Query.status = 200 Тогда
        ДокXMLответ = СоздатьОбъект("Msxml2.DOMDocument");
        ДокXMLответ.loadXml(Query.responseText);
        node = ДокXMLответ.selectNodes("//url").item(0);
        Сообщить("ИД ответа:"+node.text);
    Иначе
        Сообщить("Ошибка отправки запроса","!");
        Для Тек = 1 По СтрКоличествоСтрок(Query.responseText) Цикл
            Стр = СтрПолучитьСтроку(Query.responseText, Тек);
            Сообщить(Лев(Стр,200));
        КонецЦикла;
    КонецЕсли;

КонецПроцедуры

//*******************************************
Процедура ЗапросОрганизаций()

    ТекстЗапроса="
    |select
    |    rtrim($Контрагенты.ИНН) ИНН
    |from #tmp1
    |join $Справочник.Контрагенты Контрагенты (nolock) on Контрагенты.id = #tmp1.val
    |where $Контрагенты.ИНН != ''
    |group by $Контрагенты.ИНН
    |order by $Контрагенты.ИНН
    |";
    рс=СоздатьОбъект("ODBCRecordset");
    рс.УложитьСписокОбъектов(ВыбКлиент,"#tmp1","Контрагенты");
    Рез=рс.ВыполнитьИнструкцию(ТекстЗапроса);


    ДокXML = СоздатьОбъект("Msxml2.DOMDocument");
    ДокXML.appendChild(ДокXML.createProcessingInstruction("xml", "version=""1.0"" encoding=""UTF-8"""));

    Documents = ДобавитьЭлемент(ДокXML, ДокXML, "ns:Documents");
    Documents.setAttribute("Version", "1.0");
    Documents.setAttribute("xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance";);
    Documents.setAttribute("xmlns:ns",  "http://fsrar.ru/WEGAIS/WB_DOC_SINGLE_01";);
    Documents.setAttribute("xmlns:qp",  "http://fsrar.ru/WEGAIS/QueryParameters";);

    ДобавитьЭлемент(ДокXML, ДобавитьЭлемент(ДокXML, Documents, "ns:Owner"), "ns:FSRAR_ID", фсрарИД);
    Document = ДобавитьЭлемент(ДокXML, Documents, "ns:Document");
    QueryClients = ДобавитьЭлемент(ДокXML, Document, "ns:QueryClients");
    Parameters = ДобавитьЭлемент(ДокXML, QueryClients, "qp:Parameters");
    Parameter = ДобавитьЭлемент(ДокXML, Parameters, "qp:Parameter");
    ДобавитьЭлемент(ДокXML, Parameter, "qp:Name", "ИНН");
    УзелИНН = ДобавитьЭлемент(ДокXML, Parameter, "qp:Value", "");

    Рез.ВыбратьСтроки();
    Пока Рез.ПолучитьСтроку()=1 Цикл
        Состояние("Отправка запроса "+Рез.НомерСтроки+" из "+Рез.КоличествоСтрок());
        УзелИНН.text = Рез.ИНН;
        //ДокXML.save("c:\Запрос"+Рез.ИНН+".xml");
        ОтправитьЗапрос("QueryPartner", ДокXML.xml)
    КонецЦикла;

КонецПроцедуры

//*******************************************
Процедура ЗапросПродукции()

    ТекстЗапроса="
    |select
    |    rtrim($Контрагенты.ИНН) ИНН
    |from #tmp1
    |join $Справочник.Контрагенты Контрагенты (nolock) on Контрагенты.id = #tmp1.val
    |where $Контрагенты.ИНН != ''
    |group by $Контрагенты.ИНН
    |order by $Контрагенты.ИНН
    |";
    рс=СоздатьОбъект("ODBCRecordset");
    рс.УложитьСписокОбъектов(ВыбКлиент2,"#tmp1","Контрагенты");
    Рез=рс.ВыполнитьИнструкцию(ТекстЗапроса);


    ДокXML = СоздатьОбъект("Msxml2.DOMDocument");
    ДокXML.appendChild(ДокXML.createProcessingInstruction("xml", "version=""1.0"" encoding=""UTF-8"""));

    Documents = ДобавитьЭлемент(ДокXML, ДокXML, "ns:Documents");
    Documents.setAttribute("Version", "1.0");
    Documents.setAttribute("xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance";);
    Documents.setAttribute("xmlns:ns",  "http://fsrar.ru/WEGAIS/WB_DOC_SINGLE_01";);
    Documents.setAttribute("xmlns:qp",  "http://fsrar.ru/WEGAIS/QueryParameters";);

    ДобавитьЭлемент(ДокXML, ДобавитьЭлемент(ДокXML, Documents, "ns:Owner"), "ns:FSRAR_ID", фсрарИД);
    Document = ДобавитьЭлемент(ДокXML, Documents, "ns:Document");
    QueryClients = ДобавитьЭлемент(ДокXML, Document, "ns:QueryAP");
    Parameters = ДобавитьЭлемент(ДокXML, QueryClients, "qp:Parameters");
    Parameter = ДобавитьЭлемент(ДокXML, Parameters, "qp:Parameter");
    ДобавитьЭлемент(ДокXML, Parameter, "qp:Name", "ИНН");
    УзелИНН = ДобавитьЭлемент(ДокXML, Parameter, "qp:Value", "");

    Рез.ВыбратьСтроки();
    Пока Рез.ПолучитьСтроку()=1 Цикл
        Состояние("Отправка запроса "+Рез.НомерСтроки+" из "+Рез.КоличествоСтрок());
        УзелИНН.text = Рез.ИНН;
        //ДокXML.save("c:\Запрос"+Рез.ИНН+".xml");
        ОтправитьЗапрос("QueryAP", ДокXML.xml)
    КонецЦикла;

КонецПроцедуры

//*******************************************
Процедура ЗапросСправокА()

    ТекстЗапроса="
    |select
    |    EgaisWayBillContents.InformA
    |from EgaisWayBillContents (nolock)
    |left join EgaisFormA (nolock) on EgaisFormA.InformARegId = EgaisWayBillContents.InformA
    |where EgaisWayBillContents.InformA != ''
    |  and EgaisFormA.InformARegId is null
    |group by EgaisWayBillContents.InformA
    |order by EgaisWayBillContents.InformA
    |";
    рс=СоздатьОбъект("ODBCRecordset");
    Рез=рс.ВыполнитьИнструкцию(ТекстЗапроса);


    ДокXML = СоздатьОбъект("Msxml2.DOMDocument");
    ДокXML.appendChild(ДокXML.createProcessingInstruction("xml", "version=""1.0"" encoding=""UTF-8"""));

    Documents = ДобавитьЭлемент(ДокXML, ДокXML, "ns:Documents");
    Documents.setAttribute("Version", "1.0");
    Documents.setAttribute("xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance";);
    Documents.setAttribute("xmlns:ns",  "http://fsrar.ru/WEGAIS/WB_DOC_SINGLE_01";);
    Documents.setAttribute("xmlns:qf",  "http://fsrar.ru/WEGAIS/QueryFormAB";);

    ДобавитьЭлемент(ДокXML, ДобавитьЭлемент(ДокXML, Documents, "ns:Owner"), "ns:FSRAR_ID", фсрарИД);
    Document = ДобавитьЭлемент(ДокXML, Documents, "ns:Document");
    QueryFormA = ДобавитьЭлемент(ДокXML, Document, "ns:QueryFormA");
    УзелИД = ДобавитьЭлемент(ДокXML, QueryFormA, "qf:FormRegId", "");

    Рез.ВыбратьСтроки();
    Пока Рез.ПолучитьСтроку()=1 Цикл
        Состояние("Отправка запроса "+Рез.НомерСтроки+" из "+Рез.КоличествоСтрок());
        УзелИД.text = Рез.InformA;
        //ДокXML.save("c:\Запрос"+Рез.InformA+".xml");
        ОтправитьЗапрос("QueryFormA", ДокXML.xml)
    КонецЦикла;

КонецПроцедуры

//*******************************************
Процедура ЗапросСправокБ()

    ТекстЗапроса="
    |select
    |    EgaisWayBillContents.InformB
    |from EgaisWayBillContents (nolock)
    |left join EgaisFormB (nolock) on EgaisFormB.InformBRegId = EgaisWayBillContents.InformB
    |where EgaisWayBillContents.InformB != ''
    |  and EgaisFormB.InformBRegId is null
    |group by EgaisWayBillContents.InformB
    |order by EgaisWayBillContents.InformB
    |";
    рс=СоздатьОбъект("ODBCRecordset");
    Рез=рс.ВыполнитьИнструкцию(ТекстЗапроса);


    ДокXML = СоздатьОбъект("Msxml2.DOMDocument");
    ДокXML.appendChild(ДокXML.createProcessingInstruction("xml", "version=""1.0"" encoding=""UTF-8"""));

    Documents = ДобавитьЭлемент(ДокXML, ДокXML, "ns:Documents");
    Documents.setAttribute("Version", "1.0");
    Documents.setAttribute("xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance";);
    Documents.setAttribute("xmlns:ns",  "http://fsrar.ru/WEGAIS/WB_DOC_SINGLE_01";);
    Documents.setAttribute("xmlns:qf",  "http://fsrar.ru/WEGAIS/QueryFormAB";);

    ДобавитьЭлемент(ДокXML, ДобавитьЭлемент(ДокXML, Documents, "ns:Owner"), "ns:FSRAR_ID", фсрарИД);
    Document = ДобавитьЭлемент(ДокXML, Documents, "ns:Document");
    QueryFormA = ДобавитьЭлемент(ДокXML, Document, "ns:QueryFormB");
    УзелИД = ДобавитьЭлемент(ДокXML, QueryFormA, "qf:FormRegId", "");

    Рез.ВыбратьСтроки();
    Пока Рез.ПолучитьСтроку()=1 Цикл
        Состояние("Отправка запроса "+Рез.НомерСтроки+" из "+Рез.КоличествоСтрок());
        УзелИД.text = Рез.InformB;
        //ДокXML.save("c:\Запрос"+Рез.InformB+".xml");
        ОтправитьЗапрос("QueryFormB", ДокXML.xml)
    КонецЦикла;

КонецПроцедуры

//*******************************************
Процедура ЗапросОстатков()

    ДокXML = СоздатьОбъект("Msxml2.DOMDocument");
    ДокXML.appendChild(ДокXML.createProcessingInstruction("xml", "version=""1.0"" encoding=""UTF-8"""));

    Documents = ДобавитьЭлемент(ДокXML, ДокXML, "ns:Documents");
    Documents.setAttribute("Version", "1.0");
    Documents.setAttribute("xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance";);
    Documents.setAttribute("xmlns:ns",  "http://fsrar.ru/WEGAIS/WB_DOC_SINGLE_01";);
    Documents.setAttribute("xmlns:qp",  "http://fsrar.ru/WEGAIS/QueryParameters";);

    ДобавитьЭлемент(ДокXML, ДобавитьЭлемент(ДокXML, Documents, "ns:Owner"), "ns:FSRAR_ID", фсрарИД);
    Document = ДобавитьЭлемент(ДокXML, Documents, "ns:Document");
    QueryFormA = ДобавитьЭлемент(ДокXML, Document, "ns:QueryRests");
    //ДокXML.save("c:\ЗапросОстатков.xml");
    ОтправитьЗапрос("QueryRests", ДокXML.xml)

КонецПроцедуры

фсрарИД = "030000009744";
АдресУТМ = "http://utm_server:8080";;
ВходУТМ  = АдресУТМ+"/opt/in";
ВыходУТМ = АдресУТМ+"/opt/out";

42 trad

20.10.15

✎

00:52

(41) + это для 7.7

43 jackal-655600

20.10.15

✎

03:27

(38) Аутентификация на прокси не поддерживается.