Case 1      'Gotovina, fiskalni racun
    Me.FiskalniBroj = I
    Me.FiskalFormat = I & "/" & DLookup("OznakaPP", "Q_Firma") & "/1"
[i][b]Me.FiskalniBroj.Locked = True ' zakljuca se combo box [/b][/i]
End If
Case Else   'Ostali nacini placanja