Returns a fixed binary integer that gives the current page number in the specified file.
Syntax
PAGENO(x)
Parameters
x is a file value that identifies a file control block.
Description
The PAGENO function returns an integer that gives the current page number in the file control block identified by
x.
The precision of the result is Fixed Binary(15) unless the
-bifprec compiler option overrides it.
If
x does not identify an open file control block with the PRINT attribute, the program is in error. This implementation of PL/I
may not diagnose all violations of this restriction.
For a description of the PAGENO function's use as a pseudovariable, see the section
Assignment in the chapter
Statements.
Examples
DECLARE X FILE;
.
.
.
CURRENT = PAGENO(X); /* GET CURRENT PAGE # */
Description
The PAGENO function returns an integer that gives the current page number in the file control block identified by x.
The precision of the result is Fixed Binary(15) unless the -bifprec compiler option overrides it.
If x does not identify an open file control block with the PRINT attribute, the program is in error. This implementation of PL/I may not diagnose all violations of this restriction.
For a description of the PAGENO function's use as a pseudovariable, see the section Assignment in the chapter Statements.