Hallo Oliver,

ich hoffe, ich habe so aus dem Bauch heraus (ohne Ninox) keine Syntax-Fehler eingebaut ;) :

function mengenText(Menge : number, Getr : 'Getränk') do
  let anzahlVE := floor(Menge / Getr.'VE');
  let anzahlST := Menge - (anzahlVE * Getr.'VE');
  var result := "";
  if anzahlVE > 1 then
    result := text(anzahlVE) + " " + Getr.'Mehrzahl VE'
  end;
  if anzahlVE = 1 then
    result := text(anzahlVE) + " " + Getr.'1 VE'
  end;
  if anzahlST > 1 then
    if result != "" then
      result := result + ", ";
    end;
    result := result + text(anzahlST) + " " + Getr.'Mehrzahl Stück'
  end;
  if anzahlST = 1 then
    if result != "" then
      result := result + ", ";
    end;
    result := result + text(anzahlST) + " " + Getr.'1 Stück'
  end;
  result
end;

VG Frank

Hallo Oliver,

dies ist ja eine Funktion die du zentral unter Optionen --> Globale Funktionsdefinitionen ablegen kannst. Der Ausdruck in Klammern nach dem Funktionsnamen (Bestand : number, Getr : 'Getränke') gibt an, dass diese Funktion mit 2 Optionen aufzurufen ist - zuerst mit der Menge und als 2. mit dem passenden Datensatz der Tabelle Getränke. Was natürlich in diesem Fall noch dazu kommen muss ist der Funktionsaufruf. Aus der Tabelle Getränke dann z. B. über ein Funktionsfeld:

let myGetraenk := this();
mengeText(myGetraenk.Bestand, myGetraenk);

Aus anderen Tabellen musst du den Funktionsaufruf passend abändern. Wenn du die Funktion nicht zentral ablegen möchtest dann müsstest du die Funktion in dem Funktionsfeld oberhalb dieser 2 Zeilen einfügen.

Du hättest jetzt Menge nicht durch Bestand ersetzen müssen, da diese Variable ja nur innerhalb der Funktion gilt und nicht direkt in Verbindung mit der Tabelle/dem Tabellenfeld steht - aber deine Umsetzung dieser Funktion ist genauso gut.

VG Frank

Kommt drauf an, wie die Tabellenstruktur ist ... ich gehe mal davon aus, dass du in 'Getränke Einkauf' das Feld 'Getränk' hast mit dem du das Getränk aus der Tabelle 'Getränke' verknüpft hast. Weiterhin ein Feld 'Bestellmenge' mit der Menge:

let myEinkauf := this();

mengeText(myEinkauf.Bestellmenge, myEinkauf.'Getränk')

Stimmen meine Annahmen nicht, musst du entweder die Feldnamen ändern oder mir mal mehr über die Struktur verraten. ;)

VG Frank

...gute Idee.

Birger