1
0
mirror of https://github.com/bia-technologies/bsl-parser.git synced 2025-07-16 00:04:14 +02:00

Merge branch 'release/21.09.1'

This commit is contained in:
Maximov Valery
2021-09-22 14:59:45 +03:00
6 changed files with 58 additions and 10 deletions

View File

@ -198,8 +198,21 @@
// //
Процедура МногоязычнаяСтрока(Запись, Значение) Экспорт Процедура МногоязычнаяСтрока(Запись, Значение) Экспорт
ОбработкаXML.ЗаписатьЗначениеXML(Запись, "key", "ru"); Если ТипЗнч(Значение) = Тип("Структура") Тогда
ОбработкаXML.ЗаписатьЗначениеXML(Запись, "value", Значение);
Для Каждого Элемент Из Значение Цикл
ОбработкаXML.ЗаписатьЗначениеXML(Запись, "key", Элемент.Ключ);
ОбработкаXML.ЗаписатьЗначениеXML(Запись, "value", Элемент.Значение);
КонецЦикла;
Иначе
ОбработкаXML.ЗаписатьЗначениеXML(Запись, "key", "ru");
ОбработкаXML.ЗаписатьЗначениеXML(Запись, "value", Значение);
КонецЕсли;
КонецПроцедуры КонецПроцедуры

View File

@ -216,10 +216,23 @@
КонецЕсли; КонецЕсли;
Запись.ЗаписатьНачалоЭлемента("v8:item");
ОбработкаXML.ЗаписатьЗначениеXML(Запись, "v8:lang", "ru"); Если ТипЗнч(Значение) = Тип("Строка") Тогда
ОбработкаXML.ЗаписатьЗначениеXML(Запись, "v8:content", Значение); Запись.ЗаписатьНачалоЭлемента("v8:item");
Запись.ЗаписатьКонецЭлемента(); ОбработкаXML.ЗаписатьЗначениеXML(Запись, "v8:lang", "ru");
ОбработкаXML.ЗаписатьЗначениеXML(Запись, "v8:content", Значение);
Запись.ЗаписатьКонецЭлемента();
ИначеЕсли ТипЗнч(Значение) = Тип("Структура") Тогда
Для Каждого Элемент Из Значение Цикл
Запись.ЗаписатьНачалоЭлемента("v8:item");
ОбработкаXML.ЗаписатьЗначениеXML(Запись, "v8:lang", Элемент.Ключ);
ОбработкаXML.ЗаписатьЗначениеXML(Запись, "v8:content", Элемент.Значение);
Запись.ЗаписатьКонецЭлемента();
КонецЦикла;
КонецЕсли;
КонецПроцедуры КонецПроцедуры

View File

@ -48,7 +48,18 @@
// //
Функция МногоязычнаяСтрока(Знач ЧтениеXML) Экспорт Функция МногоязычнаяСтрока(Знач ЧтениеXML) Экспорт
Возврат ЧтениеОписанийБазовый.ЗначениеВложенногоТэга(ЧтениеXML, "value"); Язык = ЧтениеОписанийБазовый.ЗначениеВложенногоТэга(ЧтениеXML, "key");
ЧтениеXML.Прочитать();
Текст = ЧтениеОписанийБазовый.ЗначениеВложенногоТэга(ЧтениеXML, "value");
Если ЗначениеЗаполнено(Язык) и ЗначениеЗаполнено(Текст) Тогда
МногоязычнаяСтрока = Новый Структура;
МногоязычнаяСтрока.Вставить(Язык, Текст);
Возврат МногоязычнаяСтрока;
КонецЕсли;
Возврат Текст;
КонецФункции КонецФункции

View File

@ -48,7 +48,18 @@
// //
Функция МногоязычнаяСтрока(Знач ЧтениеXML) Экспорт Функция МногоязычнаяСтрока(Знач ЧтениеXML) Экспорт
Возврат ЧтениеОписанийБазовый.ЗначениеВложенногоТэга(ЧтениеXML, "v8:content"); Язык = ЧтениеОписанийБазовый.ЗначениеВложенногоТэга(ЧтениеXML, "v8:lang");
ЧтениеXML.Прочитать();
Текст = ЧтениеОписанийБазовый.ЗначениеВложенногоТэга(ЧтениеXML, "v8:content");
Если ЗначениеЗаполнено(Язык) и ЗначениеЗаполнено(Текст) Тогда
МногоязычнаяСтрока = Новый Структура;
МногоязычнаяСтрока.Вставить(Язык, Текст);
Возврат МногоязычнаяСтрока;
КонецЕсли;
Возврат Текст;
КонецФункции КонецФункции

View File

@ -33,7 +33,7 @@
// //
Функция ВерсияПродукта() Экспорт Функция ВерсияПродукта() Экспорт
Возврат "21.09"; Возврат "21.09.1";
КонецФункции КонецФункции

View File

@ -51,7 +51,7 @@
Расширение = РазборКонфигураций.СоздатьНовоеРасширение(КаталогРасширения, ФорматыВыгрузки.Конфигуратор_8_3_10); Расширение = РазборКонфигураций.СоздатьНовоеРасширение(КаталогРасширения, ФорматыВыгрузки.Конфигуратор_8_3_10);
СвойстваРасширения = Расширение.ОписаниеКонфигурации().СвойстваКонфигурации; СвойстваРасширения = Расширение.ОписаниеКонфигурации().СвойстваКонфигурации;
СвойстваРасширения.Наименование = "Simple"; СвойстваРасширения.Наименование = "Simple";
СвойстваРасширения.Синоним = "Простое расширение"; СвойстваРасширения.Синоним = Новый Структура ("ru, en", "Простое расширение", "Simple extension");
СвойстваРасширения.ПрефиксИмен = "smpl_"; СвойстваРасширения.ПрефиксИмен = "smpl_";
СвойстваРасширения.РежимСовместимостиРасширенияКонфигурации = "8.3.9"; СвойстваРасширения.РежимСовместимостиРасширенияКонфигурации = "8.3.9";
Для Каждого Объект Из Конфигурация.ОписаниеКонфигурации().ОбъектыКонфигурации Цикл Для Каждого Объект Из Конфигурация.ОписаниеКонфигурации().ОбъектыКонфигурации Цикл