Centar za edukaciju-BiH



#1 05.02.2013 09:41
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Generiranje broja dokumenta
Koristim slijedeću funkciju za generiranje broja dokumenta koji treba biti u obliki
1/SK20/1 ili 1/SK25/1
znači za različiti prefiks prvi lijevi broj se povečava za 1
1/SK20/1
2/SK20/1
3/SK20/1
i
1/SK25/1
2/SK25/1
itd.
Ovo radi u redu dok prvi broj ne postane dvocifren.
U dijelu SELECT Max(Left([OrderID],1)) pokušao sam umjesto 1 staviti nešto kao InStr([OrderID],"/") ali me ne sluša.
PreuzmiIzvorni kôd (vbnet):
  1. Function BrojRac(Prefix As String)
  2. Dim db As Database
  3. Dim SQL As String
  4. Dim rs As Recordset
  5. Dim i As Integer
  6.  
  7. Set db = CurrentDb
  8.  
  9. SQL = "SELECT Max(Left([OrderID],1)) FROM tblProdaja WHERE Mid(OrderID,3,4)= '" & Prefix & "'"
  10.  
  11. Set rs = db.OpenRecordset(SQL)
  12.  
  13. If Format$(rs.Fields(0)) <> "" Then
  14. i = Val(rs.Fields(0))
  15. End If
  16. i = i + 1
  17. BrojRac = i & "/" & Prefix & "/1"
  18.  
  19. rs.Close
  20. Set db = Nothing
  21. End Function


Prilozi:
Informacije o tipu datoteke za:rar  PrimjerRacun.rar
Preuzimanja:355
Velicina datoteke:885.72 KB


Pozdrav
↑  ↓

#2 05.02.2013 13:15
dex Van mreze
Super Moderator
Registrovan od:23.02.2012
Postovi:625


Predmet:Re: Generiranje broja dokumenta
Evo ovako.
U Query1 dao sam i postupno i ugnjezdeno kako se dolazi do broja
Mozda bi ovo trebalo prevesti u VB da bi se izbacio Query1, probacu veceras.
Pozdrav Cool
↑  ↓

#3 05.02.2013 13:18
dex Van mreze
Super Moderator
Registrovan od:23.02.2012
Postovi:625


Predmet:Re: Generiranje broja dokumenta
Problem sa uploadom, pokusavam...
↑  ↓

#4 05.02.2013 17:35
dex Van mreze
Super Moderator
Registrovan od:23.02.2012
Postovi:625


Predmet:Re: Generiranje broja dokumenta
Onda svakako obrisi poruku, imas moderatorska ovlascenja.
Evo primera

Prilozi:
Informacije o tipu datoteke za:zip  PrimjerRacunDex2.zip
Preuzimanja:361
Velicina datoteke:1.08 MB

Ovaj post je ureden 1 puta. Posljednja izmjena 05.02.2013 17:36 od strane dexxxl. ↑  ↓

#5 05.02.2013 17:40
dex Van mreze
Super Moderator
Registrovan od:23.02.2012
Postovi:625


Predmet:Re: Generiranje broja dokumenta
Jos jedno resenje

Prilozi:
Informacije o tipu datoteke za:zip  PrimjerRacunDex3.zip
Preuzimanja:376
Velicina datoteke:1.08 MB

↑  ↓

#6 05.02.2013 18:44
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re: Generiranje broja dokumenta
Odlična rijeÅ¡enja, naročito ovo drugo. Hvala na trudu.
Pozdrav
↑  ↓

#7 08.02.2013 22:41
denoza Van mreze
Clan
Registrovan od:03.08.2011
Postovi:12


Predmet:Re: Generiranje broja dokumenta
U svakom slučaju, u primjeru broj 3. kada se obriÅ¡e jedan record, javlja se greÅ¡ka pri kreiranju novog na istom skladiÅ¡tu, dok u drugom primjeru se ne javlja greÅ¡ka.
Pitanje je da li će se na nivou aplikacije dozvoljavati brisanje nekog dokumenta ili ne...

Dex, hvala na ovim elegantnim primjerima!
↑  ↓

#8 09.02.2013 16:18
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re: Generiranje broja dokumenta
Ja u svojoj bazi ne briÅ¡em rekorde več u tablici imam jedno numeričko polje u koje po defaultu ide broj 1 i onda ako ga treba "brisati" u to polje se upiÅ¡e 0 pa onda neki query vuče kao aktivne samo one sa brojem 1.
Pozdrav
↑  ↓

Stranice (1):1


Sva vremena su GMT +01:00. Trenutno vrijeme: 11: 59 pm.