Бывают ситуации, когда в 1С нужно загружать данные в формате XML, например, прайс-листы.
Но в них есть символы, которые 1С не может распознать при чтении файлов XML.
Например, амперсанд &.
Причём, надо поместить ответ HTML (или XML если загружаем из файла) в отдельную строковую переменную, иначе, может не заменить символы.
Потом при обработке данных обратно заменяем _quot_ на " и _amp_ на &:
НаименованиеКав = СтрЗаменить(name_Реквизит.ТекстовоеСодержимое, "_quot_", Символ(34)); // двойная кавычка "
Наименование = СтрЗаменить(НаименованиеКав, "_amp_", Символ(38)); // амперсанд &
Текст кода для копирования (без восьмой строки):
СоединениеHTTPS = Новый HTTPСоединение("santrek.ru",,,,,,Новый ЗащищенноеСоединениеOpenSSL(),);
Запрос = Новый HTTPЗапрос("/api/yml/");
Ответ = СоединениеHTTPS.Получить(Запрос);
Если Ответ.КодСостояния = 200 Тогда
Ответ_HTML = Ответ.ПолучитьТелоКакСтроку();
Строка_Ответ_HTML = "";
Строка_Ответ_HTML = Ответ_HTML;
ИзмКав_Ответ_HTML =
ИзмАмп_Ответ_HTML = СтрЗаменить(ИзмКав_Ответ_HTML, "&", "_amp_");
ИмяВременногоФайла = ПолучитьИмяВременногоФайла("xml");
ТекстФайл = Новый ЗаписьТекста(ИмяВременногоФайла, КодировкаТекста.UTF8);
ТекстФайл.Записать(ИзмАмп_Ответ_HTML);
ТекстФайл.Закрыть();
КопироватьФайл(ИмяВременногоФайла, ПапкаСантрек + "yml.xml");
ЗагрузитьСантрек(ПапкаСантрек + "yml.xml");
КонецЕсли;
Вступайте в нашу телеграмм-группу Инфостарт
