Formelsprache: Eine Art Zählschleife

[Nexus]

Servus,

ist es möglich irgendwie ohne Lotus Script in der Formelsprache nen Ablauf zusammenzuwurschteln, dass ich den Effekt einer Zählschleife habe  

[Axel]

Hi,

meines Wissens nicht. Schleifenfunktionen gibt's erst ab Version 6


Axel

[koehlerbv]

Ohne mehr über das angestrebte Ziel zu wissen, bleibt nur die Standard-Antwort: Nein, die R5-Formelsprache erlaubt keine Schleifen.
Wenn Du aber sagst, was Du erreichen willst, fällt uns aber vielleicht ein Workaround ein.

Bernhard

[Nexus]

Ich hab hier versucht einen Zähler zu bauen. Welcher ne art Zählschleife emulieren soll. Aber irgendwie zählt er nicht... verstehs nicht

<sup>FIELD Speicher2 := Testfeld1 ;"";


@Replace(Speicher2; "; "; " : " );
FIELD Speicher1 := @Elements(Speicher2);
@If(speicher1 = Zaehler; @Prompt([OK];"Ausgabe"; @Max(Zaehler;Speicher2));
   Zaehler + "1" &
   @If(speicher1 = Zaehler; @Prompt([OK];"Ausgabe"; @Max(Zaehler;Speicher2));
      Zaehler + "1" &
      @If(speicher1 = Zaehler; @Prompt([OK];"Ausgabe"; @Max(Zaehler;Speicher2));
         Zaehler + "1" &
         @If(speicher1 = Zaehler; @Prompt([OK];"Ausgabe"; @Max(Zaehler;Speicher2));
            Zaehler + "1" &
            @If(speicher1 = Zaehler; @Prompt([OK];"Ausgabe"; @Max(Zaehler;Speicher2));
               @Prompt([OK];"Warnung"; Zaehler))
            )
         )
      )
)</sup>

[koehlerbv]

Deine Formel ist ... sagen wir mal "abenteuerlich" ...

Code

@If(speicher1 = Zaehler; @Prompt([OK];"Ausgabe"; @Max(Zaehler;Speicher2));

Soweit ist es noch okay: Wenn Dein Feld Zaehler @Elements ... entspricht, gib' 'nen Prompt aus.
Jetzt kommt der "sonst"-Teil:

Code

Zaehler + "1" &
   @If(speicher1 = Zaehler; @Prompt([OK];"Ausgabe"; @Max(Zaehler;Speicher2));

Jetzt versuchst Du, zur Zahl "Zaehler" den Text "1" zu addieren und eone LOGISCHE VERKNÜPFUNG mit dem Ergebnis der nächsten If-Abfrage zu machen ...

Beantworte lieber meine Frage, die ich oben gestellt habe: Was willst Du erreichen ?

Bernhard

[Axel]

Hi,

du "addierst" Strings. Das kann nicht gehen.

Versuch's mal so:

Zaehler := 0;

FIELD Speicher2 := Testfeld1 ;"";


@Replace(Speicher2; "; "; " : " );
FIELD Speicher1 := @Elements(Speicher2);
@If(speicher1 = Zaehler; @Prompt([OK];"Ausgabe"; @Max(Zaehler;Speicher2));
   @Set("Zaehler"; Zaehler  + 1) &
   @If(speicher1 = Zaehler; @Prompt([OK];"Ausgabe"; @Max(Zaehler;Speicher2));
      @Set("Zaehler"; Zaehler  + 1) &
      @If(speicher1 = Zaehler; @Prompt([OK];"Ausgabe"; @Max(Zaehler;Speicher2));
         @Set("Zaehler"; Zaehler  + 1) &
         @If(speicher1 = Zaehler; @Prompt([OK];"Ausgabe"; @Max(Zaehler;Speicher2));
            @Set("Zaehler"; Zaehler  + 1) &
            @If(speicher1 = Zaehler; @Prompt([OK];"Ausgabe"; @Max(Zaehler;Speicher2));
               @Prompt([OK];"Warnung"; Zaehler))
            )
         )
      )
)

Axel

[koehlerbv]

Die Sache wird ja noch verrückter:
Erst heisst es:

Code

@Replace(Speicher2; "; "; " : " );

Speicher2 enthält also einen String oder eine StringListe.
Dann kommt aber:

Code

@Max(Zaehler;Speicher2)

Wie soll denn das Maximum aus einer Zahl und einer Textliste ermittelt werden ?

Bernhard

[Axel]

Uupps.

Hab ich doch glatt übersehen.

Axel

[koehlerbv]

Ging mir auch so. Aber wenn man länger schaut ...

Code

@Prompt([OK];"Warnung"; Zaehler))

Das gibt 'ne leere Massage-Box, da Zaehler nicht in Text umgewandelt wurde.  

Bernhard

[Nexus]

Ich trage eine Anzahl von Namen ein. Diese sollen ermittelt werden also die Anzahl. Dann soll eine Schleife jeden Namen einzel heraus nehmen und in ein Feld speichern. Die Schleife soll solange laufen, bis die Anzahl der Namen erreicht ist.

[Glombi]

Ich trage eine Anzahl von Namen ein.
=> Wo werden die Eingetragen? In ein Feld?

Diese sollen ermittelt werden also die Anzahl. Dann soll eine Schleife jeden Namen einzel heraus nehmen und in ein Feld speichern.
=> in EIN Feld oder pro Name ein Feld?

Wir brauchen schon mehr Infos.

Andreas

[koehlerbv]

 
Du hast ein Feld A mit n Namen. n ist Dir zur Laufzeit unbekannt.
Die n Namen sollen dann in ein Feld B geschrieben werden.
 

So habe ich das jetzt verstanden. Aber das kann es ja nicht sein, denn dann wäre ja
FIELD B := A;

 
Bernhard

[Axel]

Hi,

meines Erachtens ist das mit der Formelsprache nicht zu machen, da ja die Anzahl der Namen unterschiedlich sein kann.


Mit fällt auf kein Würkaround ein, sei er selbst noch so gewürkt.

Da wirst du wohl an Script ran müssen.


Axel

[Nexus]

Namen werden ausgewählt bzw. eingetragen in einem Dialoglisten Feld.

Als ergebnis soll jeder Namen in einem eigenen Feld eingetragen werden. Bzw. übermittelt in eine Feld als eigner Datensatz.

So dass in einer Ansicht, welche eine Spalte hat mit der Beschriftung Namen ( Eindeutige Namen ) diese auflistet, als jeweiliges Dokument.

[Glombi]

Du hast ein Feld A mit n Namen. n ist Dir zur Laufzeit unbekannt.
Die n Namen sollen dann in ein Feld B geschrieben werden.
 

So habe ich das jetzt verstanden. Aber das kann es ja nicht sein, denn dann wäre ja
FIELD B := A;

 
Bernhard

Das war genau mein Gedankengang.

Bin gespannt, wie sich das entwickelt...

Andreas

[Glombi]

"Als ergebnis soll jeder Namen in einem eigenen Feld eingetragen werden. Bzw. übermittelt in eine Feld als eigner Datensatz.

So dass in einer Ansicht, welche eine Spalte hat mit der Beschriftung Namen ( Eindeutige Namen ) diese auflistet, als jeweiliges Dokument. "
==> Pro Name als ein Dokument,

Sowas hatten wir doch erst hier, oder?
Sei es drum, es geht nur mit Script.

Andreas

[koehlerbv]

Das war genau mein Gedankengang.

Bin gespannt, wie sich das entwickelt...

Andreas

Zum massiven Baldriankonsum !

[Nexus]

Da wirst du wohl an Script ran müssen.

Axel

Mh... keine Ahnung, wie ich das mit dem Script machen soll
Bin nicht so der Notes Spezialist.

[koehlerbv]

Mh... keine Ahnung, wie ich das mit dem Script machen soll
Bin nicht so der Notes Spezialist.

Das hätten wir jetzt gar nicht gemerkt ...

Schreib' doch mal genau auf, was Du machen willst - und schreibe sauber und nicht sowas wie "soll jeder Namen in einem eigenen Feld eingetragen werden. Bzw. übermittelt in eine Feld als eigner Datensatz" (zwischen "Feld" und "Dokument" besteht schon ein klitzekleiner Unterschied.

Vielleicht lässt sich das ganze ja auch ganz anders lösen.

Bernhard

[Axel]

Hi,

ich denke mal das Ganze soll beim Speichern des Dokumentes erfolgen, oder ?

So könnte das aussehen.  Die Feldnamen und den Maskennamen musst du natürlich anpassen.

Sub Querysave(Source As Notesuidocument, Continue As Variant)

Dim session As New NotesSession
Dim db As NotesDatabase
Dim ws As New NotesUIWorkspace
Dim docThis As NotesDocument
Dim docNew As NotesDocument
Dim idx as Integer

Set db = session.CurrentDocument
Set docThis = source.Document

For i = 0 to Ubound(docThis.Dialogliste)
  Set docNew = New NotesDocument(db)
  docNew.Form = "Name der Maske"
  docNew.FeldfürName = docThis.Dialogliste(idx)
  Call docNew.Save(True, False)
Next

...


Axel