Получить номер ВСД

Как известно, цифровой номер ВСД апи не передает, как считают разработчики он нам не нужен, но я его хочу.

Итак, у нас есть уид документа по которому мы можем открыть ссылку вида

https://t2-mercury.vetrf.ru/pub/operatorui?_language=ru&_action=showVetDocumentFormByUuid&uuid=тутУИДДОКУМЕНТА

На странице есть этот номер.

Подскажите как его от туда достать средствами 1С? Есть ли парсер, адекватный?

Парсер пишется просто.

Вот на C#

Мы на внутреннем сервере подняли ASP.NET и при обращении к нему возвращает номер

можно сделать лучше, но ждем что нормально будет возвращаться

Вот мой из 1са. Запускаю в фоне после отправки транспортной:

Еще 1 вариантик кину

//Получаем номер ВСД WEB по guid
Функция ПолучитьНомерВСДВеб(GUID_Меркурий)
	ВебСоединение = Новый HTTPСоединение("mercury.vetrf.ru",,,,,,Новый ЗащищенноеСоединениеOpenSSL);
	АдресСкрипта = "/pub/operatorui?_language=ru&_action=showVetDocumentFormByUuid&uuid=" + GUID_Меркурий;
	
	ВебОтвет = ВебСоединение.Получить(Новый HTTPЗапрос(АдресСкрипта));
	Если ВебОтвет.КодСостояния <> 200 Тогда
		Возврат Неопределено;	
	Конецесли;
	
	Чтение = Новый ЧтениеHTML;
	Чтение.УстановитьСтроку(ВебОтвет.ПолучитьТелоКакСтроку());
	Построитель = Новый ПостроительDOM;
	Документ = Построитель.Прочитать(Чтение);
	
	div = ПолучитьБлокиПоКлассу(Документ, "profile-info-name");
	Для Каждого Стр Из div Цикл
		Если Найти(Стр.ТекстовоеСодержимое, "Номер ВСД") > 0 Тогда						
			Попытка 
				НомерВеб = Число(Стр.СледующийСоседний.ТекстовоеСодержимое);				
				Возврат Стр.СледующийСоседний.ТекстовоеСодержимое;				
			Исключение 
				Возврат Неопределено; 						
			КонецПопытки;
		КонецЕсли;
	КонецЦикла;
		
КонецФункции

Функция ПолучитьБлокиПоКлассу(Документ, Класс)
   
    МассивБлоков = Новый Массив;
   
    СписокЭлементов = Документ.ПолучитьЭлементыПоИмени("div");
    Для Каждого Элемент Из СписокЭлементов Цикл
        АтрибутКласс = Элемент.ПолучитьАтрибут("class");
        Если АтрибутКласс<>Неопределено Тогда
            Если АтрибутКласс=Класс Тогда
                МассивБлоков.Добавить(Элемент);
            КонецЕсли;
        КонецЕсли;
    КонецЦикла;
   
    Возврат МассивБлоков;
   
КонецФункции

Спасибо!

передает!

в версии 2.1. см команду http://help.vetrf.ru/wiki/GetStockEntryListOperation_v2.0
вот в этом поле

по краней мере в тестовом контуре проверяли вручную. это оно и есть

mani wrote:передает!

в версии 2.1. см команду http://help.vetrf.ru/wiki/GetStockEntryListOperation_v2.0
вот в этом поле

013 ·········<vd:entryNumber>85628322</vd:entryNumber> vd:StockEntryNumber [1..1] Номер записи журнала, доступный через веб-интерфейс.

по краней мере в тестовом контуре проверяли вручную. это оно и есть

это не номер всд

да действиетльно случайно в тестовом контуре совпало. но это можно использовать для поиска номера ВСД.

поясню, что я имею ввиду. у нас соит задача связать идентификаторы меркурия и тилипада (система учета) изначально тоже планировали что кладовщики в тилипад будут вносить номера ВСД, а там мы уже разрулим и свяжем с товаром в тилипаде, но номера ВСД не нашли и решили использовать вот этот номер.