<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 />
Private Sub IDdokumenta_AfterUpdate()
Dim Prefix As String

Select Case Me.IDdokumenta

Case 2 ' Primka PR
Me.Skladiste_Label.Caption = "KONTO"
Prefix = "PR*"
Me.BrojDok = BrojDokumenta(Prefix)

Case 3 'Predatnica GP
Me.Skladiste_Label.Caption = "KONTO"
Prefix = "GP*"
Me.BrojDok = BrojDokumenta(Prefix)

Case 4 'Povratnica
Me.Skladiste_Label.Caption = "KONTO"
Prefix = "PO*"
Me.BrojDok = BrojDokumenta(Prefix)

Ca