home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / Database / MAXONTWIST-2.DMS / in.adf / Relationen / KUNDE.Alle_Kunden.R < prev    next >
Encoding:
Twist Report script  |  1992-09-02  |  922 b   |  40 lines
  1. REPORT KUNDE.DB
  2. NAME Alle_Kunden
  3. OUTPUT Window
  4. SORT PLZ UP,SieEr UP,KUNDE UP
  5. PAGE LAYOUT [1,"",1,10,"",660,0,10,600,50,750,2,1,0,0,1,30,"","Page #",0,2]
  6. HEADER,1
  7. TEXT "Alle Heizer-Kunden am",6,0,21
  8. CALC Heute,TEXT,"DateStr(today(),\"\")",28,0,9
  9.  
  10. BEFORE REPORT,3
  11. TEXT "Report sortiert nach aufsteigenden PLZs",12,0,39
  12.  
  13. BEFORE [2] PLZ,1
  14. TEXT "PLZ:",9,0,4
  15. FIELD PLZ,13,0,5,"5"
  16. FIELD ORT,19,0,25
  17.  
  18. BEFORE SieEr,1
  19. CALC S/E,TEXT,"SieEr==\"Frau\"?\"Frau(en):\":\"Herr(en):\"",12,0,9
  20.  
  21. RECORD,1
  22. FIELD KUNDE,15,0,25
  23. FIELD STRASSE,40,0,25
  24.  
  25. AFTER SieEr,1
  26. TEXT ".......................................",15,0,22
  27.  
  28. AFTER [2] PLZ,3
  29. CALC Anz,TEXT,"str(Count(\"1\"),\"-2\")",9,0,3
  30. CALC Kunde(n),TEXT,"count(\"1\")>1?\"Kunden\":\"Kunde\"",12,0,9
  31. TEXT "---------------------------------------",9,2,41
  32.  
  33. AFTER REPORT,2
  34. CALC Anz.,TEXT,"Str(Count(\"1\"),\"-2\")",12,1,3
  35. TEXT "Kunden insgesamt im Report",16,1,26
  36.  
  37. FOOTER,2
  38. TEXT "Seitenende",7,1,10
  39.  
  40.