Private Sub Uvoz_Click()
Me.frmIzlazSub.SetFocus
UnosStavki Me.IDTransakcije, Me.BrDokumenta
Me.frmIzlazSub.Requery
End Sub