Application Development with Harbour/Control Structures

Loops

WHILE

[DO] WHILE condition
    ...
    [LOOP]
    [EXIT]
END[DO]

FOR

FOR var := init_exp TO end_expr [STEP step_expr]
    ...
    [LOOP]
    [EXIT]
NEXT

FOR EACH

FOR EACH var IN collection_expr
    ...
    [HB_EnumIndex()]
    [LOOP]
    [EXIT]
NEXT

IF

IF condition
    ...
[ELSEIF condition]
    ...
[ELSE]
    ...
END[IF]

SWITCH

SWITCH condition
    CASE literal_expr
        ...
        [EXIT]
    [CASE literal_expr]
        ...
        [EXIT]
    [DEFAULT]
        ...
END

BEGIN SEQUENCE

BEGIN SEQUENCE
    ...
    [BREAK]
    [Break([expression])]
[RECOVER [USING var]]
    ...
END [SEQUENCE]