PAGENO Function

Purpose

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 # */

Restrictions

None.