Форма с описанием логической таблицы. Выход из цикла Назад В начало Вперед
.form blo1
.create view ex1_1 as select departments.*  from
departments(departments0);
.var
  temp:integer
.endvar
.fields
  departments.name
.endfields
		отделы
	----------
  наименование отдела
.{table "ex1_1:main" by
departments.name
   @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
.begin
  temp:=temp+1;
  if temp=2 then
	blo1.fbreak;
end.
  !exe!
.}
.fields temp .endfields
всего  ^
.endform