Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 01.10.2010, 22:59
chin84galaxy chin84galaxy вне форума
Прохожий
 
Регистрация: 21.05.2009
Сообщения: 2
Репутация: 10
Радость Sql запрос что то не получается

Даны несколько таблиц к примеру "абоненты", "улицы" и "данные". В таблице "данные" есть данные абонентов (у каждого аб. несколько данных). Как сделать запрос чтобы из табл "данные" вытаскивал посл данные абонента? у меня чето не получается. Если кто может написать к примеру запрос. Заранее блогодарен!
Ответить с цитированием
  #2  
Старый 02.10.2010, 01:08
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,107
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

ну, нужно некоторое поле, по которому можно определить, что это последние данные. тогда можно сказать запросу что-то типа Top 1 и отсортировать эти данные в нужном порядке. Или использовать max по тому же полю.
Ответить с цитированием
  #3  
Старый 02.10.2010, 01:20
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию

Как уже сказали необходимо поле котороя является критерием "старости" данных. Таковым может являтся например ДатаСоздания записи (CreateDate), или поле-счетчик таблицы (ID).
Для первого варианта запрос будет примерно такой:
Код:
select Top 1 * from Data where Data.AbonentID = :AbonentID
order by Data.CreateDate Desc
Для второго варианта почти так-же:
Код:
select Top 1 * from Data where Data.AbonentID = :AbonentID
order by Data.ID Desc
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием
  #4  
Старый 02.10.2010, 12:59
Аватар для Uniq!
Uniq! Uniq! вне форума
Местный
 
Регистрация: 29.09.2010
Сообщения: 539
Версия Delphi: Delphi XE3
Репутация: 374
По умолчанию

Надо мне кажеться тему прилепить.
SQL запрос на просчёт "уникальных" полей в уже отфильтрованном списке.

Код:
ZQuery1.Close;
ZQuery1.SQL.Clear;
ZQuery1.SQL.Add('Select * FROM '+db_main+'');
ZQuery1.SQL.Add('WHERE Realisation_Date LIKE ''%.'+09.2010');
ZQuery1.SQL.Add('AND Warehouse = ''МР''');
ZQuery1.Open;

После этого получаю таблицу первая колонка которой:
Article:
__________
АААА0001
АААА0002
АААА0003
АААА0004
ББББ0001
ББББ0002
ББББ0003
СССС0001

АААА,ББББ,СССС - уникальны, т.е. ответ в результате "3" должен получиться

Что надо добавить?
Ответить с цитированием
  #5  
Старый 02.10.2010, 13:36
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию

Примерно так я это вижу:
Код:
select Count(Left(CodeField,4)) from Table group by Left(CodeField,4)
Только вместо функции Left, которая возвращает N-символов с начала строки, используйте функцию подходящую под ваш диалект SQL.
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием
  #6  
Старый 02.10.2010, 13:37
Аватар для Uniq!
Uniq! Uniq! вне форума
Местный
 
Регистрация: 29.09.2010
Сообщения: 539
Версия Delphi: Delphi XE3
Репутация: 374
По умолчанию

SELECT DISTINCT LEFT(Article,4) as Article FROM db_main
Да да да)))
Спасибо.
Теперь осталось разобраться как это всё совместить
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 21:38.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025