Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2003.03.06;
Скачать: [xml.tar.bz2];

Вниз

Посчитать сумму столбца   Найти похожие ветки 

 
Антон.   (2003-02-14 09:40) [0]

Есть таблица с фильтром, каждый раз при использовании филльтра нужно указывать сумму по оставшимся записям, делаю так
procedure TdmBase.dsPostAfterOpen(DataSet: TDataSet);
begin
with dsSumm do
begin
Params.ParamByName("F_num_kvit").Value:=dsPost.Params.ParamByName("F_num_kvit").Value;
Params.ParamByName("F_name_prod").Value:=dsPost.Params.ParamByName("F_name_prod").Value;
Params.ParamByName("F_num_razn").Value:=dsPost.Params.ParamByName("F_num_razn").Value;
Params.ParamByName("F_num_post").Value:=dsPost.Params.ParamByName("F_num_post").Value;
Params.ParamByName("F_weight").Value:=dsPost.Params.ParamByName("F_weight").Value;
Params.ParamByName("F_num_trail").Value:=dsPost.Params.ParamByName("F_num_trail").Value;
Params.ParamByName("Id_post").Value:=dsPost.Params.ParamByName("Id_post").Value;
Params.ParamByName("Id_razn").Value:=dsPost.Params.ParamByName("Id_razn").Value;
Params.ParamByName("Id_razn_poz").Value:=dsPost.Params.ParamByName("Id_razn_poz").Value;
dsSumm.Active;
// SummVes:=
end;
end;

CommandText dsSumm
select /*+rule*/

sum(WEIGHT),

from CHANGE.KVIT_WITH_SHIP
where
REC_STATUS = 0 and
(
upper(NUM_KVIT) like upper(:F_num_kvit) or
upper(NAME_PROD) like upper(:F_name_prod) or
upper(NUM_RAZN) like upper(:F_num_razn) or
upper(NUM_POST) like upper(:F_num_post) or
upper(WEIGHT) like upper(:F_weight) or
upper(NUM_TRAIL) like upper(:F_num_trail)
)
and IS_EXP = nvl(:Id_post,IS_EXP)
and NUM_RAZN = nvl(upper(trim(:Id_razn)),upper(trim(NUM_RAZN)))
and POZ_RAZN = nvl(upper(trim(:Id_razn_poz)),upper(trim(POZ_RAZN)))

как мне вытащить потом это поле


 
Johnmen   (2003-02-14 09:59) [1]

Короче и яснее, если сможешь...


 
Sergey13   (2003-02-14 10:02) [2]

Удобная штука для суммирования по датасету есть в EhLib.
http://www.farpost.com/personal/dmitryb/RUS/default.htm
SumList вроде называется. Или прямо в ихнем гриде можно итоги подбивать.

Слушай, а у тебя что, все поля в строках хранятся? И сколько времени этот запрос работает? Странная таблица какая то.


 
Антон.   (2003-02-14 11:56) [3]

Sergey13 © (14.02.03 10:02)
Нужно написать свое

Johnmen © (14.02.03 09:59)
На событие AfterOpen исходного датасета вешаю копирование параметров фильтра и подставляю свой command text с суммированием а как вытащить результат не понимаю


 
Johnmen   (2003-02-14 12:07) [4]

Откуда вытащить ?


 
Антон.   (2003-02-14 12:14) [5]

из dsSumm


 
Антон.   (2003-02-14 12:19) [6]

У меня получилось, спасибо


 
Johnmen   (2003-02-14 12:22) [7]

М-дя... А как ты вообще работаешь с наборами данных ???????
Как считать значение поля из текущей записи НД ??????
По-моему, надо бы поизучать книжки, доки и т.п.
:)))))


 
Антон.   (2003-02-14 13:13) [8]

А что такое набор данных?


 
Anatoly Podgoretsky   (2003-02-14 13:21) [9]

Ну тебе же сказали где про это хорошо разжевано, в книжках



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

Форум: "Базы";
Текущий архив: 2003.03.06;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.57 MB
Время: 0.039 c
4-17451
Cheboor
2003-01-19 10:45
2003.03.06
Как отследить запуск другого приложения?


7-17400
Ruf
2003-01-06 12:18
2003.03.06
Поверх всех окон


1-17078
swamp
2003-02-25 17:42
2003.03.06
Увеличить на год


7-17425
ShadowFromXZone
2003-01-07 00:37
2003.03.06
Ребята вот какой возник вопрос.... Надо запретить только копирова


14-17309
LameroZZ
2003-02-14 23:57
2003.03.06
!!!!! ini-файлы & реестр !!!!!





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский