SUM для текста

[shempeev]

Ворос у меня такой

Я так понял что агрегирующих функций для concat'а текста
нет

Как написать UDF функцию на delphi для соединения текста записей

(У меня проблема возникла именно с агрегирующими функ. , т.е как передать уже имеющийся текст в функцию и прикрепить к нему следующий текст)

в запросе мне нужно примерно след.:

select main.sur, (select <CONCAT_STRING (fam.sur)> from fam where fam.idz=main.idz) as fam_ from from main

FireBird 1.5

Заранее спасибо

[mdfv]

А не проще процедурой сделать?

[shempeev]

А не проще процедурой сделать?

Всмысле сделать временную таблицу и туда это все?

[mdfv]

что-то вроде этого

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

for select sur,idz  from main 
into :sur,:midz
do
begin
  fam_ ='';  
  for select sur  from fam 
  where fam.idz=:midz
  into :fsur
  do
  fam_=fam_||fsur;

  suspend;

end

[shempeev]

что-то вроде этого

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

for select sur,idz  from main 
into :sur,:midz
do
begin
  fam_ ='';  
  for select sur  from fam 
  where fam.idz=:midz
  into :fsur
  do
  fam_=fam_||fsur;

  suspend;

end

да да так
уже и начял делать

значит думаем правильно

[WildSery]

значит думаем правильно

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