Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
16 апр 2024, 20:53

Поле ввода и имена файлов, созданных с помощью ЗаписьXML

Автор Ubza, 27 июл 2016, 11:09

0 Пользователей и 1 гость просматривают эту тему.

Ubza

Добрый день!
Подскажите, пожалуйста, может сталкивались, на поле формы имеется поле ввода с режимом выбора из списка.
Список значения заполняется при открытии формы, путем перебора всех xml файлов в каталоге. Файлы созданы через ЗаписьXML.
Имена файлов в список добавляются, но при попытке выбора поле остается пустым, при этом файлы созданные вручную, выбираются корректно. Также нормально выбираются файлы, с латинскими названиями.
Если вручную переименовать файл, он также не выбирается.

Версия платформы: 8.3.8.1784

Заранее спасибо за помощь

Код процедуры создания файла:

ЗаписьXML  = Новый ЗаписьXML;
Файл = новый файл(мКаталогПользователя+"\ex_"+НаименованиеУстройства+"_.xml");
Если Файл.Существует() Тогда
УдалитьФайлы(мКаталогПользователя+"\ex_"+НаименованиеУстройства+"_.xml");
КонецЕсли;

ЗаписьXML.ОткрытьФайл(мКаталогПользователя+Строка("\ex_"+НаименованиеУстройства+"_.xml"));
ЗаписьXML.ЗаписатьОбъявлениеXML();
ЗаписьXML.ЗаписатьНачалоЭлемента("cdr");

ЗаписьXML.ЗаписатьНачалоЭлемента("sett");
ЗаписьXML.ЗаписатьАтрибут("ip",IPУстройства);
ЗаписьXML.ЗаписатьАтрибут("name",НаименованиеУстройства);
ЗаписьXML.ЗаписатьАтрибут("passCondor",ПарольКУстройству);
ЗаписьXML.ЗаписатьАтрибут("userCondor",Пользователь);
ЗаписьXML.ЗаписатьАтрибут("checkKKM",Строка(ЧекККМ));
ЗаписьXML.ЗаписатьАтрибут("pko",Строка(ПКО));
ЗаписьXML.ЗаписатьАтрибут("other",Строка(Другое));
ЗаписьXML.ЗаписатьАтрибут("doc",ДокументПродаж);
ЗаписьXML.ЗаписатьАтрибут("rec",РеквизитСумма);

ЗаписьXML.ЗаписатьКонецЭлемента();

ЗаписьXML.ЗаписатьКонецЭлемента();
ЗаписьXML.Закрыть();



Код получения имен файлов:

МассивНайденныхФайлов = НайтиФайлы(мКаталогПользователя,"ex_*.xml");

Для Каждого НайденныйФайл из МассивНайденныхФайлов Цикл

Масс = СтрРазделить(НайденныйФайл.Имя,"_",ложь);

Элементы.Устройство.СписокВыбора.Добавить(Масс[1]);


КонецЦикла;



Ubza

Вопрос закрыт.

У строкового реквизита "Устройство", надо было поставить галочку "Неограниченная длина"

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск