LINENO Function

Purpose

Returns a Fixed Binary integer that gives the line number of an open file control block with the specified PRINT attribute.

Syntax

LINENO(x)

Parameters

x is a file value representing a file control block.

Description

The LINENO function returns an integer that gives the line number of an open file control block identified by x.

The precision of the result is Fixed Binary(15).

x must identify an open file control block with the PRINT attribute.

Examples

DECLARE X FILE;
   .
   .
   .
CURRENT = LINENO(X);  /* GET CORRECT LINE # */

Restrictions

None.