Функция удаляет лишнее из сообщения полученного из ОписаниеОшибки(), оставляя только суть проблемы!

 Функция СформироватьТекстСообщения(Знач ТекстСообщения) Экспорт



	НачалоСлужебногоСообщения    = Найти(ТекстСообщения, "{");

	ОкончаниеСлужебногоСообщения = Найти(ТекстСообщения, "}:");

	

	Если ОкончаниеСлужебногоСообщения > 0 

		И НачалоСлужебногоСообщения > 0 

		И НачалоСлужебногоСообщения < ОкончаниеСлужебногоСообщения Тогда

		

		ТекстСообщения = Лев(ТекстСообщения, (НачалоСлужебногоСообщения - 1)) +

		                 Сред(ТекстСообщения, (ОкончаниеСлужебногоСообщения + 2));

	КонецЕсли;	

	Возврат СокрЛП(ТекстСообщения);

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