Функция получить строку на латинском, Транслит

 Функция ПолучитьСтрокуНаЛатинском(ИсходныйТекст)
      

    СоответствиеСимволов = Новый Соответствие;
      

    СоответствиеСимволов.Вставить("А", "A");
      

    СоответствиеСимволов.Вставить("Б", "B");
      

    СоответствиеСимволов.Вставить("В", "V");
      

    СоответствиеСимволов.Вставить("Г", "G");
      

    СоответствиеСимволов.Вставить("Д", "D");
      

    СоответствиеСимволов.Вставить("Е", "E");
      

    СоответствиеСимволов.Вставить("Ё", "E");
      

    СоответствиеСимволов.Вставить("Ж", "ZH");
      

    СоответствиеСимволов.Вставить("З", "Z");
      

    СоответствиеСимволов.Вставить("И", "I");
      

    СоответствиеСимволов.Вставить("Й", "Y");
      

    СоответствиеСимволов.Вставить("К", "K");
      

    СоответствиеСимволов.Вставить("Л", "L");
      

    СоответствиеСимволов.Вставить("М", "M");
      

    СоответствиеСимволов.Вставить("Н", "N");
      

    СоответствиеСимволов.Вставить("О", "O");
      

    СоответствиеСимволов.Вставить("П", "P");
      

    СоответствиеСимволов.Вставить("Р", "R");
      

    СоответствиеСимволов.Вставить("С", "S");
      

    СоответствиеСимволов.Вставить("Т", "T");
      

    СоответствиеСимволов.Вставить("У", "U");
      

    СоответствиеСимволов.Вставить("Ф", "F");
      

    СоответствиеСимволов.Вставить("Х", "KH");
      

    СоответствиеСимволов.Вставить("Ц", "TS");
      

    СоответствиеСимволов.Вставить("Ч", "CH");
      

    СоответствиеСимволов.Вставить("Ш", "SH");
      

    СоответствиеСимволов.Вставить("Щ", "SHCH");
      

    СоответствиеСимволов.Вставить("Ъ", "");
      

    СоответствиеСимволов.Вставить("Ы", "Y");
      

    СоответствиеСимволов.Вставить("Ь", "");
      

    СоответствиеСимволов.Вставить("Э", "E");
      

    СоответствиеСимволов.Вставить("Ю", "YU");
      

    СоответствиеСимволов.Вставить("Я", "YA");
      

    
      

    ИсходныйТекст = СокрЛП(ВРег(ИсходныйТекст));
      

    ГотовоеЗначение = "";
      

    ТекущийСимвол = "";
      

    ТекущийГотовыйСимвол = "";
      

    Для к = 1 по СтрДлина(ИсходныйТекст) Цикл
      

    	ТекущийСимвол = Сред(ИсходныйТекст, к, 1);
      

    	ТекущийГотовыйСимвол = СоответствиеСимволов.Получить(ТекущийСимвол);
      

    	Если ТекущийГотовыйСимвол = Неопределено Тогда
      

    		ГотовоеЗначение = ГотовоеЗначение + ТекущийСимвол;
      

    	Иначе
      

    		ГотовоеЗначение = ГотовоеЗначение + ТекущийГотовыйСимвол;
      

    	КонецЕсли;
      

    	
      

    КонецЦикла;
      

    Возврат ГотовоеЗначение;
      

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

    
      

    //Использование:
      

    Сообщить(ПолучитьСтрокуНаЛатинском("Забарчук Юлия"));
      

    //Выведет: ZABARCHUK YULIYA