ADELIA |
VADELIA |
|
WADELIA |
EADELIA |
(I/B) |
(I/B) (C/S) |
(I/B) (C/S) |
(B) (C/S) |
Warning: In the case of ADELIA programs, this instruction is only compatible with the Adelia/400 RPG generator.
Section for use
All
Syntax
BEGIN_STD_DFL
Description
Beginning of the paragraph in which any instructions that are stored, are not retained when the data flow is generated. Any instructions placed outside the limit instructions BEGIN_STD_DFL and END_STD_DFL are kept when the data flow is generated.
Note: With ADELIA programs, this instruction is only used when the data flow is generated in SQL mode.
Example
Adelia context:
**********************
INITIALIZATION 01
**********************
INSERT_STD_B
*
BEGIN_STD_DFL
*
CHAIN_SQL HEAD_ORDER *COND(CORDER_KEY = :ZCORDER_KEY)
*
INSERT_STD HEAD_ORDER
*
INSERT_STD
*
CLEAR 1
MANAGE_SFL_SQL 1 DET_ORDER *COND(CORDER_KEY = :ZCORDER_KEY) *SORT(CORDER_KEY)
*
INSERT_STD DET_ORDER
*
INSERT_STD
*
UPD_SFL
END_MANAGE_SFL
END_STD_DFL
*
INSERT_STD_E
Visual Adelia context:
ALPHA(2) V1 |
: these lines will be retained as |
VIEW View1 *SEQ Ent1 |
: they are, even after |
: a new data flow generation |
|
* |
: |
BEGIN_STD_DFL |
: |
VIEW View2 *SEQ Ent2 |
: these lines will be deleted and |
VIEW View3 *KEY Ent3 Field1 |
: replaced when a new |
END_STD_DFL |
: data flow generation |
* |
: is requested |
: |
|
NUM_E(3,0) Field3 |
: these lines will be retained as |
NUM_P(4,0) Field4 |
: they are, even after |
: a new data flow generation |