Samo da se ogradim. Kolega sabacc je lepo rekao: "Imam pacijenta i za njega vezane posete (veza između tabela je jedan prema više- jedan pacijent ima više poseta)." http://www.elitesecurity.org/t374236-Dva-poslednja-datuma
Predpostavljam da kad je rekao "Uspevam da nađem poslednju max([DatumPosete])", da je našao za traženog pacijenta. Ja odavde ne vidim njegov izvor podataka dok ga ne zakači. Predloženi SQL iskaz, koji sam mu dao, treba da primeni nad izfiltriranim podacima za traženog pacijenta.

@Getsbi: nista lose nema u iskazu koji si dao, nisam mislio da kritikujem, izvinjavam se ako je tako izgledalo. A iskaz je odradio posao - poslao ga je u pravom smeru. stavise, za praksu, ideja sa pre-filtrovanjem pa koriscenje jednostavnijeg iskaza je mnogo bolja nego generalno resenje, iz prostog razloga sto je generalno resenje prilicno komplikovano i sporo na duzi rok.

Kad zavrsimo mozgalicu, voleo bih da se vratimo resenju kojeje pristeklo iz tvog kverija, jer je to u stvari prava stvar. Mozgalica je vise da pobamo da pisemo komplikovane kverije . Resenje koje je proizislo iz vase razmene poruka jeste ono sto ja zovem 'inzenjersko resenje za praksu'.

Mozgalica ce nam dati teorijsko resenje, na nivou gimnazijske fizike. Fizika nas uci da telo koje slobodno pada ubrzava sve dok ne udari u zemlju. U praksi, telo koje bacimo sa velike visine ubrzava dok ne dostigne ok 20 m/s i onda pada konstantnom brzinom, zbog uticaja trenaj i otpora vazduha, koje fizika zanemaruje, ali inzenjerska praksa uzima u obzir.

@ Zidar
Ma sve je Ok. Ja sam više za brzo i efikasno. "Prženje" mozga mi slabo ide.

Ziodar, zan8imljiva mozgalica, moram priznati.

Sa programskim kodom je to jednostavno uraditi, i mislim da to svi znamo, ali sa samo jednim upitom još nisam uspio, ali pokušati ću jer me baš živo zanima :-)

By the way, kada ovo riješimo, imam ja jednu mozgalicu (doduše, lakšu) ali mislim da će biti zanimljiva...

@ captPicard : samo napred, i resenje sa kodom se broji, nije bas da 'svi znamo'. Nekolicina pokusava i resava mozgalice, ali mnogo vise ljudi posmatra i uci. Znaci, sva resenja su dobrodosla. Resenje s jednim kverijem je verovatno neprirodno, ne uzbudjuj se oko toga. Daj programski kod, i/ili resenje sa nekoliko kverija, sve je to dobro.

Sto se tice mozgalice, slobodno je postavi. Nema pisanih pravila koje zabranjuje postavljanje mozgalica. Nepisana pravila o mozaglicama su 1. svako moze da postavi mozgalicu, ako su drzi pravila koja slede
2. postavlajc mozgalice mora da zna resenje
3. ako dva dana po postavjanju mozgalice nema resenja, posatvljac ce postaviti svoje
4. postavljac treba da obezbedi ulazne objekte i podatke (tabele popunjene podacima)

Oni koji odgovaraju treba da se drze ovih pravila:
1. svi imaju pravo da ogovaraju na mozgalice i komentarisu rezultate
2. ko postavi odgovor, mora da ga proveri pre toga
3. mogu se dati i delimicna resenja i ideje, na primer 'zamislio sam ovako i stigao dovde, a dalje ne znam'

:-)

Query:Prezadnji
SELECT Tbl_alias.Pacijent, Tbl_alias.DatumPregleda
FROM tblPregledi AS Tbl_alias
GROUP BY Tbl_alias.Pacijent, Tbl_alias.DatumPregleda
HAVING (((Tbl_alias.DatumPregleda) Not In (SELECT Last (DatumPregleda) as D From tblPregledi GROUP BY tblPregledi.Pacijent)));


Query:Zadnji
SELECT tblPregledi.Pacijent, Last(Prezadni.DatumPregleda) AS PrezadnjI, Last(tblPregledi.DatumPregleda) AS Zadnji
FROM tblPregledi INNER JOIN Prezadni ON tblPregledi.Pacijent = Prezadni.Pacijent
GROUP BY tblPregledi.Pacijent;

Ne stignem sada pisati kod, ali ovako:

q1. select distinct pacijent from tblPregled

i onda u petlji

while not q1.eof do

select top 2 datumpregleda from tblpregled where pacijent = :pacijent

q1.next

Nadam se da kužite šta želim reći :-)

Ovo radi. Svaka ti čast na ideji, nisam se toga sjetio!!!!

E sad ovo je u 2 Query-a a moze se napraviti i u jedan.
Sacekat cu malo mozda ko odgovori ako ne postavit cu.

@Zonic: od majstora majstorsko resenje. Svaka cast.

Mozda se moze malo pojednostaviti - qry predzadnji - probao sam bez GROUP BY i radi OK.

U qryZadnji, ipak bih umesto LAST stavio MAX. LAST je specificno Accesova funkcija, drugi SQL jezici to nemaju. I u Accesu, nije sigurno sta ce LAST da vrati u svim slucajevima. U ovom slucaju LAST izgleda da razume LAST DAtum, sto je isto sto i MAX datum, ali moglo je biti i LAST record umesto LAST datum.

U svakom slucaju, dobar posao

Stavi sve u jedan query, da imamo i to.

Posto niko nije htio, evo i drugo rjesenje.
SELECT tbl_alias.Pacijent, tbl_alias.DatumPregleda
FROM tblPregledi AS tbl_alias
WHERE ((((select count( DatumPregleda) from tblpregledi
Where Tbl_alias.pacijent=tblPregledi.pacijent and Tbl_alias.DatumPregleda<tblpregledi.DatumPregleda))<2))
ORDER BY tbl_alias.Pacijent, tbl_alias.DatumPregleda;

Bravo za majstora!


Primetite da je ovaj kveri sustinski razlicit od prvog resenja. Prvo resenje daje tacno dva poslednja datuma, kao sto je zadatak i trazio. I ovo resenje daje dva poldednja datuma. Medjutim, moze i vise od dva.

Evo formatirana verzija, sa jednom izmenom - sada vraca 3 poslednja rekorda.



Jos jednom, bravo.

Kao sto pravila nalazu, postavljac pitanaj mora da prilozi i svoje resenje. Evo. Moje resenje se zasniva na numerisanju postojecih redova i zatim izabiranjem onih redova koje zelimo da pokazemo.

Prvo s enapravi ovakav kveri:

qryRedosledPregleda_BrziNacin


ONda mogu da radim ovo:


Sad iz toga biram kog hocu pacijenta, a mogu i da promenim broj ako zelim.

Moglo je i u jednom kveriju, ali nije toliko pregledno i jasno sta se to desava:

Ako se udubite u ovaj poslednji kveri, videcete da je u sustini slicno onome sto je naopravio Zonic.

Moj kveri se zasniva na numeraciji redova. Sam postupak numeraciej moze biti od koristi i u drugim situacijama. Na priemr, zelite da imate tacno 20 redova po starni reporta. Numerisite redove u kveriju koji je DataSource za report, zatim odredite Starnice = int(Redosled/20) i date za reort da GROUPING bude po polju Stranica....

Posto je numerisanje korisna stvar,e vo jos jedan nacin za numerisanje - qryRedosledPregleda_JosjedanNacin

Ovaj poslednji nacin je obicno sporiji od prvog nacina, ali u nekim situacijama, na SQL serveru moze biti i brzi. Neka ga za svaki slucaj.


Ima li jos resenja, pitanj ili komentara? Mozgalice su u principu uvek otvorene.