Returns the page number of the output destination as an INTEGER value. If the output stream is not paged, PAGE-NUMBER returns a value of 0.

Syntax

PAGE-NUMBER [ ( stream | STREAM-HANDLE handle ) ]
stream
The name of an output stream. If you do not name a stream, PAGE-NUMBER returns the page number of the default unnamed output stream.
STREAM-HANDLE handle
The handle to an output stream. If handle it is not a valid handle to a stream, the AVM generates a run-time error.

Example

This procedure creates a customer report with a page number on each page:

r-pgnbr.p 

OUTPUT TO pagenum.txt PAGED.

FOR EACH Customer NO-LOCK:
  FORM HEADER "Customer report" AT 30
    "Page:" AT 60 PAGE-NUMBER FORMAT ">>9" SKIP(1).
  DISPLAY Customer.CustNum Customer.Name Customer.Address Customer.City
    Customer.State Customer.Country.
END.

See also

DEFINE STREAM statement, OUTPUT TO statement, PAGE statement, Stream object handle