OPEN DATABASE "db";

SET SYNTAX = "1";

SET DATE = "%d.%m.%y";

FIELD aufpos.bterm DISPLAY AS DATE("%d%m%y");
FIELD auftrnr  DISPLAY AS (10);
FIELD auftrmng DISPLAY AS DOUBLE(6, 0);
FIELD auftrpr  DISPLAY AS MONEY(8, 2);

FIELD status = auftrstatus
               VALUES ARE ( 0 = "ERFFNET",
                            5 = "BEARBEITUNG",
                            6 = "ZUR AB FREIGEGEBEN",
                            7 = "AB GEDRUCKT",
                            8 = "ZUR LS FREIGEGEBEN",
                            9 = "ZUR RG FREIGEGEBEN",
                           10 = "RECHNUNG GEDRUCKT",
                           12 = "BUCHUNG VORGEMERKT",
                           13 = "KOMPLETT GEBUCHT")
               DISPLAY AS LEFT(18);

FIELD peinheit = IF (pe = "1", 10,
                    IF (pe = "2", 100,
                       IF (pe = "3", 1000, 1)))
                 DISPLAY AS INT(4);

FIELD betrag = (auftrmng * auftrpr / peinheit)
                DISPLAY AS MONEY(10, 2);

CREATE VIEW temp AS SELECT *
   FROM kunden, auftrag, aufpos, artikel
   WHERE kunden.kundnr = auftrag.kundnr
     AND auftrag.auftrid = aufpos.auftrid
     AND aufpos.teilnr = artikel.artteilnr;

REPORT
   SELECT
      kundnr, suchnam, name1, name2,
      bterm, auftrnr, auftrart, status,
      teilnr, artbeza, artbezb,
      auftrmng, auftrpr, peinheit, betrag
   FROM temp
   WHERE auftrart = "VK"
   ORDER BY 1, 5, 6
CALCULATE
   SUM(15) BREAK ON (1) PAGE,
   SUM(15) BREAK ON REPORT
USING "man34.frm";
