ADELIA |
|
|
|
|
(I) |
|
|
|
|
Section for use
INITIALIZATION, VERIFICATION, VALIDATION
Syntax
QUIT_SFL
Description
This instruction allows one to quit immediately the MANAGE_SFL/END_MANAGE_SFL block.
It must be placed between the MANAGE_SFL and END_MANAGE_SFL instructions.
In the INITIALIZATION block, when this instruction is executed, the loading of the subfile from the guide file is interrupted.
In the VERIFICATION block, when this instruction is executed, the current subfile line may be updated and the subfile reading is interrupted.
In the VALIDATION block, when this instruction is executed, the subfile reading is interrupted.
After you have exited the subfile management loop, the instructions placed after END_MANAGE_SFL are executed.
Example
**********************
INITIALIZATION 02
**********************
MANAGE_SFL 2
IF COMPANY_CODE <= COMPANY_SELECT
PRESENT CUSTOMERS
UPD_SFL
ELSE
QUIT_SFL
END
END_MANAGE_SFL
*********************
VERIFICATION 02
*********************
MANAGE_SFL 2
IF OPTION = '2'
CALL UPDATE_CUSTOMER Z_CUST_CODE RETURN_CODE
OPTION = *BLANK
IF RETURN_CODE = '1'
QUIT_SFL
END
END
END_MANAGE_SFL
See also the list of 4GL instructions by topic