ADELIA |
VADELIA |
|
|
|
(B) |
(B) |
|
|
|
Section for use
All
Syntax
CHANGE_PAGE ReportLayout
ReportLayout |
Þ |
ReportLayout | None |
Description
This instruction marks the beginning of the section of the processing which is executed whenever the program detects the line of the page capacity overflow in the layout ReportLayout being printed.
The layout code ReportLayout is optional. If not used, the system considers the layout to be that having the same name as the model.
The layout code is necessary for printing more than one layout in the same prototype (maximum limit: 8 layouts per prototype).
A section that starts with CHANGE_PAGE must end with END_PROCESSING.
Example
* Batch program to print orders per customer (break on customer code)
READ ORDER
DO_WHILE ORDER EXISTS
PROCESS_BRK CUSTOMER_BK
CUSTOMER_AMOUNT = CUSTOMER_AMOUNT + LINE_AMOUNT
PRINT_VIEWS ORDER_LINE
READ ORDER
PROCESS_TOTAL CUSTOMER_BK
REDO
*
* Heading procedure
*
BREAK_PROCEDURE CUSTOMER_BK
CHAIN CUSTOMERS
PRINT_VIEWS CUSTOMER_FMT
CUSTOMER_AMOUNT = 0
END_PROCESSING
*
* Total procedure
*
TOTAL_PROCEDURE CUSTOMER_BK
PRINT TOTAL_CUST
END_PROCESSING
*
* Change-page procedure (overflow)
*
CHANGE_PAGE
PRINT CUSTOMER_FMT
END_PROCESSING