Ну он же не Fine :)

как говорится: "вам шашечки или ехать?"..

Ну вообщем так..

1. Создаем xml с указанием кодировки: CreateXML(toUTF8("version=\"1.0\" encoding=\"UTF-8\""))
2. При создании элемента - нужно передавать строку в win кодировке: CreateElemXML(XMLDoc,OemToAnsi("СчетаПК"))
3. При сохранении в файл использовать метод SaveFileXML  (SaveFileXmlFine на UTF не рассчитан)

Пример кода (скрипт в DOS кодировке):

TestUTF()
{
    UnloadScriptModule("msxml");
    LoadScriptModule("msxml");
   
    var XMLDoc = CreateXML(toUTF8("version=\"1.0\" encoding=\"UTF-8\""));  
    var rootNode= CreateElemXML(XMLDoc,OemToAnsi("СчетаПК"));  

    XMLDoc .documentElement=rootNode;

    SaveFileXML(XMLDoc,"D:\\Postavki\\123.xml");
    UnloadScriptModule("msxml");
}

Скрипт у вас в ДОС кодировке.

Поэтому AnsiToOem надо убрать

ANSI

тогда надо так:

var XMLDoc1 = CreateElemXML(XMLDoc,toUTF8(AnsiToOem("СчетаПК")));

или поправить toUTF8 так:

toUTF8(st)
{
  string s = "";
  FreeSpaceString(st,3,"");
  CP866ToUTF8(AnsiToOem(st),s);
  return static_cast_to_string(s);
}

Скрипт у вас в какой кодировке?

Можете его выложить..

в toUTF8() должна прилетать строка в дос кодировке (866)

Добрый день.

Пример можно взять в ..SCRIPT\forms\egisz.S или PilotFSS.S

В планах консолидации нет.

Данные можно консолидировать в ПФ-отчет

Пусть пересоздают отчет.

По срокам не сориентирую