Сообщения, отправленные пользователем: MartinProgrammer

Может, я чего-то не понимаю и делаю неправильно? Как можно получить список ВСД?

Спасибо, я знаю, что это значит.

Добрый день. Задали задачку для, опять же, автоматизации гашения ВСД.

Пробую сформировать запрос через API. Просто запрос для получения единиц измерения сработал. Но при попытке формирования более сложного (получения списка документов getVetDocumentList) возвращает ACCEPTED.

Прикол в том, что в отладке получил текст xml, который передается при стандартном обмене в Бухгалтерии 3.0. Отличается только поля issueDate и localTransactionId, но в БП данные получены.
Процедура обращения на сервер взята из той же типовой бухгалтерии.

Текст XML формируется такой:

<soapenv:Envelope xmlns:apl="http://api.vetrf.ru/schema/cdm/application" xmlns:apldef="http://api.vetrf.ru/schema/cdm/application/ws-definitions" xmlns:bs="http://api.vetrf.ru/schema/cdm/base" xmlns:dt="http://api.vetrf.ru/schema/cdm/dictionary/v2" xmlns:merc="http://api.vetrf.ru/schema/cdm/mercury/g2b/applications/v2" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:vd="http://api.vetrf.ru/schema/cdm/mercury/vet-document/v2" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
	<soapenv:Header/>
	<soapenv:Body>
		<apldef:submitApplicationRequest>
			<apldef:apiKey>ApyKey</apldef:apiKey>
			<apl:application>
				<apl:serviceId>mercury-g2b.service:2.1</apl:serviceId>
				<apl:issuerId>issuerId</apl:issuerId>
				<apl:issueDate>2019-09-26T02:56:27+05:00</apl:issueDate>
				<apl:data>
					<merc:getVetDocumentListRequest>
						<merc:localTransactionId>f304a04e-9d37-4aa3-b397-c8991ba8b391</merc:localTransactionId>
						<merc:initiator>
							<vd:login>login</vd:login>
						</merc:initiator>
						<bs:listOptions>
							<bs:count>100</bs:count>
							<bs:offset>0</bs:offset>
						</bs:listOptions>
						<vd:vetDocumentType>INCOMING</vd:vetDocumentType>
						<vd:vetDocumentStatus>CONFIRMED</vd:vetDocumentStatus>
						<vd:issueDateInterval>
							<bs:beginDate>2019-01-01T00:00:00+05:00</bs:beginDate>
						</vd:issueDateInterval>
						<dt:enterpriseGuid>enterpriseGuid</dt:enterpriseGuid>
					</merc:getVetDocumentListRequest>
				</apl:data>
			</apl:application>
		</apldef:submitApplicationRequest>
	</soapenv:Body>
</soapenv:Envelope>

Код 1С (выжимка)

ИмяМетода        = "getVetDocumentList";
ТекстСообщенияXML = СформироватьТекстXML();

НастройкаОбмена = Новый Структура;
НастройкаОбмена.Вставить("Логин", "Login");
НастройкаОбмена.Вставить("Пароль", "Password");
НастройкаОбмена.Вставить("Таймаут", 60);

АдресРесурса = "platform/services/2.1/ApplicationManagementService";

РезультатОтправкиHTTPЗапроса = ОтправитьДляОбработки(
	ТекстСообщенияXML,
	443,
	АдресРесурса,
	ИмяМетода,
	НастройкаОбмена);

/////////

Функция ОтправитьДляОбработки(ТелоЗапроса, Порт, АдресРесурса, SOAPAction, НастройкаОбмена)
	
	ВозвращаемоеЗначение = Новый Структура;
	ВозвращаемоеЗначение.Вставить("КодСостояния");
	ВозвращаемоеЗначение.Вставить("Заголовки");
	ВозвращаемоеЗначение.Вставить("ТекстОтвета");
	ВозвращаемоеЗначение.Вставить("ТекстОшибки");
	
	ИнтернетПрокси = ПолучитьПрокси("HTTP");

ЗаголовокHTTP = Новый Соответствие();
	ЗаголовокHTTP.Вставить("Content-Type", "text/xml; charset=utf-8");
	ЗаголовокHTTP.Вставить("Accept-Charset", "utf-8");
	ЗаголовокHTTP.Вставить("SOAPAction", SOAPAction);
	
	HTTPЗапрос = Новый HTTPЗапрос(АдресРесурса, ЗаголовокHTTP);
	HTTPЗапрос.УстановитьТелоИзСтроки(ТелоЗапроса, КодировкаТекста.UTF8, ИспользованиеByteOrderMark.НеИспользовать);
	
	АдресСервера = АдресСервераВЕТИС();
	
	ТекстСообщения = "Ошибка отправки POST-запроса к серверу ВетИС "+АдресСервера;
	
	ЗащищенноеСоединение = ЗащищенноеСоединение();
	
	ТекстОшибки = "";
	Попытка
		
		Соединение = Новый HTTPСоединение(
			АдресСервера,
			Порт,
			НастройкаОбмена.Логин,
			НастройкаОбмена.Пароль,
			ИнтернетПрокси,
			НастройкаОбмена.Таймаут, ЗащищенноеСоединение);
		
		HTTPОтвет = Соединение.ОтправитьДляОбработки(HTTPЗапрос);
		
	Исключение
		
		HTTPОтвет = Неопределено;
		ТекстОшибки = КраткоеПредставлениеОшибки(ИнформацияОбОшибке());
		
		ЗаписьЖурналаРегистрации(
			НСтр("ru='ВетИС'", ОбщегоНазначения.КодОсновногоЯзыка()),
			УровеньЖурналаРегистрации.Ошибка,,,
			ТекстСообщения + Символы.ПС + ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()));
		
	КонецПопытки;
	
	ВозвращаемоеЗначение.ТекстОшибки = ТекстОшибки;
	Если HTTPОтвет <> Неопределено Тогда
		ВозвращаемоеЗначение.КодСостояния = HTTPОтвет.КодСостояния;
		ВозвращаемоеЗначение.Заголовки    = HTTPОтвет.Заголовки;
		ВозвращаемоеЗначение.ТекстОтвета  = HTTPОтвет.ПолучитьТелоКакСтроку();
	КонецЕсли;
	
	Возврат ВозвращаемоеЗначение;
	
КонецФункции