Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

объединить две таблицы, но... [D6, FB1.5]


Karburator ©   (2004-06-11 23:04:00) 

Мастера, как объединить две таблицы, если отсутствие поля в одной из них, при объединении надо заменить вычисляемым значением

Не работающие примеры:
 for
   select a.name, '-'
   from  a
   union

   select b.name1, b.name2
   from  b
   into :out_name1, :out_name2

 do  suspend;
==================================
name2 = '-'
 for
   select a.name, :name2
   from  a
   union

   select b.name1, b.name2
   from  b
   into :out_name1, :out_name2

 do  suspend;
-----------------------------------
все поля стринговые, размерностью = 10


Karburator   (2004-06-12 07:10:00) [1]

Блин, знатно клинануло вчерась меня чото.
Надо издать закон запрещающий писать прогу ночью :)


Vemer   (2004-06-12 01:42:00) [2]

For Selectв первой строке кода 1 раз естественно :).


Vemer   (2004-06-12 00:58:00) [3]

Попробуй так:

For Select for select a.name, '-'/*проверить синтаксис '-'*/
    From  a
    Into :out_name1, :out_name2
 Do
  suspend;

For select b.name1, b.name2
  from  b
  into :out_name1, :out_name2
 Do
  suspend;


+ окончательная сортировка в Select From My_Procedure ... по мере необходимости..


Наверх

Титульная страница Поиск, карта сайта Написать письмо