<br />
<b>Notice</b>:  Undefined offset: 2 in <b>/home2/icentarb/public_html/icentar/classes/class.permissions.php</b> on line <b>735</b><br />
Function SifraN()
Dim DB As Database
Dim SQL As String
Dim Rs As Recordset
Dim I As String
If IsNull(DLookup("[OrderID]", "[tblProdaja]")) Then
SifraN = DatePart("yyyy", Now()) & "-" & "0001"
GoTo Kraj
End If
Set DB = CurrentDb
SQL = "SELECT Max(Right(OrderID,4)) AS BrojN " & "FROM tblProdaja"
Set Rs = DB.OpenRecordset(SQL)
If Format$(Rs.Fields(0)) <> "" The