инициалы И.О Фамилия

, ,

☑

0 starV

22.09.14

✎

12:45

Привет всем
как из этого
Иванов Дмитрий Греков
получит
Д.Г.Иванов

1 Wobland

22.09.14

✎

12:46

продолжай

2 GROOVY

22.09.14

✎

12:46

Лев()

3 Галахад

гуру

22.09.14

✎

12:48

Может он Д.И. Греков?

4 Масянька

22.09.14

✎

12:49

Найти("Иванов Дмитрий Греков ");
ЗаменитьНа("Д.Г.Иванов");

5 Wobland

22.09.14

✎

12:50

на

    ИначеЕсли ТипЗнч(Организация)=Тип("СправочникСсылка.КонтактныеЛицаКонтрагентов") Тогда
        Сведения.Должность=Организация.Должность;
        Сведения.Руководитель=Организация.КонтактноеЛицо.Фамилия+" "+Лев(Организация.КонтактноеЛицо.Имя, 1)+"."+Лев(Организация.КонтактноеЛицо.Отчество, 1)+".";
        УниверсальныеМеханизмы.ПросклонятьФамилиюИмяОтчество(КомпонентаСклоненияФИО, Организация.КонтактноеЛицо.Фамилия, , , 2, , Сведения.РуководительРодП);
        Сведения.РуководительРодП=Сведения.РуководительРодП+" "+Лев(Организация.КонтактноеЛицо.Имя, 1)+"."+Лев(Организация.КонтактноеЛицо.Отчество, 1)+".";
    КонецЕсли;

6 Поpyчик-4

22.09.14

✎

12:51

(4) Не предусмотрена обработка ситуации с двумя пробелами.

7 ДенисЧ

22.09.14

✎

12:52

ОбщегоНазначения.ФамилияИнициалыФизЛица()

8 Heckfy

22.09.14

✎

12:52

(6) СтрЗаменить
СокрЛП и все такое :)

9 Масянька

22.09.14

✎

12:52

(6) Вон, Wobland все испортил :)

10 Kamas

22.09.14

✎

12:53

строки= СтрЗаменить(ПолноеИмя," ",Символы.ПС)
ФИО=СтрПолучитьСтроку(строки,1)+" "+Лев(СтрПолучитьСтроку(строки,2),1)+". " Лев(СтрПолучитьСтроку(строки,3),1)+"."

11 Wobland

22.09.14

✎

12:55

(9) чо это испортил? ты ещё не знаешь, как я портить могу ;)

12 Torquader

22.09.14

✎

13:06

Для кучи - не забываем про сложные фамилии и сложные имена, типа "Анна Мария" - как мы это в инициалы превратим ?

13 Defender aka LINN

22.09.14

✎

13:11

(12) Анна Мария Бюль Бюль оглы?

14 bolobol

22.09.14

✎

13:11

(0), у вас имеются ещё какие-либо вопросы?
Оцените, пожалуйста, ответы специалистов по ахти-бальной шкале...

15 blutang

22.09.14

✎

13:12

http://www.superjur.narod.ru/padeg.htm

16 Kamas

22.09.14

✎

13:13

(12) чесно я сам не смогу разобрать что к чему в Мамина-Сибирякова Анана Мари оглы Маме?дова

17 Масянька

22.09.14

✎

13:20

Автор совсем испугался :(

18 ikbokov

22.09.14

✎

14:28

Типовая же

Функция ПолучитьИнициалы(Фамилия, Имя, Отчество)
Возврат СокрЛП(Фамилия) + ?(ЗначениеЗаполнено(Имя), " " + Лев(СокрЛП(Имя), 1) + "." + ?(ЗначениеЗаполнено(Отчество), " " + Лев(СокрЛП(Отчество), 1) + ".", ""), "") ;
КонецФункции

19 Jaffar

22.09.14

✎

14:40

(18) ему нужны инициалы впереди фамилии

20 ikbokov

22.09.14

✎

14:46

(19) Считаете ему не хватит способностей поменять местами куски кода?

21 Jaffar

22.09.14