AnsweredAssumed Answered

Hole (AnzahlGefundeneDatensätze) in Schleife zählen

Question asked by olivervollmer on May 30, 2017
Latest reply on May 31, 2017 by erolst

Hallo,
folgende Situation:
Ich habe eine Kontaktliste. Ich wähle unterschiedliche Kontakte aus und speichere die PK in einem globalen Feld.
Danach habe ich ein Script auf einer Schaltfläche, das in eine neue Tabelle geht und die Werte per Schleife der Tabelle hinzufügt.
Bevor ich diese Werte in die Tabelle schreibe prüfe ich, ob dieser Wert schon in der Tabelle vorhanden ist.
Wenn ja, erstelle ich keinen neuen Datensatz.

Jetzt möchte ich die Anzahl der NICHT erstellten neuen Datensätze zählen.
Wie kann ich mir diese Anzahl in einer Variable speichern.
Anbei mein kleines Script, das ich verwende. Wahrscheinlich gibt es einen eleganteren und einfacheren Weg diese Aufgabe zu erledigen.

Über Tipps und Ratschläge, wie man so etwas besser machen kann, freue ich mich sehr.

 

AnwenderAbbruchZulassen setzen [ Ein ]

Fehleraufzeichnung setzen [ Ein ]

     Variable setzen [ $$pkFav ; Wert: Auswahl_FAVORITEN::ID ]

     Variable setzen [ $$FavName ; Wert: Auswahl_FAVORITEN::Listenname ]

Fenster schließen [ Name: "Favoritenliste auswählen" ; Aktuelle Datei ]

Gehe zu Layout [ “FAVORITEN_kontakte” (FAVORITEN_kontakte) ]

Alle Datensätze anzeigen

     Variable setzen [ $liste ; Wert: KONTAKTE::gSelectedContacts // Einlesen der Liste in eine Variable ]

     Variable setzen [ $anz ; Wert: ElementeAnzahl ( $liste ) // Anzahl der Werte in der Liste ]

Ergebnismenge suchen [ Wiederherstellen ]

Schleife (Anfang)

       Variable setzen [ $i ; Wert: $i + 1 // Zähler ( wird immer um 1 erhöht ) ]

       Variable setzen [ $zeile ; Wert: HoleWert ( $liste ; $i )  // i. Wert aus der Liste entnehmen und in Variable speichern ]

       Ergebnismenge einschränken [ Wiederherstellen ]

  Wenn [ Hole ( AnzahlGefundeneDatensätze ) = 0 ]

       Alle Datensätze anzeigen

       Gehe zu Datens./Abfrage/Seite [ Erste(r) ]

       Neuer Datensatz/Abfrage

       Feldwert setzen [ FAVORITEN_kontakte::IDKONTAKTLISTE ; $$idFav ]

       Feldwert setzen [ FAVORITEN_kontakte::IDKONTAKT ; $zeile ]

  Ende (wenn)

Verlasse Schleife wenn [ LiesAlsZahl ( $i ) ≥  LiesAlsZahl ( $anz ) ]

Schleife (Ende)

Alle Datensätze anzeigen

Gehe zu Layout [ “KONTAKTLISTE” (KONTAKTE) ]

Formatierungsleiste zulassen [ Ein ]

Menüleiste ein-/ausblenden [ Einblenden ]

Werkzeugleisten ein-/ausblenden [ Einblenden ]

Textlineal ein-/ausblenden [ Einblenden ]

     Feldwert setzen [ KONTAKTE::gFavoritenname ; "" ]

     Feldwert setzen [ KONTAKTE::gSelectedContacts ; "" ]

Eigenes Dialogfeld anzeigen [ "Favoriten gespeichert" ; "Ihre Kontaktauswahl wurde erfolgreich in die Liste " & $$FavName & " gespeichert." ]

Aktuelles Script verlassen [ Textergebnis:    ]

Outcomes