| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101 |
- /* ---------------------------------------------------------------------- */
- /* Allgemeine Variablen */
- /* ---------------------------------------------------------------------- */
- DEF {1} {2} {3} VAR KurzName AS CHAR FORMAT "x(20)".
- DEF {1} {2} {3} VAR Progname AS CHAR FORMAT "x(12)".
- DEF {1} {2} {3} VAR Passwort AS CHAR FORMAT "x(12)".
- DEF {1} {2} {3} VAR Linktext AS CHAR FORMAT "x(100)".
- DEF {1} {2} {3} VAR Linknr AS INT FORMAT "zzzzzzzz9".
- DEF {1} {2} {3} VAR Linkcd AS INT.
- DEF {1} {2} {3} VAR Drufl AS LOG.
- DEF {1} {2} {3} VAR NumFlag AS LOG.
- DEF {1} {2} {3} VAR Gefunden AS LOG.
- DEF {1} {2} {3} VAR LVSuchbe AS CHAR.
- DEF {1} {2} {3} VAR FDialog AS LOG.
- DEF {1} {2} {3} VAR GVMeprog AS CHAR FORMAT "x(12)".
- DEF {1} {2} {3} VAR GVTeBe AS INT.
- DEF {1} {2} {3} VAR GVFirma AS CHAR FORMAT "x(08)".
- DEF {1} {2} {3} VAR StFirma AS CHAR FORMAT "x(08)".
- DEF {1} {2} {3} VAR AdFirma AS CHAR FORMAT "x(08)".
- DEF {1} {2} {3} VAR FBFirma AS CHAR FORMAT "x(08)".
- DEF {1} {2} {3} VAR GVJahr AS INT FORMAT "9999".
- DEF {1} {2} {3} VAR GVLkz AS CHAR.
- DEF {1} {2} {3} VAR GVSprcd AS INT.
- DEF {1} {2} {3} VAR GVAnrcd AS INT.
- DEF {1} {2} {3} VAR GVSKey AS CHAR FORMAT "x(40)".
- DEF {1} {2} {3} VAR GVSbkb AS CHAR.
- DEF {1} {2} {3} VAR GVSabe AS CHAR.
- DEF {1} {2} {3} VAR GVPwmas AS LOG.
- DEF {1} {2} {3} VAR GVPFRow AS INT.
- DEF {1} {2} {3} VAR GVFL AS INT.
- DEF {1} {2} {3} VAR GVBELL AS INT.
- DEF {1} {2} {3} VAR GVAppl AS LOG EXTENT 10 INIT FALSE.
- DEF {1} {2} {3} VAR JFlag AS LOG INIT FALSE.
- DEF {1} {2} {3} VAR FFlag AS LOG INIT FALSE.
- DEF {1} {2} {3} VAR FBFl AS LOG INIT FALSE.
- DEF {1} {2} {3} VAR Ja AS LOG FORMAT "1/0".
- DEF {1} {2} {3} VAR ix AS INT.
- DEF {1} {2} {3} VAR i1 AS INT.
- DEF {1} {2} {3} VAR i2 AS INT.
- DEF {1} {2} {3} VAR i3 AS INT.
- DEF {1} {2} {3} VAR i4 AS INT.
- DEF {1} {2} {3} VAR i5 AS INT.
- DEF {1} {2} {3} VAR Vorgabe AS INT.
- DEF {1} {2} {3} VAR Auswahl AS INT.
- DEF {1} {2} {3} VAR FFolder AS LOG EXTENT 10 INIT TRUE.
- DEF VAR VPwa LIKE Passw.Pwa.
- DEF VAR VPwe LIKE Passw.Pwe.
- DEF VAR VPwm LIKE Passw.Pwm.
- DEF VAR VPwl LIKE Passw.Pwl.
- DEF VAR VPwx AS LOG.
- DEF {1} {2} {3} VAR VTrnr AS INT.
- DEF {1} {2} {3} VAR VRecZaehl AS INT.
- DEF {1} {2} {3} VAR VRecZFlag AS LOG.
- DEF {1} {2} {3} VAR Helptext AS CHAR FORMAT "x(70)" EXTENT 20.
- DEF {1} {2} {3} VAR Fehler AS CHAR FORMAT "x(80)".
- DEF {1} {2} {3} VAR Rundbetr AS DEC FORMAT "zzzzzzzzzzzz9.9999-" DECIMALS 4.
- DEF {1} {2} {3} VAR Rundmenge AS DEC FORMAT "zzzzzz9.99-".
- DEF {1} {2} {3} VAR Rundcode AS INT FORMAT "9".
- DEF {1} {2} {3} VAR Rundrab AS DEC FORMAT "99.99".
- DEF {1} {2} {3} VAR VBasis AS DEC FORMAT "zzzzzzzzzzzz9.9999-" DECIMALS 4.
- DEF {1} {2} {3} VAR VWertn AS DEC FORMAT "zzzzzzzzzzzz9.9999-" DECIMALS 4.
- DEF {1} {2} {3} VAR VAbw% AS DEC FORMAT "zzz9.99-".
- DEF {1} {2} {3} VAR VDatForm AS CHAR FORMAT "x(10)" INIT "99.99.9999".
- DEF {1} {2} {3} VAR FwLkz AS CHAR.
- DEF {1} {2} {3} VAR FwSprcd AS INT.
- DEF {1} {2} {3} VAR FwAnrcd AS INT.
- DEF {1} {2} {3} VAR LKY AS INT.
- DEF {1} {2} {3} VAR LVFirma AS CHAR FORMAT "x(08)".
- DEF {1} {2} {3} VAR LVRecart AS CHAR FORMAT "x(04)".
- DEF {1} {2} {3} VAR LVTitel AS CHAR FORMAT "x(20)".
- DEF {1} {2} {3} VAR LVCodeC AS CHAR.
- DEF {1} {2} {3} VAR LVCodeI AS INT.
- DEF {1} {2} {3} VAR LVSpra AS INT.
- DEF {1} {2} {3} VAR LVSort AS INT.
- DEF {1} {2} {3} VAR LVAktion AS INT.
- DEF {1} {2} {3} VAR LVPage AS INT.
- DEF {1} {2} {3} VAR LVLIRid AS RECID.
- DEF {1} {2} {3} VAR LVLDRid AS RECID.
- DEF {1} {2} {3} VAR LVRecid AS RECID.
- DEF {1} {2} {3} VAR LVSRecid AS RECID EXTENT 40.
- DEF {1} {2} {3} VAR LVLanr AS INT.
- DEF {1} {2} {3} VAR LVLkz AS CHAR.
- DEF {1} {2} {3} VAR LVPlz AS CHAR.
- DEF {1} {2} {3} VAR LVSprcd AS INT.
- DEF {1} {2} {3} VAR LVAnrcd AS INT.
- DEF {1} {2} {3} VAR LVKnr AS INT.
- DEF {1} {2} {3} VAR LVFrw AS CHAR.
- DEF {1} {2} {3} VAR LVProg AS CHAR FORMAT "x(12)".
- DEF {1} {2} {3} VAR LVDat AS DATE FORMAT "99.99.9999".
- DEF {1} {2} {3} VAR LVAdx LIKE Adresse.Anschrift.
- DEF {1} {2} {3} VAR LVAdy LIKE Adresse.Anschrift.
- DEF {1} {2} {3} VAR LVKto AS CHAR FORMAT "x(12)".
- DEF {1} {2} {3} VAR LVKopieNr AS INT.
- DEF {1} {2} {3} VAR LVBesnr AS INT.
- DEF {1} {2} {3} VAR LVLnr AS INT.
|