Вниз
Скачать: CL | DM;

Сравнение данных   Найти похожие ветки 

 
Dagir ©   (2008-09-04 13:18) [0]

Добрый день! Очень нужна ваша HELP!!!
В БД имеется таблица
Документы   Версия  Дата печати
Doc1        В1        null
Doc1        В2        15.08.08
Doc1        В3        null

Doc2        В1        null
Doc2        В3        17.08.08

Doc3        В1        null
Doc3        В2        null
Doc3        В3        null
.........................................
Docn        В1        null
Задача такая: для каждого Doc_i проверить, если последняя ненулевая Дата печати соответствует последней Версии документа(в нашем случае это Doc2), то выполнять процедуру1, иначе Процедуру2.
Я делаю так

Вывожу в ListView результат запроса

select Документы, max(Версия) from Table group by Документы
...
Versiya:=FieldByName("max(Версия)").AsString


Затем делаю проверку в цикле так:

for i:=0 to ListView.Items.Count-1 do
begin
...
select Документы,max(Версия),max(Дата печати) where Дата печати is not null and Документы:=ListView.Items[i]
...
if max(Версия)=Versiya then Процедура1 else Процедура 2
end;


Но это вызывает множество проблем, не подскажите другой способ проверить.
White


 
Правильный$Вася   (2008-09-04 13:20) [1]

ничего не понял


 
Johnmen ©   (2008-09-04 13:37) [2]

http://delphimaster.net/view/3-1220248448/


 
Dagir ©   (2008-09-05 08:22) [3]

Берем Doc1. Его последняя дата печати, не равная нулю-15.08.08,соответствует Версии2. Но последняя версия у этого документа-Это Версия3. Они не совпадают, поэтому переходим к процедуре2.
И так далее для каждого Doc_i.


 
Сергей М. ©   (2008-09-05 09:15) [4]

SELECT MAX(Версия) AS Ver, MAX(Дата печати) AS PrintDate
FROM Таблица
GROUP BY Документы
HAVING Документы = Интересующий документ AND NOT Дата печати IS NULL



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.014 c
2-1220458416
New_ser
2008-09-03 20:13
2008.10.12
Как создать БД с "координатами"?


2-1220417936
TRSteep
2008-09-03 08:58
2008.10.12
Отправка почты


15-1219226478
silver222
2008-08-20 14:01
2008.10.12
Вывод фотографий


15-1219387737
uix
2008-08-22 10:48
2008.10.12
язык программирования


2-1220506158
Denver
2008-09-04 09:29
2008.10.12
как сделать лампочку




   Наверх