надо поработать с массивами в цикле, соответственно, перед началом нового цикла надо очистить массив от старых значений.
= "" не срабатывает,т.к. потом идет загрузка массива:
$kol_strok = TFCOUNT("__spisok.txt")
FOR ($nom_str=1, $nom_str < $kol_strok+1)
TFReadArr($tek_work_file, $f_arr) // здесь загрузка по циклу в массив
FOR ($v=0, $v < ARRSIZE($f_arr))
IF ($V > 2) // первые 3 строки здесь не нужны
$v_arr = INT(STRCUT($f_arr[$v], 1, 5)) // вот здесь вылет идет на 2м шаге цикла, т.к. ниже =""
// print("$v_arr=", $v_arr)
ARRPUSH($f_reg, $v_arr)
END_IF
END_CYC
$f_arr = ""
$f_reg = ""
// stop("стоп по прерыванию цикла")
END_CYC