// обращение к внешнему веб-серсису и хранимым процедурам сервиса "Первой Формы":
Сервис = WSСсылки.ПерваяФорма.СоздатьWSПрокси("http://taskcenter.ru/", "TCWebService", "TCWebServiceSoap" );
// Указание логина/пароля внешнего веб-серсиса в "1С":
Сервис.Пользователь = "systemrobot";
Сервис.Пароль = "Temp1234";
// Получение типа параметра с возвращаемым значением типа массива строк:
ТипПараметра = Сервис.ФабрикаXDTO.Тип("http://taskcenter.ru/", "ArrayOfString");
// Создание строки для результирующей таблицы "ДопПараметры":
ТипСтрока = ФабрикаXDTO.Тип("http://www.w3.org/2001/XMLSchema","string");
// Создание объекта для таблицы "ДопПараметры" из внешнего веб-серсиса:
ДопПараметры = Сервис.ФабрикаXDTO.Создать(ТипПараметра);
// Заполнение таблицы "ДопПараметры" данными:
ДопПараметры.string.Добавить(ФабрикаXDTO.Создать(ТипСтрока,"40="+Рез.ДоговорКонтрагента.УникальныйИдентификатор()));
ДопПараметры.string.Добавить(ФабрикаXDTO.Создать(ТипСтрока,"41="+Рез.Контрагент.УникальныйИдентификатор()));
ДопПараметры.string.Добавить(ФабрикаXDTO.Создать(ТипСтрока,"45="+Рез.ДоговорКонтрагента.Организация.ИНН));
ДопПараметры.string.Добавить(ФабрикаXDTO.Создать(ТипСтрока,"7="+XMLСтрока(Рез.Сумма)));
ДопПараметры.string.Добавить(ФабрикаXDTO.Создать(ТипСтрока,"47="+"Оплата от покупателя"));
ДопПараметры.string.Добавить(ФабрикаXDTO.Создать(ТипСтрока,"48="+рез.Дата));
// Вызов метода веб-сервиса и сохранение результата – номера задачи
НомерЗадачи = Сервис.NewTask(3,"",,34,"",ДопПараметры,,0,,,false,false,false,false,,);
|