SQL DISTINCT naredba master/details

Pozdrav !!!

Delphi 7


Radi se o master/details tabela sa SQL naredbama -
Spajanje details tabele sa master tabele.


Pitanje ?

Kako jemoguce uraditi DISTINCT polja npr. "BrojRac" u dole navedenom kodu.U dole kodu mi se pojavljuje vise puta jedan te isti broj racuna i iznos i sve ostala.Znam zbog cega je sve ovo,jer detail tabele je spojena preko kljuceva itd.

Negativni rezulatat dobijem:

Broj racuna, Operator,Iznos,SumPDV
*****************************
222 Medin 100 1,23..
111 Medin 200 2,23
234 Medin 300 2,34
222 Medin 100 1,23..
222 Medin 100 1,23..
222 Medin 100 1,23..
222 Medin 100 1,23..
222 Medin 100 1,23..

************************************

Zelim da dobijem rezultat :

Broj racuna, Operator,Iznos,SumPDV
*****************************
222 Medin 100 1,23..
234 Medin 300 2,34
111 Medin 200 2,23
****************************

Kod uzima sve podatke iz mster/details po operateru za period


// Postavlje trenutnog datumna u DatumOd - DatumDo
DatumOd.Date := Now;
DatumDo.Date := now;

QUpit.SQL.Clear;
QUpit.SQL.Add('select * from RacunP r join StavkeRacuna s on r.BrojRac = S.ID where (Datum between "'+DateToStr(DatumOd.Date)+'" and "'+DateToStr(DatumDo.Date)+'" and Operator = "'+frmGlavna.StatusBar1.Panels[3].Text+'")');
QUpit.Open;
LBroj.Caption := inttostr(QUpit.RecordCount);

Nadam se da sam pojasnio problem ?



Hvala svima na ponudjenim odgovorima !!!

Da li si probao sa klauzulom GROUP BY!?!

Potpis

Someone's sitting in the shade today because someone planted a tree a long time ago.

Da li si probao sa 'select DISTINCT BrRac, Operator, Iznos, SumPDV....' ?

Ovako ti je najlakše:

Potpis

Someone's sitting in the shade today because someone planted a tree a long time ago.

Ovako je najkrace :)

I najlakše... ;)

BTW, predložio sam GROUP BY jer nisam dovoljno pažljivo pročitao zahtev, izvinjavam se zbog toga.

Potpis

Someone's sitting in the shade today because someone planted a tree a long time ago.

Hvala Vam puno na prakticnom primjeru !!!


Nesto sam uradio sa kodom npr:
i radi prilicno dobro

// Postavlje trenutnog datumna u DatumOd - DatumDo
DatumOd.Date := Now;
DatumDo.Date := now;

QUpit.SQL.Clear;
QUpit.SQL.Add('select DISTINCT BrojRac,Operator,TB,TBNaziv,Kolicina,preracPDV,Cijena,SumPDV,BezPDV,IznosSUM from RacunP r join StavkeRacuna s on r.BrojRac = S.ID where (Datum between "'+DateToStr(DatumOd.Date)+'" and "'+DateToStr(DatumDo.Date)+'" and Operator = "'+frmGlavna.StatusBar1.Panels[3].Text+'")');
QUpit.Open;

// Drugi upit samo iznos oepratora,sumPDV,bezPDV
QUpit1.SQL.Clear;
QUpit1.SQL.add('select Operator,Sum(IznosSUM) as IznosSUM,SUM(SumPDVr) as sumPDVr,SUM(sumbezPDVr) as sumbezPDVr from RacunP.dbf r join StavkeRacuna s on r.BrojRac = S.ID where (Datum between "'+DateToStr(DatumOd.Date)+'" and "'+DateToStr(DatumDo.Date)+'" and Operator = "'+frmGlavna.StatusBar1.Panels[3].Text+'") GROUP BY Operator');
QUpit1.Open;
LBroj.Caption := inttostr(QUpit.RecordCount);
IzvjOperator.Preview;

Ovo zna da bude veoma problematično ako datum na klijentskoj mašini nije dobro podešen.

Najbolje datum pokupiti direktno iz SQL-a.

Potpis

viking ®

Ok hvala ti na savjetu,vec sam dobio odgovor vezano za dodjeljivanje datuma SQL upitu

Dobio si savet kako da proslediš datum kao parametar. I to je ok.

Ono o čemu je pričam je da ako ti treba trenutno vreme ili datum to pokupiš od servera, a ne sa klijentske mašine. Za firebird se za to koriste CURRENT_TIMESTAMP, CURRENT_TIME i CURRENT_DATE. Pogledaj dokumentaciju za svoj server kako se to radi tamo.

Potpis

viking ®