debst.i 3.6 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768
  1. /* 29/08/18 workfile definition for table Debst */
  2. /* {1} = "", "NEW" or "NEW SHARED" */
  3. /* {2} = "" or "NO-UNDO" */
  4. DEFINE {1} WORK-TABLE wdebst {2} /* LIKE Debst */
  5. FIELD ABC_Grp AS INTEGER FORMAT "99"
  6. FIELD Abh_Rab_Art AS INTEGER FORMAT "9"
  7. FIELD Abh_Rab_Wert AS DECIMAL DECIMALS 4 FORMAT "->>9.9999"
  8. FIELD Ablad_Vor AS INTEGER FORMAT "99"
  9. FIELD Ablad_Vor_Text AS CHARACTER FORMAT "x(100)"
  10. FIELD AKonto AS DECIMAL DECIMALS 2 FORMAT "zzz,zzz,zz9.99-"
  11. FIELD Aktiv AS LOGICAL FORMAT "J/N" INITIAL TRUE
  12. FIELD Auf_Rab_Art AS INTEGER FORMAT "9"
  13. FIELD Auf_Rab_Wert AS DECIMAL DECIMALS 4 FORMAT "->>9.9999"
  14. FIELD Auf_Text AS CHARACTER FORMAT "x(500)"
  15. FIELD Avis AS INTEGER FORMAT "99"
  16. FIELD Bar_Text AS CHARACTER FORMAT "x(500)"
  17. FIELD Bemerk AS CHARACTER FORMAT "x(500)"
  18. FIELD BESR_Art AS INTEGER FORMAT "99"
  19. FIELD Bier_Cd AS INTEGER FORMAT "99"
  20. FIELD Bonus_Grp AS INTEGER FORMAT "99"
  21. FIELD esAktiv AS LOGICAL
  22. FIELD esBenutzer AS CHARACTER FORMAT "x(30)"
  23. FIELD esMail AS CHARACTER FORMAT "x(40)"
  24. FIELD esPasswort AS CHARACTER FORMAT "x(30)"
  25. FIELD Fak_Art AS INTEGER FORMAT "99"
  26. FIELD Fak_FTnr AS INTEGER FORMAT "99"
  27. FIELD Fak_KTnr AS INTEGER FORMAT "99"
  28. FIELD Filiale AS INTEGER FORMAT "99"
  29. FIELD Firma AS CHARACTER FORMAT "X(8)" LABEL "Mandant"
  30. FIELD FRW AS CHARACTER FORMAT "x(03)"
  31. FIELD Geb_Rg AS LOGICAL FORMAT "J/N" INITIAL TRUE
  32. FIELD Knr AS INTEGER FORMAT "999999" LABEL "Nummer"
  33. FIELD KnrFak AS INTEGER FORMAT "999999"
  34. FIELD KnrLie AS INTEGER FORMAT "zzzzzz9" LABEL "Nummer"
  35. FIELD Kond AS INTEGER FORMAT "99"
  36. FIELD Konto AS CHARACTER FORMAT "x(12)"
  37. FIELD Kred_Lim AS INTEGER FORMAT "zzz,zzz,zz9"
  38. FIELD Kred_Lim_Vers AS INTEGER FORMAT "zzz,zz9"
  39. FIELD Ku_Grp AS INTEGER FORMAT "99"
  40. FIELD Lager AS INTEGER FORMAT "99"
  41. FIELD LetztVK AS DATE FORMAT "99.99.9999"
  42. FIELD Lief_Art AS INTEGER FORMAT "99"
  43. FIELD Lief_Bed AS INTEGER FORMAT "99"
  44. FIELD Mahn AS INTEGER FORMAT "9"
  45. FIELD MWSt AS INTEGER FORMAT "9"
  46. FIELD MWST_Nr AS CHARACTER FORMAT "x(15)"
  47. FIELD Passant AS LOGICAL FORMAT "J/N"
  48. FIELD Preis_Grp AS INTEGER FORMAT "99"
  49. FIELD Rab_Grp AS INTEGER FORMAT "99"
  50. FIELD Region AS INTEGER FORMAT "99"
  51. FIELD Saldo AS DECIMAL DECIMALS 2 FORMAT "z,zzz,zz9.99-"
  52. FIELD Saldo_FRW AS DECIMAL DECIMALS 2 FORMAT "zzz,zzz,zz9.99-"
  53. FIELD Skonto AS DECIMAL DECIMALS 2 FORMAT "zzz,zzz,zz9.99-"
  54. FIELD Subverband_Grp AS INTEGER FORMAT "99"
  55. FIELD Tour_Nr1 AS INTEGER FORMAT "99"
  56. FIELD Tour_Nr2 AS CHARACTER FORMAT "x(20)"
  57. FIELD Verband_Grp AS INTEGER FORMAT "99"
  58. FIELD Verband_Nr AS CHARACTER FORMAT "x(08)"
  59. FIELD Vertr AS INTEGER FORMAT "999"
  60. FIELD Wirt_So AS INTEGER FORMAT "99"
  61. FIELD Wirt_So_Text AS CHARACTER FORMAT "x(100)"
  62. FIELD Zei_Rab_Art AS INTEGER FORMAT "9"
  63. FIELD Zei_Rab_Wert AS DECIMAL DECIMALS 4 FORMAT "->>9.9999"
  64. FIELD Zuschl_Art AS INTEGER FORMAT "9"
  65. FIELD Zuschl_Betr AS DECIMAL DECIMALS 4 FORMAT "zzz,zz9.9999-"
  66. FIELD Zuschl_Verr AS DECIMAL DECIMALS 4 FORMAT "zzz,zz9.9999-"
  67. FIELD Zuschl_Wert AS DECIMAL DECIMALS 4 FORMAT "->>9.9999".