EJECT-Befehl

Sendet einen Seitenvorschub an den Drucker.

EJECT

Hinweise

EJECT stellt den Drucker auf den Anfang der nächsten Seite ein. EJECT sendet einen Seitenvorschub an den Drucker, wenn die Systemvariable _PADVANCE auf FORMFEED gesetzt ist. Falls _PADVANCE auf LINEFEEDS gesetzt ist, sendet EJECT Zeilenvorschübe, um an den Anfang der nächsten Seite zu wechseln.

EJECT setzt die Werte aus PCOL ( ) und PROS( ) auf die aktuelle Spalten- und Zeilenposition des Druckkopfes. EJECT hat jedoch keine Auswirkung auf den Wert der Systemvariablen _PAGENO oder _PLINENO.

Beispiel

Im folgenden Beispiel werden die Felder company und phone aus der Tabelle customer gedruckt. (Prüfen Sie, ob der Drucker für dieses Beispiel korrekt angeschlossen und eingeschaltet ist.) Ist die Anzahl der gedruckten Zeilen größer als 62, so wird ein Seitenvorschub ausgeführt.

CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'data\testdata')
USE customer  && Opens customer table

SET DEVICE TO PRINTER
SET PRINT ON
DO WHILE NOT EOF( )
   @ PROW( )+1,10 SAY 'Company: ' + company
   @ PROW( )+1,10 SAY 'Phone: ' + phone
   @ PROW( )+1,1  SAY ''
   IF PROW( ) > 62
      EJECT
   ENDIF
   SKIP
ENDDO
SET PRINT OFF
SET DEVICE TO SCREEN

Siehe auch

EJECT PAGE | ON PAGE | SET DEVICE | SET PRINTER | PCOL( ) | PROW( ) | Systemvariablen - Überblick