Главная страница
    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.46 MB
Время: 0.01 c
4-17443
Eugene
2003-01-17 18:10
2003.03.06
Определение имени пользователя из сервиса...


3-16966
line
2003-02-17 01:15
2003.03.06
Установка пароля на существующую таблицу Paradox


1-17181
Fenix
2003-02-24 08:55
2003.03.06
Глюк с TFileStream


6-17227
Kostya
2002-12-31 07:37
2003.03.06
Запрет запуска IEExplorer


8-17206
trotski
2002-11-26 06:03
2003.03.06
DirectX





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский