0

Spezielle Art Nummer

Hallo liebe Forumgemeinde, ich bräuchte einmal wieder euer Schwarmwissen.

Wir habe gut 11000 Artikel in unserer Datenbank. Es gibt keine Doppelten Art Nummern. Aber bei drei oder vier wird ein Maß jedesmal dazu geschrieben. Nun habe ich in einem Button folgenden Code damit keine doppelten Artikel in die Bestellung eingefügt wird.

Hier der Code: if cnt(Bestellpositionen[Artikel.'Art-Nr' = myART]) != 0 then
            alert("Dieser Artikel " + myART + " wurde bereits übernommen");
            Menge := "";
            Artikelauswahl := 0

Was nun zur Folge hat das ich diesen Art nicht hinzufügen kann.

Gibt es dafür eine Lösung? z.B. wenn diese Art Nummern eingeben werden das es dann ein Ausnahme gibt.

Besten Dank schonmal 

3 Antworten

null
    • T_Bartzsch
    • vor 10 Monaten
    • Gemeldet - anzeigen

    wie sieht die Zeile mit 

    let myART := 

    denn aus?

    Wie sehen eure Artikelnummern denn genau aus, die "normalen" und die mit Maß?

      • Heinrich Frey Maschinenbau GmbH
      • Christian_Rott
      • vor 10 Monaten
      • Gemeldet - anzeigen

       so sieht der Code davor aus

       

      if not Menge then
          alert("Keine Menge eingegeben")
      else
          let myR := Nr;
          let visit := this;
          let myANZ := Menge;
          let myART := fxArtNummer;
          if Menge and fxArtNummer then
              if cnt(Bestellpositionen[Artikel.'Art-Nr' = myART]) != 0 then
                  alert("Dieser Artikel " + myART + " wurde bereits übernommen")
              else

       

      Die Normalen sehen teilweise so aus 658545D20 oder auch so 65KP23, A270000000.00 und die mit Maß sieht so aus 351408 oder 368521

    • Heinrich Frey Maschinenbau GmbH
    • Christian_Rott
    • vor 10 Monaten
    • Gemeldet - anzeigen

    Habe jetzt mal bisschen versucht mit meinen bescheidenen Kenntnissen. 

    Aber irgendwo habe ich einen Denkfehler drin. Der unten aufgeführte Code gibt mir eigentlich das wieder was ich möchte. Er sagt der Artikel ist schon in der Bestellung vorhanden. Wenn ich nun aber Nein drücke fügt er ihn trotzdem hinzu. Drücke ich Ja dann auch............. Wo ist der Fehler???

    if not Menge then
        alert("Keine Menge eingegeben")
    else
        let myR := Nr;
        let visit := this;
        let myANZ := Menge;
        let myART := fxArtNummer;
        if Menge and fxArtNummer then
            if cnt(Bestellpositionen[Artikel.'Art-Nr' = myART]) >= 0 then
                let antwort := dialog("Artikel bereits in der Bestellung vorhanden !", "Soll der Artikel  " + myART + " trotzdem hinzugefügt werden ?", ["Ja", "Nein"]);
                if antwort := "Nein" then
                    Artikelauswahl := 0;
                    Menge := ""
                else
                    let newPosition := (create Bestellpositionen);
                    let postionNr := max(Bestellpositionen.Pos) + 1;
                    newPosition.(
                        Artikel := visit.first((select Artikel)['Art-Nr' = myART]);
                        Menge := visit.Menge;
                        Besuche := visit;
                        Preis := visit.Preis;
                        Auswahl := visit.Auswahl;
                        'Notiz zum Artikel' := visit.'Notiz zum Artikel'
                    );
                    if Artikelauswahl.'zugehöriger Artikel' then
                        alert(Artikelauswahl.'zugehöriger Artikel')
                    end;
                    Menge := "";
                    Artikelauswahl := 0;
                    Auswahl := 1;
                    Preis := 1;
                    'Notiz zum Artikel' := ""
                end
            end
        end
    end