Open fileName For Binary Lock Read Write As #FF
         Get #FF, , podaci
Close #FF
strString=podaci.str1
call dekodiranje(strString)
strString=podaci.str2
call dekodiranje(strString)
...
itd