globvar.i 4.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101
  1. /* ---------------------------------------------------------------------- */
  2. /* Allgemeine Variablen */
  3. /* ---------------------------------------------------------------------- */
  4. DEF {1} {2} {3} VAR KurzName AS CHAR FORMAT "x(20)".
  5. DEF {1} {2} {3} VAR Progname AS CHAR FORMAT "x(12)".
  6. DEF {1} {2} {3} VAR Passwort AS CHAR FORMAT "x(12)".
  7. DEF {1} {2} {3} VAR Linktext AS CHAR FORMAT "x(100)".
  8. DEF {1} {2} {3} VAR Linknr AS INT FORMAT "zzzzzzzz9".
  9. DEF {1} {2} {3} VAR Linkcd AS INT.
  10. DEF {1} {2} {3} VAR Drufl AS LOG.
  11. DEF {1} {2} {3} VAR NumFlag AS LOG.
  12. DEF {1} {2} {3} VAR Gefunden AS LOG.
  13. DEF {1} {2} {3} VAR LVSuchbe AS CHAR.
  14. DEF {1} {2} {3} VAR FDialog AS LOG.
  15. DEF {1} {2} {3} VAR GVMeprog AS CHAR FORMAT "x(12)".
  16. DEF {1} {2} {3} VAR GVTeBe AS INT.
  17. DEF {1} {2} {3} VAR GVFirma AS CHAR FORMAT "x(08)".
  18. DEF {1} {2} {3} VAR StFirma AS CHAR FORMAT "x(08)".
  19. DEF {1} {2} {3} VAR AdFirma AS CHAR FORMAT "x(08)".
  20. DEF {1} {2} {3} VAR FBFirma AS CHAR FORMAT "x(08)".
  21. DEF {1} {2} {3} VAR GVJahr AS INT FORMAT "9999".
  22. DEF {1} {2} {3} VAR GVLkz AS CHAR.
  23. DEF {1} {2} {3} VAR GVSprcd AS INT.
  24. DEF {1} {2} {3} VAR GVAnrcd AS INT.
  25. DEF {1} {2} {3} VAR GVSKey AS CHAR FORMAT "x(40)".
  26. DEF {1} {2} {3} VAR GVSbkb AS CHAR.
  27. DEF {1} {2} {3} VAR GVSabe AS CHAR.
  28. DEF {1} {2} {3} VAR GVPwmas AS LOG.
  29. DEF {1} {2} {3} VAR GVPFRow AS INT.
  30. DEF {1} {2} {3} VAR GVFL AS INT.
  31. DEF {1} {2} {3} VAR GVBELL AS INT.
  32. DEF {1} {2} {3} VAR GVAppl AS LOG EXTENT 10 INIT FALSE.
  33. DEF {1} {2} {3} VAR JFlag AS LOG INIT FALSE.
  34. DEF {1} {2} {3} VAR FFlag AS LOG INIT FALSE.
  35. DEF {1} {2} {3} VAR FBFl AS LOG INIT FALSE.
  36. DEF {1} {2} {3} VAR Ja AS LOG FORMAT "1/0".
  37. DEF {1} {2} {3} VAR ix AS INT.
  38. DEF {1} {2} {3} VAR i1 AS INT.
  39. DEF {1} {2} {3} VAR i2 AS INT.
  40. DEF {1} {2} {3} VAR i3 AS INT.
  41. DEF {1} {2} {3} VAR i4 AS INT.
  42. DEF {1} {2} {3} VAR i5 AS INT.
  43. DEF {1} {2} {3} VAR Vorgabe AS INT.
  44. DEF {1} {2} {3} VAR Auswahl AS INT.
  45. DEF {1} {2} {3} VAR FFolder AS LOG EXTENT 10 INIT TRUE.
  46. DEF VAR VPwa LIKE Passw.Pwa.
  47. DEF VAR VPwe LIKE Passw.Pwe.
  48. DEF VAR VPwm LIKE Passw.Pwm.
  49. DEF VAR VPwl LIKE Passw.Pwl.
  50. DEF VAR VPwx AS LOG.
  51. DEF {1} {2} {3} VAR VTrnr AS INT.
  52. DEF {1} {2} {3} VAR VRecZaehl AS INT.
  53. DEF {1} {2} {3} VAR VRecZFlag AS LOG.
  54. DEF {1} {2} {3} VAR Helptext AS CHAR FORMAT "x(70)" EXTENT 20.
  55. DEF {1} {2} {3} VAR Fehler AS CHAR FORMAT "x(80)".
  56. DEF {1} {2} {3} VAR Rundbetr AS DEC FORMAT "zzzzzzzzzzzz9.9999-" DECIMALS 4.
  57. DEF {1} {2} {3} VAR Rundmenge AS DEC FORMAT "zzzzzz9.99-".
  58. DEF {1} {2} {3} VAR Rundcode AS INT FORMAT "9".
  59. DEF {1} {2} {3} VAR Rundrab AS DEC FORMAT "99.99".
  60. DEF {1} {2} {3} VAR VBasis AS DEC FORMAT "zzzzzzzzzzzz9.9999-" DECIMALS 4.
  61. DEF {1} {2} {3} VAR VWertn AS DEC FORMAT "zzzzzzzzzzzz9.9999-" DECIMALS 4.
  62. DEF {1} {2} {3} VAR VAbw% AS DEC FORMAT "zzz9.99-".
  63. DEF {1} {2} {3} VAR VDatForm AS CHAR FORMAT "x(10)" INIT "99.99.9999".
  64. DEF {1} {2} {3} VAR FwLkz AS CHAR.
  65. DEF {1} {2} {3} VAR FwSprcd AS INT.
  66. DEF {1} {2} {3} VAR FwAnrcd AS INT.
  67. DEF {1} {2} {3} VAR LKY AS INT.
  68. DEF {1} {2} {3} VAR LVFirma AS CHAR FORMAT "x(08)".
  69. DEF {1} {2} {3} VAR LVRecart AS CHAR FORMAT "x(04)".
  70. DEF {1} {2} {3} VAR LVTitel AS CHAR FORMAT "x(20)".
  71. DEF {1} {2} {3} VAR LVCodeC AS CHAR.
  72. DEF {1} {2} {3} VAR LVCodeI AS INT.
  73. DEF {1} {2} {3} VAR LVSpra AS INT.
  74. DEF {1} {2} {3} VAR LVSort AS INT.
  75. DEF {1} {2} {3} VAR LVAktion AS INT.
  76. DEF {1} {2} {3} VAR LVPage AS INT.
  77. DEF {1} {2} {3} VAR LVLIRid AS RECID.
  78. DEF {1} {2} {3} VAR LVLDRid AS RECID.
  79. DEF {1} {2} {3} VAR LVRecid AS RECID.
  80. DEF {1} {2} {3} VAR LVSRecid AS RECID EXTENT 40.
  81. DEF {1} {2} {3} VAR LVLanr AS INT.
  82. DEF {1} {2} {3} VAR LVLkz AS CHAR.
  83. DEF {1} {2} {3} VAR LVPlz AS CHAR.
  84. DEF {1} {2} {3} VAR LVSprcd AS INT.
  85. DEF {1} {2} {3} VAR LVAnrcd AS INT.
  86. DEF {1} {2} {3} VAR LVKnr AS INT.
  87. DEF {1} {2} {3} VAR LVFrw AS CHAR.
  88. DEF {1} {2} {3} VAR LVProg AS CHAR FORMAT "x(12)".
  89. DEF {1} {2} {3} VAR LVDat AS DATE FORMAT "99.99.9999".
  90. DEF {1} {2} {3} VAR LVAdx LIKE Adresse.Anschrift.
  91. DEF {1} {2} {3} VAR LVAdy LIKE Adresse.Anschrift.
  92. DEF {1} {2} {3} VAR LVKto AS CHAR FORMAT "x(12)".
  93. DEF {1} {2} {3} VAR LVKopieNr AS INT.
  94. DEF {1} {2} {3} VAR LVBesnr AS INT.
  95. DEF {1} {2} {3} VAR LVLnr AS INT.