EJECT
 Sitúa el cabezal de impresión al inicio de la página siguiente
------------------------------------------------------------------------------
 Sintaxis

     EJECT

 Descripción

     EJECT es un mandato de impresión que envía un carácter de salto de
     página (CHR(12)) a la impresora y establece los valores PCOL() y PROW()
     en cero. Si direcciona una fila de impresora menor que la última
     posición de fila desde la que se ha ejecutado EJECT o SETPRC(),
     CA-Clipper realiza automáticamente EJECT. Debido a esto, su lógica de
     impresión debe proceder secuencialmente de izquierda a derecha y hacia
     abajo en la página. Si necesita reinicializar la fila interna de la
     impresora y los valores de columna a cero sin enviar un salto de
     página, utilice SETPRC().

 Ejemplos

      En este ejemplo se imprime un informe simple y se utiliza
        EJECT para avanzar a una nueva página cuando el contador de líneas
        alcanza el número máximo de líneas de impresión por página:

        LOCAL nLinea := 99, nPagina := 0
        USE Ventas NEW
        SET PRINTER ON
        SET CONSOLE OFF
        DO WHILE !EOF()
           IF nLinea > 55
              EJECT
              ? "Página " + LTRIM(STR(++nPagina, 3))
              ? "Fecha " + CTOD(DATE())
              ?
              ? "Vendedor", "Cantidad"
              ?
              nLinea := 6
           ENDIF
           ? Ventas->Vendedor, Ventas->Cantidad
           nLinea++
           SKIP
        ENDDO
        SET PRINTER OFF
        SET CONSOLE ON
        CLOSE

 Ficheros   La biblioteca asociada es CLIPPER.LIB.

 To download this example - click here.

See Also: ISPRINTER() PCOL() PROW() SET CONSOLE SET DEVICE