|
VADELIA |
SADELIA |
WADELIA |
EADELIA |
(I/B) (C/S) |
(B) (C/S) |
(I/B) (C/S) |
(B) (C/S) |
Section for use
All
Syntax
INFODS ViewOrLoading
INFODS LayoutCode
Description
The loading type must be a native file access type.
Where this instruction is used with a view name or a loading name, you can retrieve in the reserved word *RECORD_NUMBER the number of the last read record of the file corresponding to the view or the loading.
Where it is used with an Adelia report layout name LayoutCode, you can retrieve the line and the page of the corresponding Adelia report in *CURRENT_LINE and *CURRENT_PAGE (or *LINE and *PAGE).
Example
LOADING_LST LOAD_ITEMS
PRESENT ITEM
INFODS LOAD_ITEMS
* gets the relative record number into a hidden variable
ZRECORD_NBR = *RECORD_NBR
INSERT_ELT ZITEM_LST:LIST
END_LOADING_LST
* Use of the INFODS instruction for report layout PRTSV
* in order to retrieve the number of the latest line to be printed:
PRINT DETAIL PRTSV
INFODS PRTSV
IF *CURRENT_LINE > 40
PRINT BOTTOM_PAGE
PRINT HEADER
END