PDA

Просмотр полной версии : Выгрузка из 1С 7.7 в xml



AleksandrChekasin
26.01.2021, 20:17
Совсем запутался....
Есть код:
xml_ЗаписатьНачалоЭлемента("<БезАкциз>");
xml_ЗаписатьТекст("без акциза");
xml_ЗаписатьКонецЭлементаТе кст("</БезАкциз>");
который выводит в xml файл эту строку в следующем виде:
<БезАкциз>
<без акциза>
</БезАкциз>
А мне нужно чтобы "итог" был в таком виде:
<БезАкциз>без акциза</БезАкциз>
Что я делаю не так?

Помогите... уже зациклился...:blush:

Процедура xml_ЗаписатьТекст(прм_Текст)
Если xml_ТегОткрыт=0 Тогда
Сообщить("Перед записью атрибута необходимо записать начало элемента!","!"); а=10/0;
КонецЕсли;
стр=прм_Текст;
стр=СтрЗаменить(стр, "&", "&amp;");
стр=СтрЗаменить(стр, """", "&quot;");
стр=СтрЗаменить(стр, "<", "&lt;");
стр=СтрЗаменить(стр, ">", "&gt;");
стр=СтрЗаменить(стр, "'", "&apos;");
xml_file.WriteLine(">");
xml_Отступы=лев(xml_Отступы, СтрДлина(xml_Отступы)+2);
xml_file.WriteLine(xml_Отступы+прм_Те� �ст);
КонецПроцедуры // xml_ЗаписатьТекст