Predmet:Re: Redni brojevi, kako izbjeći greÅ¡ku?
Razlog preskakanja je to sto ako pogrijesis nacin placanja pa se vratis nazad da promijenis sada ce ponovo upisati broj koji je veci ne za 1 od trenutnog.
Najbolje bi bilo staviti sve na dfault value kao sto je
Gjoreski predlozio medjutim kod tebe to nemoze koliko sam mogao zakljuciti jer ti ides redno za svaki nacin placanja zasebno pa se nemoze generisati broj prije odabira nacina placanja.
Preostaje ti da ovo svoje pokrpas:
PreuzmiIzvorni kôd (Visual Basic):Private Sub NacinPlacanjaID_AfterUpdate()
Dim I As Integer
Dim criterij As String
criterij = "NacinPlacanjaID=" & Me.Fiskal ' Number
I = DCount("[OrderID]", "tblProdaja", criterij) + 1
Select Case Me.Fiskal
Case 1 'Gotovina, fiskalni ra
un
If Me.FiskalniBroj = 0 Then
Me.FiskalniBroj = I
End If
'Me.FiskalFormat = I & "/" & DLookup("OznakaPP", "Q_Firma") & "/1"
Case Else 'Ostali na
ini plaanja
End Select
End Sub
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.