Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Написать запрос на Delphi Local SQL / 3 сообщений из 3, страница 1 из 1
25.12.2002, 13:04
    #32084061
E'lf
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Написать запрос на Delphi Local SQL
Работал на MS SQL, а вот приходится на Delphi для работы с dbase (dbf-ники) использовать Local SQL
Задача:
t1 таблица товаров
t2 таблица продаж товара
t3 таблица списания товара, причем есть разные типы списания
Надо получить такую таблицу:
код товара (т1), всего продано (сумма из т2), всего списано (сумма из т3), в том числе списано по виду списания 1 (сумма из т 3, но только с типом списания =1)
Первые три поля без проблем:

select t1.kodtov, sum(t2.summa), sum(t3.f_summa)
from t1 left outer join t2 on (t1.kodtov=t2.kodtov)
left outer join t3 on (t1.kodtov=t3.kodtov)
group by t1.kodtov
HAVING sum(t2.summa)>0 or sum(t3.f_summa)>0

А дальше как? Спасибо...
...
Рейтинг: 0 / 0
25.12.2002, 13:38
    #32084074
E'lf
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Написать запрос на Delphi Local SQL
Пока ждал помощи, вышло так

select t1.kodtov, sum(t2.summa), sum(t3.f_summa) ,

--- sum(t3_2.f_summa) ----
from t1 left outer join t2 on (t1.kodtov=t2.kodtov)
left outer join t3 on (t1.kodtov=t3.kodtov)

---left outer join t3 as t3_2 on (t1.kodtov=t3_2.kodtov and t3_2.vid_spis=1)---
group by t1.kodtov
HAVING sum(t2.summa)>0 or sum(t3.f_summa)>0
...
Рейтинг: 0 / 0
25.12.2002, 14:13
    #32084093
KirillovA
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Написать запрос на Delphi Local SQL
Вот - программер должен сначала сам прокемпериться- и уж если ни как - то - спросить - тогда ты ламо! Судя по интервалу вопроса - ответа.
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Написать запрос на Delphi Local SQL / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]