Merge pull request #10 from alei1180/alei1180-patch-9

Очистка строковых свойств от запрещенных символов

ModuleDFI.bsl

@@ -148,7 +148,7 @@
 Процедура СоздатьРеквизит(Форма,ИмяРеквизита,ОписаниеТипа) Экспорт
 
 	структураРеквизитов = Новый Структура;
-	структураРеквизитов.Вставить(ИмяРеквизита,ОписаниеТипа);
+	структураРеквизитов.Вставить(ОчиститьОтЗапрещенныхСимволов(ИмяРеквизита),ОписаниеТипа);
 	СоздатьРеквизиты(Форма,структураРеквизитов); 
 
 КонецПроцедуры
@@ -204,9 +204,9 @@
 	ИмяДействия,
 	СтруктураСвойств = Неопределено) Экспорт
 
-    НоваяКоманда = Форма.Команды.Добавить(ИмяКоманды);
+    НоваяКоманда = Форма.Команды.Добавить(ОчиститьОтЗапрещенныхСимволов(ИмяКоманды));
     НоваяКоманда.Заголовок = Заголовок;
-	НоваяКоманда.Действие = ИмяДействия;
+	НоваяКоманда.Действие = ОчиститьОтЗапрещенныхСимволов(ИмяДействия);
 	ЕслиСтруктураНеопределеноТоНовая(СтруктураСвойств);
 	УстановитьСвойстваЭлементу(НоваяКоманда,СтруктураСвойств);
 
@@ -315,9 +315,9 @@
 
 Функция СоздатьЭлементФормы(Форма,ИмяЭлемента,ТипЭлемента,РодительЭлемента,ЭлементПеред = Неопределено)
 	Если ЭлементПеред = Неопределено Тогда
-		НовыйЭлемент = Форма.Элементы.Добавить(ИмяЭлемента,ТипЭлемента,РодительЭлемента);
+		НовыйЭлемент = Форма.Элементы.Добавить(ОчиститьОтЗапрещенныхСимволов(ИмяЭлемента),ТипЭлемента,РодительЭлемента);
 	Иначе
-		НовыйЭлемент = Форма.Элементы.Вставить(ИмяЭлемента,ТипЭлемента,РодительЭлемента,ЭлементПеред);
+		НовыйЭлемент = Форма.Элементы.Вставить(ОчиститьОтЗапрещенныхСимволов(ИмяЭлемента),ТипЭлемента,РодительЭлемента,ЭлементПеред);
 	КонецЕсли;
 	Возврат НовыйЭлемент;
 КонецФункции
@@ -1506,3 +1506,45 @@
 КонецФункции
 
 #КонецОбласти
+
+#Область СлужебныеПроцедурыИФункции
+
+// Функция - Очистить от запрещенных символов
+//
+// Параметры:
+//  ПроверяемаяСтрока		 - Строка - Имя элемента
+//  ДопРазрешенныеСимволы	 - Строка - Дополнительно разрешенные символы
+// 
+// Возвращаемое значение:
+//  Строка - Имя элемента очищенное от запрещенных символов
+//
+Функция ОчиститьОтЗапрещенныхСимволов(ПроверяемаяСтрока, ДопРазрешенныеСимволы = Неопределено)
+
+	Если НЕ ЗначениеЗаполнено(ПроверяемаяСтрока) Тогда
+		Возврат ПроверяемаяСтрока;
+	КонецЕсли;
+
+	ОчищеннаяСтрока = "";
+
+	РазрешенныеСимволы = "абвгдеёжзийклмнопрстуфхцчшщъыьэюяАБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ" +
+						 "abcdefghijklmnopqrstuvwxyzQWERTYUIOPASDFGHJKLZXCVBNM" + 
+						 "0123456789_";
+
+	Если ЗначениеЗаполнено(ДопРазрешенныеСимволы) Тогда
+		РазрешенныеСимволы = РазрешенныеСимволы + ДопРазрешенныеСимволы;
+	КонецЕсли;
+
+	Для Сч = 1 по СтрДлина(СокрЛП(ПроверяемаяСтрока)) Цикл
+		ТекСимв = Сред(ПроверяемаяСтрока, Сч, 1);
+
+		Если Найти(РазрешенныеСимволы, ТекСимв) > 0 Тогда
+			ОчищеннаяСтрока = ОчищеннаяСтрока + ТекСимв;
+		КонецЕсли;
+
+	КонецЦикла;
+
+	Возврат ОчищеннаяСтрока;
+
+КонецФункции
+
+#КонецОбласти