| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061 |
- /* ------------------------------------------------------------------------- */
- /* 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.
|
