Осуществляет выход из цикла DO WHILE, FOR или SCAN.

Синтаксис:

EXIT

Комментарии:
Команда EXIT передает управление из цикла DO WHILE ... ENDDO, FOR ... ENDFOR или SCAN ... ENDSCAN команде, непосредственно следующей за оператором ENDDO, ENDFOR или ENDSCAN.

Пример:

* В следующем примере в цикле DO WHILE подсчитывается объем
* наличного запаса продуктов стоимостью свыше 20 долларов. Выход из
* цикла DO WHILE производится по достижении конца файла (EOF), при
* этом на экран выводится итоговая сумма.

CLOSE DATABASES
OPEN DATABASE (HOME( ) + 'samples\data\testdata')
USE products  && Opens Products table
SET TALK OFF
gnStockTot = 0

DO WHILE .T.	  You can place comments here!
	IF EOF( )
		EXIT
	ENDIF
	IF unit_price < 20
		SKIP
		LOOP
	ENDIF
	gnStockTot = gnStockTot + in_stock
	SKIP
ENDDO  Or you can place comments here!

CLEAR
? 'Total items in stock valued over 20 dollars:'
?? gnStockTot