/* ------------------------------------------------------------------------- */
/* Variablen, die beim Listen-Drucken benötigt werden           (LISTTITV.I) */
/* ------------------------------------------------------------------------- */
DEFINE {1} {2} VARIABLE Kopfz     AS CHARACTER FORMAT "x(210)".
DEFINE {1} {2} VARIABLE Titelz    AS CHARACTER FORMAT "x(210)".
DEFINE {1} {2} VARIABLE PPos1     AS INTEGER.
DEFINE {1} {2} VARIABLE PPos2     AS INTEGER.
DEFINE {1} {2} VARIABLE PPos3     AS INTEGER.
DEFINE {1} {2} VARIABLE PPos4     AS INTEGER.
DEFINE {1} {2} VARIABLE PPos5     AS INTEGER.
DEFINE {1} {2} VARIABLE Breite    AS INTEGER.
DEFINE {1} {2} VARIABLE aa        AS INTEGER.
DEFINE {1} {2} VARIABLE ii        AS INTEGER.
DEFINE {1} {2} VARIABLE ap        AS INTEGER.
DEFINE {1} {2} VARIABLE Zuszz     AS INTEGER   INIT 0.
DEFINE {1} {2} VARIABLE Seitxt    AS CHARACTER FORMAT "x(10)".
DEFINE {1} {2} VARIABLE Dattxt    AS CHARACTER FORMAT "x(10)".
DEFINE {1} {2} VARIABLE Zeitxt    AS CHARACTER FORMAT "x(10)".
DEFINE {1} {2} VARIABLE Firtxt    AS CHARACTER FORMAT "x(10)".
DEFINE {1} {2} VARIABLE Jahtxt    AS CHARACTER FORMAT "x(10)".
DEFINE {1} {2} VARIABLE Tittxt    AS CHARACTER FORMAT "x(50)".
DEFINE {1} {2} VARIABLE Fuell     AS CHARACTER FORMAT "x".
DEFINE {1} {2} VARIABLE Ueber1    AS CHARACTER FORMAT "x(250)".
DEFINE {1} {2} VARIABLE Ueber2    AS CHARACTER FORMAT "x(250)".
DEFINE {1} {2} VARIABLE Ueber3    AS CHARACTER FORMAT "x(250)".
DEFINE {1} {2} VARIABLE Ueber4    AS CHARACTER FORMAT "x(250)".
DEFINE {1} {2} VARIABLE Ueber5    AS CHARACTER FORMAT "x(250)".
DEFINE {1} {2} VARIABLE Uebertrag AS CHARACTER FORMAT "x(250)".
DEFINE {1} {2} VARIABLE XZeile    AS CHARACTER FORMAT "x(250)".
DEFINE {1} {2} VARIABLE XLeer     AS CHARACTER FORMAT "x" INIT "".
DEFINE {1} {2} VARIABLE Leer      AS INTEGER   INIT 1.
DEFINE {1} {2} VARIABLE TiDruck   AS LOG       INIT TRUE.
DEFINE {1} {2} VARIABLE TiGedru   AS LOG       INIT FALSE.
DEFINE {1} {2} VARIABLE DFl       AS LOG       INIT FALSE.
DEFINE {1} {2} VARIABLE LNeu      AS LOG.
DEFINE {1} {2} VARIABLE DOpen     AS LOG       INIT FALSE.
DEFINE {1} {2} VARIABLE VZNr      AS INTEGER.
DEFINE {1} {2} VARIABLE VSort     AS INTEGER   FORMAT "99" INIT 1.
DEFINE {1} {2} VARIABLE VCopy     AS INTEGER   FORMAT "99" INIT 1.
DEFINE {1} {2} VARIABLE VRand     AS INTEGER   FORMAT "99" INIT 1.
DEFINE {1} {2} VARIABLE VLine     AS INTEGER   FORMAT "99" INIT 1.
DEFINE {1} {2} VARIABLE VSeite    AS INTEGER.
DEFINE {1} {2} VARIABLE VProgWahl AS INTEGER   FORMAT "9" INIT 1.
DEFINE {1} {2} VARIABLE VAnzahl   AS INTEGER.
DEFINE {1} {2} VARIABLE VPName    AS CHARACTER.
DEFINE {1} {2} VARIABLE XDruDat   AS DATE      FORMAT "99.99.9999".
DEFINE {1} {2} VARIABLE Vcpi      AS CHARACTER FORMAT "x(30)".
DEFINE {1} {2} VARIABLE ASchname  LIKE Schrift.Schname.
DEFINE {1} {2} VARIABLE ASchbild  LIKE Schrift.Schbild.
DEFINE {1} {2} VARIABLE lPDF      AS LOG       NO-UNDO.
DEFINE {1} {2} VARIABLE cProcName AS CHARACTER NO-UNDO.

DEFINE {1} {2} STREAM In_Stream.
DEFINE {1} {2} STREAM Out_Stream.

DEFINE {1} {2} BUFFER bSteuer  FOR Steuer.
DEFINE {1} {2} BUFFER bListen  FOR Listen.
DEFINE {1} {2} BUFFER bLiDruck FOR LiDruck.
DEFINE {1} {2} BUFFER bDrucker FOR Drucker.
DEFINE {1} {2} BUFFER bSchrift FOR Schrift.