Имя: Пароль:
1C
 
ЗуП 2.5 как у физ лица получить Фамилие с инициалами?
0 Shur1cIT
 
04.06.15
15:11
Необходимо выводить физ лицо в печатную форму в виде Фамилии и инициалы.Дабы не изобретать велосипед, вопрос в ЗуП есть готовая функция?
1 Shur1cIT
 
04.06.15
15:11
(0) хотя фио а регистре сведений по отдельности храниться вытащить не сложно,но малоли механизм готовый есть7
2 ХардHard
 
04.06.15
15:12
Лентяй.) Подстрока или Лев используй.
3 Shur1cIT
 
04.06.15
15:13
(2) я не лентяй хочу по феншую -)))
4 ХардHard
 
04.06.15
15:15
|    ЕСТЬNULL(ФИОФизЛиц.Фамилия + ВЫБОР
    |            КОГДА ПОДСТРОКА(ФИОФизЛиц.Имя, 1, 1) <> """"
    |                ТОГДА "" "" + ПОДСТРОКА(ФИОФизЛиц.Имя, 1, 1) + "".""
    |            ИНАЧЕ """"
    |        КОНЕЦ + ВЫБОР
    |            КОГДА ПОДСТРОКА(ФИОФизЛиц.Отчество, 1, 1) <> """"
    |                ТОГДА "" "" + ПОДСТРОКА(ФИОФизЛиц.Отчество, 1, 1) + "".""
    |            ИНАЧЕ """"
    |        КОНЕЦ, ОтветственныеЛицаОрганизацийСрезПоследних.ФизическоеЛицоНаименование) КАК ФИОРуководителя
5 ХардHard
 
04.06.15
15:16
(3) У тебя серьезно 8 лет стажа? %)
6 mehfk
 
04.06.15
15:20
(0) ОбщегоНазначенияЗК
// Функция формирует фамилию и инициалы либо по наименованию элемента спр-ка ФизическиеЛица
//  либо по переданным строкам.
//  Если передан Объект, то извлеченная из него строка считается совокупностью
//  Фамилия + Имя + Отчество, разделенными пробелами.
//
// Параметры
//  Объект        - строка или ссылка или объект элемента спр-ка ФизическиеЛица.
//  Фамилия        - фамилия физ. лица.
//  Имя            - имя физ. лица.
//  Отчество    - отчество физ. лица.
//
// Возвращаемое значение
//  Фамилия и Инициалы одной строкой.
//  Побочные эффекты - переданная целая строка разбивается на подстроки, соответствующие
//  отдельным Фамилии,Имени и Отчеству
//
Функция ФамилияИнициалыФизЛица(Объект = "", Фамилия = " ", Имя = " ", Отчество = " ") Экспорт

    Если Не ЗначениеЗаполнено(Фамилия) И Не ЗначениеЗаполнено(Имя) Тогда
        
        ФИО = ФамилияИмяОтчествоФизЛица(Объект);
        
        Фамилия = ФИО.Фамилия;
        Имя        = ФИО.Имя;
        Отчество= ФИО.Отчество;
        
    КонецЕсли;    
    
    Возврат ?(НЕ ПустаяСтрока(Фамилия),
                Фамилия + ?(НЕ ПустаяСтрока(Имя)," " + Лев(Имя,1) + "." + ?(НЕ ПустаяСтрока(Отчество),Лев(Отчество,1)+".", ""), ""),
                "");

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

Занеси 500 рублей в кассу Мисты
7 Shur1cIT
 
04.06.15
15:27
(5) серьёзно, но в зупе я не программлю ,функций её не знаю,то что храниться ФИО на РС я прекрасно знаю написал в (1), мне нужно было готофую функцию узнать, а не заново такую же писать. (6) Спасибо
8 KUBIK
 
04.06.15
15:30
(7) И в бухии тоже не прогграмишь?
Точно такая же функция в БП
9 Shur1cIT
 
04.06.15
15:33
(8) нет уже давно не програмлю, в УПП програмлю, но опять же в ЗП блоки не суюсь, думаю как и многие тут
Компьютеры — прекрасное средство для решения проблем, которых до их появления не было.