Function poziv()
Dim Brrac As String
Brrac = Broj_Racuna("c:\Tring\stampatifiskalniracun.11.xml")
MsgBox "BF je: " & Brrac
End Function