The LINAGE clause specifies the depth of a logical page in terms of number of lines. Optionally, it also specifies the line number at which the footing area begins, as well as the top and bottom margins of the logical page. (The logical page and the physical page don't necessarily have to be of the same size.)
The LINAGE clause can be specified only for files assigned to the device PRINTER. See ASSIGN Clause.
printer files offer a number of powerful features through DDS that can be used to advantage. Such files are declared in ILE COBOL programs as FORMATFILE. For more information on printer files, see the DB2 Universal Database for AS/400 section of the Database and File Systems category in the iSeries Information Center at this Web site - http://www.ibm.com/eserver/iseries/infocenter.
LINAGE Clause - Format
>>-LINAGE--+----+--+-data-name-3-+--+-------+------------------->
'-IS-' '-integer-8---' '-LINES-'
>--+-----------------------------------------+------------------>
'-+------+-FOOTING-+----+-+-data-name-4-+-'
'-WITH-' '-AT-' '-integer-9---'
>--+-----------------------------------------+------------------>
'-+-------+--+----+--TOP--+-data-name-5-+-'
'-LINES-' '-AT-' '-integer-10--'
>--+--------------------------------------------+--------------><
'-+-------+--+----+--BOTTOM--+-data-name-6-+-'
'-LINES-' '-AT-' '-integer-11--'
The LINAGE clause does not affect the number of lines in the selected device file; it only affects the logical page mechanism within the COBOL program.
At execution time, the printer file being used determines the physical page size. This information is used to issue appropriate space and eject commands to produce the logical page as defined in the LINAGE clause. Thus, the logical page can contain multiple physical pages, or one physical page can contain multiple logical pages.
All integers must be unsigned. All data-names must be described as unsigned integer data items.
Figure 5 illustrates the use of each phrase of the LINAGE clause.
Related Information:
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.