Разделить persons.fio

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
s_oleg
Сообщения: 13
Зарегистрирован: 28 фев 2006, 12:21

Разделить persons.fio

Сообщение s_oleg »

Бывает что для разных отчетов требуют предоставления фамилии, имени, отчества в отдельных полях dbf или столбцах экселя.
Возможно-ли средствами Галактики выгрузить части FIO
по отдельности? Считаем что ФИО из трех слов (русское).
По форуму искал. Не нашел.
С уважением.Олег.
Мария_Ф
Местный житель
Сообщения: 1044
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Иркутская область

Сообщение Мария_Ф »

Плохо искал. Есть такое в ответах. Для разделения используйте SubStr.
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5188
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Сообщение edward_K »

угу
или
ExtractDelimitedWord(fio,1,' ')
ExtractDelimitedWord(fio,2,' ')
ExtractDelimitedWord(fio,3,' ')
тока перед этим возможно нужно выполнить
update persons where pos(' ',fio)>0 set fio:=replace(fio,' ',' ')
Max_Fin
На пенсии
Сообщения: 797
Зарегистрирован: 29 мар 2005, 17:49
Откуда: г. Тюмень
Контактная информация:

Сообщение Max_Fin »

смотрите объектный интерфейс StrFunc.vih

Код: Выделить всё

// Функция возвращает Фамилию
Public function GetFirstName(FIO : string) : string;

// Функция возвращает Имя
Public function GetLastName(FIO : string) : string;

// Функция возвращает Отчество
Public function GetPatronymic(FIO : string) : string;

// Функция возвращает Фамилию и инициалы
Public function GetFIO(FIO : string) : string;
Жду выхода Вселенная 2.12!
s_oleg
Сообщения: 13
Зарегистрирован: 28 фев 2006, 12:21

Благодарю !

Сообщение s_oleg »

Благодарю !
Ответить