Документация по Clarion

       

END (Завершить структуру)


END
END завершает описание данных или составной выполнимый оператор. Функционально эквивалентен точке (.)
Пример:
Customer FILE,DRIVER('Clarion') !Описание файла
RECORD ! начать описание записи
Name STRING(20)
Number LONG
END ! конец описания записи
END !конец описания файла
CODE
IF Number <> SavNumber !начало структуры if
DO GetNumber
END !конец структуры if
CASE Action !начало структуры case
OF 1
DO AddRec
OF 2
DO ChgRec
OF 3
DO DelRec
END !конец структуры case



Содержание раздела