Pocetnicko pitanje u vezi funkcije DMax()

[ aburnaby @ 06.06.2006. 10:35 ] @

Imam pocetnicko pitanje u vezi autonumber-a.
Imam dve relacije koje su u vezi 1:N. Radi se o najprostijem primeru. Imam zaglavlje Primke, dakle ZPrimka(primkaID,...) i stavke primke SPrimka(primkaID, RB,...). Primary key u ZPrimka je primkaID, koja je istovremeno Foreign key u SPrimke. SPrimke ima slozeni kljuc primkaID, RD. Potrebno mi je da kada korisnik unosi stavke u SPrimke obelezje RB se povecava za jedan. Probao sam sa autonumber, medjutim, kada otvorim novu Primku, u stavci primke RB ne pocinje od 1 vec nastavlja niz stavke prethodnog ZPrimka. Mislim da se ovo resava sa funkcijom DMax ali ne znam tacno kako? [DMax("RB","SPrimke")+1].

Unapred se zahvaljujem

[ memphis @ 06.06.2006. 22:00 ] @

Ja koristim sledecu funkciju:

Code:
Function NextClan() As Variant
   Dim lngBroj As Variant
   lngBroj = (DMax("ImePolja", "imeTabele")) + 1
   NextClan = lngBroj
End Function

Onda samo jos stavis, recimo, u OnOpen event:

Code:
Imepolja=NextClan()

Pozdrav, Vlada

[ aburnaby @ 07.06.2006. 08:29 ] @

Hvala Vlado na promptnom odgovoru.

Ne znam gde da upisem prvi, duzi deo koda koji si naveo.
Probao sam sve ali brojac ne radi. Ocigledno je da nisam upisao kod gde bi trebalo.

:))

[ memphis @ 07.06.2006. 09:48 ] @

Funkciju mozes da definises bilo gde u kodu. Recimo:

Code:
Function NextClan() As Variant
   Dim lngBroj As Variant
   lngBroj = (DMax("ImePolja", "imeTabele")) + 1
   NextClan = lngBroj
End Function

Private Sub Form_Open(Cancel As Integer)

Imepolja=NextClan()

End Sub

Ovo bi trebalo da resi problem. Ako se ne snadjes, napisi sta ti javlja, pa da resimo zajedno.
Pozdrav, Vlada

[ aburnaby @ 08.06.2006. 07:56 ] @

Hvala na odgovoru i na pomoci.
Na zalost, kod otvaranja forme dobijam prijavu o gresci:"You can't assign a value to this object"

[ BiloKoje @ 08.06.2006. 08:37 ] @

Nemože da ti popunjava polje u subformi u OnOpen Event-u, jer nisi popunio podatke u glavnoj formi. Drugo kako je napisan cod dobio bi uvek najveći broj stavke a ne najveći za tu primku. Pogledaj temu -Jednostavna baza za ordinaciju-kako vam se cini i da li nesto treba izmeniti?

[ memphis @ 10.06.2006. 20:55 ] @

Ajde okaci tu svoju bazu. Samo je zipuj, molim te.
Pozdrav :)

[ aburnaby @ 12.06.2006. 07:49 ] @

Saljem "bazu"

[ BiloKoje @ 12.06.2006. 09:32 ] @

Ako je u pitanju samo numeracija stavki, pogledaj ovo što sam uradio. Promenio sam i Join Type među tabelama. U tabelama ti polja primarnog ključa nisu Required=Yes itd.

[ aburnaby @ 13.06.2006. 07:54 ] @

Citat:

BiloKoje: Ako je u pitanju samo numeracija stavki, pogledaj ovo što sam uradio. Promenio sam i Join Type među tabelama. U tabelama ti polja primarnog ključa nisu Required=Yes itd.

Sjajno. Upravo sam to trazio. Zasto si menjao JOIN TYPE? Izabrao si prvu opciju.

Hvala na trudu i pomoci.

[ BiloKoje @ 14.06.2006. 05:59 ] @

Citat:

aburnaby: Zasto si menjao JOIN TYPE? Izabrao si prvu opciju.

Mislim da si primer okačio da bi rešili pitanje numeracije i da to svakako nije konačna baza. Sigurno imaš više polja u tabelama, a i više tabela.

Pošto su tabele povezane preko polja primarnog ključa i nije dozvoljen unos u tabelu Sprimke ako ne postoji odgovarajući zapis u tabeli Zprimke u suštini radi isto. Opciju da prikazuje sve podatke iz jedne tabele i samo odgovarajuće iz druge koristim ponekad u upitima, najčešće da bi otkrio koji mi podaci nedostaju. Recimo kada imam dve nepovezane tabele pa želim da ih povežem. Prvo u upitu proverim da li je moguće povezivanje a da postoji referencijalni integritet.