ADELIA |
|
|
|
|
(I) |
Section for use
All
Syntax
INITIALIZE TransactionNum
Description
This instruction calls the initialization section for a transaction identified by its number TransactionNum.
Note: There can be several INITIALIZE instructions for a single INITIALIZATION instruction.
Example
IF *F06
* create an order
MODE = 'CREATE'
INITIALIZE 02
EXECUTE 02
END
*
MANAGE_SFL 1
IF OPTION = '2'
MODE = 'UPDATE'
INITIALIZE 02
EXECUTE 02
OPTION = *BLANK
END
END_MANAGE_SFL
*
**********************
INITIALIZATION 02
**********************
CHAIN ORDERS
PRESENT ORDERS
CHAIN PAYMENTS
PRESENT PAYMENTS
*
MANAGE_SFL 2
* loading all order lines in subfile 2
PRESENT ORDER_LINES
ZORDER_DATE = &DATE6_FORMAT('YMD';'MDY';ZORDER_DATE)
UPD_SFL
END_MANAGE_SFL
*
* Note: this INITIALIZATION section is either called when pressing F6
* or when option is '2'