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.
|