ADELIA |
|
|
|
|
(I) |
|
|
|
|
Section for use
INITIALIZATION
Syntax
ADD_SFL
Description
This instruction enables the pre-loading of fields when lines are added to a subfile defined in add mode. By default, the fields are pre-set to blank (alphanumeric fields) or zero (numeric fields).
This instruction is placed after the MANAGE_SFL/ END_MANAGE_SFL block of the subfile.
Only lines of comments can exist between END_MANAGE_SFL and ADD_SFL.
Example
LAST_NUMBER = 0
MANAGE_SFL 1
PRESENT ORDER_LINES
LAST_NUMBER = ORDER_LINE_NBR
UPD_SFL
END_MANAGE_SFL
*
* Load the line numbers and dates for additional entries
* Z_LINE_NUMBER is a subfile field
*
ADD_SFL
LAST_NUMBER = LAST_NUMBER + 1
Z_LINE_NUMBER = LAST_NUMBER
Z_DATE = *DATE
END_ADD_SFL
See also the list of 4GL instructions by topic