Printing page

version 3

Printing page Number

Printing page returns the printing page number. It can be used only when you are printing with PRINT SELECTION or the Print menu in the User environment.

The following example changes the position of the page numbers on a report so that the report can be reproduced in a double-sided format. The form for the report has two variables that display page numbers. A variable in the lower-left corner (vLeftPageNum) will print the even page numbers. A variable in the lower-right corner (vRightPageNum) will print the odd page numbers. The example tests for even pages, then clears and sets the appropriate variables:

   Case of
      : (Form event=On Printing Footer)
         If ((Printing page % 2) = 0)   ` Modulo is 0, it is an even page 
            vLeftPageNum:=String(Printing page)   ` Set the left page number 
            vRightPageNum:=""   ` Clear the right page number 
         Else   ` Otherwise it is an odd page
            vLeftPageNum:="" ` Clear the left page number
            vRightPageNum:=String (Printing page)   ` Set the right page number 
         End if
   End case

PRINT SELECTION.