[es] - Autonumber + posebno brojanje polja prema indeksu

miomirm
Miomir Mihajlovic
Kumanovo

Član broj: 43765
Poruke: 28
217.16.77.*

Profil

Autonumber + posebno brojanje polja prema indeksu

^{08.01.2005. u 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,

Miso

^{08.01.2005. u 02:13}

miomirm
Miomir Mihajlovic
Kumanovo

Član broj: 43765
Poruke: 28
217.16.77.*

Profil

Re: Autonumber + posebno brojanje polja prema indeksu

^{10.01.2005. u 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?

Miso

^{10.01.2005. u 14:06}

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 2036
*.eqao.com.

Profil

Re: Autonumber + posebno brojanje polja prema indeksu

^{10.01.2005. u 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)

:-)

^{10.01.2005. u 15:50}

miomirm
Miomir Mihajlovic
Kumanovo

Član broj: 43765
Poruke: 28
217.16.77.*

Profil

Re: Autonumber + posebno brojanje polja prema indeksu

^{10.01.2005. u 16:39}

Hvala Zidar,

Lepo objasnjeno i jos bolje funkcionise!

Pozdrav,

Miso

Miso

^{10.01.2005. u 16:39}

miomirm
Miomir Mihajlovic
Kumanovo

Član broj: 43765
Poruke: 28
217.16.77.*

Profil

Re: Autonumber + posebno brojanje polja prema indeksu

^{27.02.2005. u 12:24}

A sta da stavim na Previous i Next dugme ?

Miso

^{27.02.2005. u 12:24}

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 2036
*.eqao.com.

Profil

Re: Autonumber + posebno brojanje polja prema indeksu

^{28.02.2005. u 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?

:-)

^{28.02.2005. u 13:39}

miomirm
Miomir Mihajlovic
Kumanovo

Član broj: 43765
Poruke: 28
217.16.77.*

Profil

Re: Autonumber + posebno brojanje polja prema indeksu

^{28.02.2005. u 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

Miso

^{28.02.2005. u 18:31}

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 2036
*.eqao.com.

Profil

Re: Autonumber + posebno brojanje polja prema indeksu

^{28.02.2005. u 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.

^{28.02.2005. u 22:22}

miomirm
Miomir Mihajlovic
Kumanovo

Član broj: 43765
Poruke: 28
217.16.77.*

Profil

Re: Autonumber + posebno brojanje polja prema indeksu

^{28.02.2005. u 23:16}

Tako jednostavno !

Hvala ti puno !

Miso

^{28.02.2005. u 23:16}

7DaDo7

Član broj: 47388
Poruke: 17
*.vodatel.hr.

Profil

Re: Autonumber + posebno brojanje polja prema indeksu

^{06.12.2005. u 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

^{06.12.2005. u 16:40}