Удаляем из строки все символы, которые не являются числами, в т.ч. служебные символы в 1С
|
1 2 3 4 5 6 7 8 9 10 11 |
Функция УдаляемНечисла(НашаСтрокаДляРазбора) ОбработаннаяСтрокаСтр = СокрЛП(НашаСтрокаДляРазбора); РезультатРаботы = ОбработаннаяСтрокаСтр; Для н=1 по СтрДлина(ОбработаннаяСтрокаСтр) Цикл ТекСимвол = Сред(ОбработаннаяСтрокаСтр,н,1); Если Найти("0123456789",ТекСимвол) = 0 Тогда РезультатРаботы = СтрЗаменить(РезультатРаботы,ТекСимвол,""); КонецЕсли; КонецЦикла; Возврат РезультатРаботы; КонецФункции |