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