HoReLagerNullStellung.p 1.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748
  1. /*------------------------------------------------------------------------
  2. File : HoReLagerNullStellung.p
  3. Purpose :
  4. Syntax :
  5. Description :
  6. Author(s) : walter.riechsteiner
  7. Created : Thu Jul 08 22:08:42 CEST 2021
  8. Notes :
  9. ----------------------------------------------------------------------*/
  10. /* *************************** Definitions ************************** */
  11. /* ******************** Preprocessor Definitions ******************** */
  12. /* *************************** Main Block *************************** */
  13. DISABLE TRIGGERS FOR LOAD OF HoReLager.
  14. OUTPUT TO 'HoReLager.d' NO-MAP NO-CONVERT.
  15. FOR EACH HoReLager
  16. WHERE HoReLager.Firma = '1000'
  17. AND HoReLager.Lager = 0
  18. AND HoReLager.Art = 2:
  19. EXPORT HoReLager.
  20. ASSIGN
  21. HoReLager.Artnr = 0
  22. HoReLager.Inhalt = 0
  23. HoReLager.Jahr = 0
  24. HoReLager.Beschreibung = ''
  25. HoReLager.Bestand = 0
  26. HoReLager.Eingang = ?
  27. HoReLager.iStatus = 0
  28. HoReLager.Knr = 0
  29. HoReLager.Lotnummer = ''
  30. HoReLager.PalettNr = 0
  31. HoReLager.ProdNummer = ''
  32. HoReLager.Verfall = ?
  33. .
  34. END.
  35. OUTPUT CLOSE.