Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

погрешность

RAM © (2003-11-26 12:34:00)

доброго дня!
есть запрос, в первом у меня идет выборка по дате и выдает данные по районам простроченых ордеров... а второй запрос подсчитывает сколько по каждому району этих самых ордеров
цифры разбегаются ... чот я делаю не так?

Query1.close;
Query1.Sql.Clear;
Query1.Sql.Add("SELECT O."OR", K.RJ, V.NL, V.GR, O.AR, O.SK, O.SK1");
Query1.Sql.Add("FROM ORDP O, KRJ K, VR V");
Query1.Sql.Add("WHERE (O.KR = K.KR) AND (O.VR = V.VR) AND (SK < :mydata) AND (SK1 < :mydata)");
Query1.Sql.Add("ORDER BY V.GR, K.RJ, O."OR"");
mydata:=StrToDate(Edit1.Text);
Query1.ParamByName("mydata").AsDateTime:=mydata;
Query1.Open;
Query1.FetchAll;
i:=Query1.RecordCount;
label3.caption:=IntToStr(i);

и второй
Query2.close;
Query2.Sql.Clear;
Query2.Sql.Add("SELECT K.RJ, COUNT(*) AS R.OUT");
Query2.Sql.Add("FROM RAJ R, KRJ K, ORDP O");
Query2.Sql.Add("WHERE (R.KR = K.KR) AND (O.KR = K.KR) AND (SK < :mydata) AND (SK1 < :mydata)");
Query2.Sql.Add("GROUP by K.RJ");
Query2.Sql.Add("ORDER BY K.RJ");
mydata:=StrToDate(Edit1.Text);
Query2.ParamByName("mydata").AsDateTime:=mydata;
Query2.Open;

Johnmen (2003-11-26 14:27:00) [1]

Sandman25 © (26.11.03 13:20)

RAM (2003-11-26 14:01:00) [2]

в чем ошибка?

Query1.close;
Query1.Sql.Clear;
Query1.Sql.Add("SELECT O."OR", K.RJ, V.NL, V.GR, O.AR, O.SK, O.SK1");
Query1.Sql.Add("FROM ORDP O, KRJ K, VR V");
Query1.Sql.Add("WHERE (O.KR = K.KR) AND (O.VR = V.VR) AND (SK < :mydata) AND (SK1 < :mydata)");
Query1.Sql.Add("ORDER BY V.GR, K.RJ, O."OR"");
mydata:=StrToDate(Edit1.Text);
Query1.ParamByName("mydata").AsDateTime:=mydata;
Query1.Open;
Query1.FetchAll;
i:=Query1.RecordCount;
label3.caption:=IntToStr(i);

Query2.close;
Query2.Sql.Clear;
Query2.Sql.Add("SELECT K.RJ, COUNT(*) AS R.OUT");
Query2.Sql.Add("FROM RAJ R, KRJ K, ORDP O");
Query2.Sql.Add("WHERE (R.KR = K.KR) AND (O.KR = K.KR) AND (SK < :mydata) AND (SK1 < :mydata)");
Query2.Sql.Add("GROUP by K.RJ");
Query2.Sql.Add("ORDER BY K.RJ");
mydata:=StrToDate(Edit1.Text);
Query2.ParamByName("mydata").AsDateTime:=mydata;
Query2.Open;
S := 0;
while not Query2.EoF do
begin
S := S + Query2.Fields[1].AsInteger;
Query2.Next;
end;
Label2.Caption := IntToStr(S);

RAM (2003-11-26 14:01:00) [3]

в чем ошибка?

Query1.close;
Query1.Sql.Clear;
Query1.Sql.Add("SELECT O."OR", K.RJ, V.NL, V.GR, O.AR, O.SK, O.SK1");
Query1.Sql.Add("FROM ORDP O, KRJ K, VR V");
Query1.Sql.Add("WHERE (O.KR = K.KR) AND (O.VR = V.VR) AND (SK < :mydata) AND (SK1 < :mydata)");
Query1.Sql.Add("ORDER BY V.GR, K.RJ, O."OR"");
mydata:=StrToDate(Edit1.Text);
Query1.ParamByName("mydata").AsDateTime:=mydata;
Query1.Open;
Query1.FetchAll;
i:=Query1.RecordCount;
label3.caption:=IntToStr(i);

Query2.close;
Query2.Sql.Clear;
Query2.Sql.Add("SELECT K.RJ, COUNT(*) AS R.OUT");
Query2.Sql.Add("FROM RAJ R, KRJ K, ORDP O");
Query2.Sql.Add("WHERE (R.KR = K.KR) AND (O.KR = K.KR) AND (SK < :mydata) AND (SK1 < :mydata)");
Query2.Sql.Add("GROUP by K.RJ");
Query2.Sql.Add("ORDER BY K.RJ");
mydata:=StrToDate(Edit1.Text);
Query2.ParamByName("mydata").AsDateTime:=mydata;
Query2.Open;
S := 0;
while not Query2.EoF do
begin
S := S + Query2.Fields[1].AsInteger;
Query2.Next;
end;
Label2.Caption := IntToStr(S);

RAM (2003-11-26 13:49:00) [4]

оно сумирует и выдает суму сколько ордеров по каждому району у меня
но эта цифра и не совподает с цифрой первого запросаб она больше

Sandman25 (2003-11-26 13:41:00) [5]

Query2.Open;
S := 0;
while not Query2.EoF do
begin
S := S + Query2.Fields[1].AsInteger;
Query2.Next;
end;

Label2.Caption := IntToStr(S);

RAM (2003-11-26 13:38:00) [6]

помогите програмно реализовать у меня чет не выходит

RAM (2003-11-26 13:37:00) [7]

помогите програмно реализовать у меня чет не выходит

Sandman25 (2003-11-26 13:21:00) [8]

[9] RAM (26.11.03 13:18)

Понятно. Во втором select тоже нужно делать FecthAll, или в гриде скроллировать до конца.

Sandman25 (2003-11-26 13:20:00) [9]

Проверяется это так:

select count(*)
FROM ORDP O, KRJ K, VR V
where ... из первого

select count(*)
from RAJ R, KRJ K, ORDP O
where ...из второго

После сравнения уже можно будет думать, в чем ошибка.

RAM (2003-11-26 13:18:00) [10]

если записей немного то сходится.. когда увеличивается количество записей то и погрешность растет.... в чем тут дело?

RAM (2003-11-26 13:17:00) [11]

на калькуляторе!
выдает количество простроченых ордеров по районам в зависемости от даты в первом гриде, во втором гриде устраняет повторяющиеся записи и показывает сколько по каждому району этих самых ордеров ... вот я суму подбиваю, и то что у меня в лейбле 1-го запроса с этой самой сумой и не сходится

RAM (2003-11-26 13:12:00) [12]

сума районов по второму запросу больше чем в первом запросе

Sandman25 (2003-11-26 13:12:00) [13]

Покажите, как Вы считате вторую сумму.

RAM (2003-11-26 13:11:00) [14]

число первого запроса меньше второго
что мне нужно добавить чтобы правельно считало....
вернее чтобы бы были число1=числу2

Sandman25 (2003-11-26 13:04:00) [15]

[3] RAM (26.11.03 13:02)

Второй запрос тоже возвращает несколько записей. Их сумма считается правильно? Вы этот код не показали.

RAM (2003-11-26 13:02:00) [16]

2Sandman25: KRJ.KR - код района там от 1 до 14
ODPR.VR - код вида работ

2Johnmen: количество ордеров отвечающих запросу 1 которое выводится в лейбл и сума их по районам(количество ордеров по каждому району) которое выводится в R.OUТ

Johnmen (2003-11-26 12:40:00) [17]

>цифры разбегаются

Какие именно ?

Sandman25 (2003-11-26 12:39:00) [18]

1."FROM ORDP O, KRJ K, VR V"
2."FROM RAJ R, KRJ K, ORDP O"

KRJ.KR разрешает NULL?
А ODPR.VR?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »