День добрый!

Есть готовое волшебство получения Представления из Имя?

Пример:
Имя: СведенияОВзносах
Представление: Сведения о взносах

Спасибо!

Тебе функцию преобразования строки нужно или ты из метаданных хочешь по имени синоним получить?

(1) Функцию преобразования, конечно же. Из БПС желательно, при наличии.

Нету. Но можно же написать :)

ʘʘ Хм..

Вариант-то имеется, такой:

Для каждой буквы из Имя Цикл
   Если буква = ВРЕГ(буква) Тогда
      Представление= СтрЗаменить(ТолькоЭтуБукву, " " + НРЕГ(буква));
   КонецЕсли;
КонецЦикла;
Представление= ВРЕГ(Сред(Представление, 2, 1)) + Сред(Представление, 3);

(4) первую большой оставь

(4) А если несколько букв заглавными подряд идут?

Глянь, может эта подойдет:
Функция ПреобразоватьСтроку(Знач ИсходнаяСтрока)
    ДлинаСтроки = СтрДлина(ИсходнаяСтрока);
    Рез = Лев(ИсходнаяСтрока,1);
    ИсходнаяСтрока = Прав(ИсходнаяСтрока,СтрДлина(ИсходнаяСтрока)-1);
    н = 1;
    ПредыдущаяБуква = Рез;
    Пока н <= ДлинаСтроки Цикл        
        Буква = Лев(ИсходнаяСтрока,1);
        ИсходнаяСтрока = Прав(ИсходнаяСтрока,СтрДлина(ИсходнаяСтрока)-1);
        Если Буква=ВРег(Буква) и ПредыдущаяБуква = Врег(ПредыдущаяБуква) Тогда
            Рез = Лев(Рез, СтрДлина(Рез)-1) + Врег(ПредыдущаяБуква);
            Рез = Рез + ВРег(Буква);    
        ИначеЕсли Буква=ВРег(Буква) Тогда
            Рез = Рез + " " +НРег(Буква);
        Иначе
            Рез = Рез + Буква;
        КонецЕсли;    
        ПредыдущаяБуква = Буква;
        н=н+1;
    КонецЦикла;    
    Возврат Рез;        
КонецФункции

Не, тоже не то :)

Почему не то - вполне похоже, и с учётов нескольких заглавных, вдруг пригодится. Пожалуй - воспользуюсь, в качестве эксперимента.

Спасибо!

Функция ПреобразоватьСтроку(Знач ИсходнаяСтрока)
    ДлинаСтроки = СтрДлина(ИсходнаяСтрока);
    Рез = Лев(ИсходнаяСтрока,1);
    ИсходнаяСтрока = Прав(ИсходнаяСтрока,СтрДлина(ИсходнаяСтрока)-1);
    н = 1;
    ПредыдущаяБуква = Рез;
    Пока н <= ДлинаСтроки Цикл        
        Буква = Лев(ИсходнаяСтрока,1);
        ИсходнаяСтрока = Прав(ИсходнаяСтрока,СтрДлина(ИсходнаяСтрока)-1);
        СледующаяБуква = Лев(ИсходнаяСтрока,1);
        Если Буква=ВРег(Буква) и ПредыдущаяБуква = Врег(ПредыдущаяБуква) и СледующаяБуква = Врег(СледующаяБуква) Тогда
            Рез = Лев(Рез, СтрДлина(Рез)-1) + Врег(ПредыдущаяБуква);
            Рез = Рез + ВРег(Буква);    
        ИначеЕсли Буква=ВРег(Буква) Тогда
            Рез = Рез + " " +НРег(Буква);
        Иначе
            Рез = Рез + Буква;
        КонецЕсли;    
        ПредыдущаяБуква = Буква;
        н=н+1;
    КонецЦикла;    
    Возврат Рез;        
КонецФункции

Эта более правильная. Там подпилишь если что :)