Используемые внутри подпрограммы имена должны быть описаны в списке локальных переменных, в данном случае, переменную цикла For i следует внести в список описания локальных переменных:
