ADELIA |
|
|
|
|
(I/B) |
|
|
|
|
Warning: This instruction does not have the same effect in RPG or in C.
Section for use
All
Syntax
INFODS ViewName
INFODS LayoutCode
Description
This instruction is used to load the general characteristics of the file linked to the specified view ViewName or the layout LayoutCode; see the corresponding IBM manuals for more details on file and printer Info DS.
Accessible data for the INFODS instruction include:
the name of the file,
the name of the library in which it is located,
the name of the member,
the relative number of the record read,
etc.
In Adelia/400, this data can be personalized using the Adelia standard menu.
In C, only the relative record number can be retrieved.
Example
MANAGE_SFL 2
PRESENT CUSTOM1_VW
INFODS CUSTOM1_VW
* gets the relative record number into a hidden field
Z_RECORD_NBR = *RECORD_NBR
UPD_SFL
END_MANAGE_SFL
* 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 PAGE_BOTTOM
PRINT HEADER
END