Функция УдалениеТекстаСКонцаСтроки(Знач стрВх, Знач стрУдалТекст)

            Поз = СтрНайти(стрВх, стрУдалТекст, НаправлениеПоиска.СКонца, СтрДлина(стрВх), 1);

            Если ЗначениеЗаполнено(Поз) И

                         Поз <> 0 Тогда                   

                        Возврат Сред(СтрВх, 1, Поз - 1);

            Иначе                       

                        Возврат стрВх;

            КонецЕсли;

КонецФункции