PAGE-SIZE function

PAGE-SIZE function

Returns the page size (lines per page) of an output destination as an INTEGER value. If the output stream is not paged, PAGE-SIZE returns a value of 0.

Syntax
PAGE-SIZE [ ( stream | STREAM-HANDLE handle ) ] 
stream

The name of an output stream. If you do not name a stream, PAGE-SIZE returns the page size 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 prints a customer report categorized by state. At the end of each state category, it tests to see if there are at least four lines left on the page. The LINE-COUNTER function returns the current line number of output. If that number plus four is greater than the total number of lines on the page (returned by the PAGE-SIZE function), then the procedure skips to a new page. If there are four or more lines left, the procedure skips a line before printing the next customer record.
r-pgsize.p
OUTPUT TO PRINTER. 
FOR EACH Customer NO-LOCK BREAK BY Customer.State: 
  DISPLAY Customer.CustNum Customer.Name Customer.Address Customer.City 
    Customer.State. 
  IF LAST-OF(Customer.State) THEN DO: 
    IF LINE-COUNTER + 4 > PAGE-SIZE THEN PAGE. 
    ELSE DOWN 1. 
  END. 
END. 
See also

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

PAGE-SIZE [ ( `stream` \| STREAM-HANDLE `handle` ) ]

r-pgsize.p
OUTPUT TO PRINTER. FOR EACH Customer NO-LOCK BREAK BY Customer.State: DISPLAY Customer.CustNum Customer.Name Customer.Address Customer.City Customer.State. IF LAST-OF(Customer.State) THEN DO: IF LINE-COUNTER + 4 > PAGE-SIZE THEN PAGE. ELSE DOWN 1. END. END.

OpenEdge Release 10.2B