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


EXECUTE (statement selection structure)


EXECUTE expression
statement 1
statement 2
[BEGIN
statements
.]
statement n
.

expression Числовое выражение, или переменная, содержащая численное значение.
statement 1 Одиночный оператор, выполняемый только, если expression=1.
statement 2 Одиночный оператор, выполняемый только, если expression=2.
BEGIN BEGIN отмечает начало структуры, содержащей
одну или больше строк кода. Структура BEGIN рассматривается как одиночный оператор в структуре EXECUTE. Структура BEGIN завершается точкой или оператором END.
statement n Одиночный оператор, выполняемый только, если expression=n.

Структура EXECUTE выбирает одиночный исполняемый оператор (или их набор в виде структуры) на основании значения expression. Если expression равно 1, выполняется первый оператор (statement 1). Если expression равно 2, то второй (statement 2) и т.д. Если значение expression - ноль или больше, чем общее число операторов и/или структур внутри структуры EXECUTE, то EXECUTE игнорируется.
Струтуры EXECUTE могут быть вложены в другие исполняемые структуры и другие исполняемые структуры (IF, CASE, LOOP, EXECUTE и BEGIN) могут быть вложены в EXECUTE.
Пример:
EXECUTE Transact !Evaluate Transact
ADD(Customer) !Execute if Transact = 1
PUT(Customer) !Execute if Transact = 2
DELETE(Customer) !Execute if Transact = 3
. !End execute
EXECUTE CHOICEO !Evaluate CHOICEO function
OrderPart !Execute if CHOICEO = 1
BEGIN !Execute if CHOICEO = 2
SavVendor" = Vendor
UpdVendor
IF Vendor <> SavVendor"
Mem:Message = 'VENDOR NAME CHANGED'
. .
CASE VendorType !Execute if CHOICE() = 3
OF 1
UpdPartNo1
OF 2
UpdPartNo2
.
RETURN !Execute if CHOICEO - 4
. !End execute
См. также:



- Начало -  - Назад -  - Вперед -



Книжный магазин