Мы с Вами уже рассмотрели основные типы данных FoxPro, получили начальные сведения по работе с таблицами и научились использовать условия. Теперь для того, чтобы написать нечто простенькое осталось узнать немного о циклах.

Циклы позволяют выполнять одну или несколько строк кода заданное число раз. Вот структуры FoxPro, отвечающие за это:

SCAN ... ENDSCAN
FOR ... ENDFOR
DO WHILE ... ENDDO

Для человека знакомого с программированием не составит никакого труда из одного только названия понять, как работают FOR и DO WHILE. А что же такое SCAN? SCAN пробегает по всем (или заданным) записям в таблице. Мы сами можем промоделировать его работу следующим примером:

use tariff
	nRecCount = reccount() 	&&Количество записей
	for i = 1 to nRecCount
		goto i 		&&Идем к i-й записи
		if tro=0
			display &&Печатаем строку
		endif
	endfor
use

Но вариант со SCAN гораздо проще:

use tariff
	scan for tro=0
		display
	endscan
use

Вот, пожалуй, и все.