[ miomirm @ 08.01.2005. 02:13 ] @
Polje Autonumber u tabeli Racuni vrsi svoj posao.Medjutim ,
zelim da posebna kolona "Rbroj" u istoj tabeli daje broj polja u zavisnosti od Indeksa:
1 (faktura), 2 (prijemnica), 3 (otpremnica) i drugih formi.
Postavio sam funkciju :

Function NextClan() As Long
Dim lngBroj As Long
lngBroj = 1 + Nz(DMax("Broj", "Racuni"), 0)
NextClan = lngBroj
End Function

I na otvaranje forme (na primer faktura):

DoCmd.GoToRecord , , acNewRec
Me.Broj = NextClan

Kako da povezem polje Indeks , tako da pri otvaranju odredjene forme
na primer faktura - Indeks=1)dobijem maksimalni redni broj za tu formu , a ne kao sad, maksimalni broj uopste. Tako bi sledeca faktura bila i brojcano sledeca, iako sam u medjuvremeno imao i nekoliko prijemnica.
Hvala,
[ miomirm @ 10.01.2005. 14:06 ] @
Pozdrav,

Da li nisam bio dovoljno jasan ?
Kolona Rbroj u tabeli Racuni treba da sadrzi redni broj faktura od 1 do ...., redni broj ispratnica od 1 do ...,i tako dalje u zavisnosti od forme za unos.
Na pr. imam 60 ispratnica, 10 faktura, ako otvorim novu fakturu DMAX bi dao broj 61, znaci mora da ima uslov- konkretno polje indeks koje je za fakturu 1, za prijem 2 i td.
Znaci nesto kao Selektiraj NextClan na osnovu datog indeksa.
Pomoc?
[ Zidar @ 10.01.2005. 15:50 ] @
Prepravi tvoju funkciju tako da joj saljes Indeks (1,2,3), ovako
Code:

Function NextClan(intIndex) As Long
'intIndex je 1,2,3 avisno sa koje forme se poziva
Dim lngBroj As Long
lngBroj = 1 + Nz(DMax("Broj", "Racuni","Index=" & intIndex), 0)
NextClan = lngBroj
End Function

Onda kd pozivas funkciju, na primer sa forme frmFakture, kazes ovako:
Code:

DoCmd.GoToRecord , , acNewRec
Me.Broj = NextClan(1)

Sa forme frmOtpremnica kazes
[/code]
Onda kd pozivas funkciju, na primer sa forme frmFakture, kazes ovako:
Code:

DoCmd.GoToRecord , , acNewRec
Me.Broj = NextClan(3)


:-)

[ miomirm @ 10.01.2005. 16:39 ] @
Hvala Zidar,

Lepo objasnjeno i jos bolje funkcionise!

Pozdrav,

Miso
[ miomirm @ 27.02.2005. 12:24 ] @
A sta da stavim na Previous i Next dugme ?
[ Zidar @ 28.02.2005. 13:39 ] @
Ne znam kako ti je zamisljen proces dodavanja rekorda i kretanja kroz raekordset.

Previous dugme te vraca na prethodni rekord, pa ti racunanje novog broja ne treba.

Next dugme te vodi na sledeci rekord. Sad, ako je taj sledeci rekord u stvari novi rekord, trebalo bi da se pozove funkcija i da dodeli novi broj. Medjutim, ja to ne bih radio. neka ostane da se novi rekord kreira onda i samo onda kada se klikne new Record dugme.

A sta ce ti Next/Previous dugmad uopste? To sto ih Microsoft stavlja svuda, ne znaci da to tako i treba raditi. Kome u praksi treba Next/previous rekord?

:-)
[ miomirm @ 28.02.2005. 18:31 ] @
Stvar je jednostavna.
Posto imam razlicite forme (kasa, prijem, faktura itd,), funkcija next clan mi
sa uslovom index dodeljuje novi broj za svaku formu.
Ali kad se vracam nazad sa previous ili idem napred na neki rekord sa next
nemam uslov index , i sa bilo koje forme se otvaraju isti rekordi.
Na pr. na formi faktura , odem na prethodni rekord da ga vidim, a vidim rekord prijema robe.
Znaci uslov koji smo postavili za novi broj, tj new record sa uslovom index,
slicno treba da se postavi i za previous i next dugme-kad sam u odredjenoj formi
i kliknem previous, da mi da prethodni rekord te forme , tj. prethodni broj.
Hvala
[ Zidar @ 28.02.2005. 22:22 ] @
Ti u stvari hoces da kad si na fromi fakture da se vide samo fakture, da ti Previous ne pokazuje nesto sto nije faktura, nego bas prethodnu fakturu. Za to treba da podesis record source za forme - dodaj
WHERE Index=sta vec odgovara svakoj formi.
Ne diraj kod na dugmadima.
[ miomirm @ 28.02.2005. 23:16 ] @
Tako jednostavno !

Hvala ti puno !
[ 7DaDo7 @ 06.12.2005. 16:40 ] @
Zidar/miomirm
molim vas da mi, ako imate, uploadate neki primjer sa bazom koja koristi kreiranje rednog broja fakture, prijemnice otpremnice - razradjivano u ovom threadu. Takodjer molim pojasnjenje vezano za Previous i Next dugme.
Pocetnik sam u Accessu, a treba mi ovakvo rjesenje.
Hvala