Das Notes Forum
Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Kadlec am 13.02.03 - 10:46:46
-
Hallo ich habe in einer Teilmaske ein Schlüsselwortfeld in dem ich unter Umständen 100 Einträge habe.
Ich möchte nun einen Button erstellen der alle Einträge selektiert.
Aber wie ?? Ich denke das dies nur über Script geht, oder???
Danke
-
Hi,
mir ist kein Weg bekannt.
Axel
-
... wie setzen sich den die Werte für die Liste zusammen? Wenn si hardcoded sind musst du sie in ein Multiple Value-Feld auslagern. In der Dialogliste beziehst du dich dann per Formel auf das Feld...
... wenn du ohne Alternativwerte arbeitest, dann kannst du dem Feld diese Liste als Wert übergeben...
... wenn du mit Alternativwerten arbeitest mußt die als Wert zuweisen...
... ich denke das müßte so gehen...
ata
-
Hallo Ata,
die Werte gebe ich in einem Dok. (Maske1) ein, dann erstelle ich eine Antwort (Maske2) die ich über die Teilmaske ausfülle.
In Maske1 kann ein Wert in dem Feld stehen es könnten aber auch ca. 100 sein. Jetzt wäre es schön wenn bei einem Teil dieses auch gleich gewählt wäre und bei mehreren die Möglichkeit bestände diese über eine Schaltfläche alle anzuwählen.
-
... dein Ausgangsfeld in Maske 1 muß Multiple Value sein...
um der Liste bereits einen Wert zuzzuweisen, nimmst du den ersten Wert der Liste, und weist den deinem Auswahlfeld zu. den Code hinerlegst du im Exiting deines Ausgangsfeldes
Dim ws As New NotesUIWorkspace
Dim docThis As NotesDocument
Set docThis = ws.CurrentDocument.Document
If docThis.AuswahlFeld(0) = "" Then
docThis.Auswahlfeld = docThis.Ausgangsfeld(0)
End If
... in der Schaltfläche sieht es dann so ähnlich aus...
' # LS
Dim ws As New NotesUIWorkspace
Dim docThis As NotesDocument
Set docThis = ws.CurrentDocument.Document
If docThis.Ausgangsfeld(0) <> "" Then
docThis.Auswahlfeld = docThis.Ausgangsfeld
End If
... oder mit Formel
FIELD Auswahlfeld := Ausgangsfeld;""
... wichtig ist, daß die betroffenen Felder Multiple Value sind...
... wenn mit Aliaswerten gearbeitet wird, dann müssen natürlich die verwendet werden...
ata
-
Hallo ata, erstmal Vielen Dank für die Mühe die ich mache.
Die Formel um alle Einträge zu selektieren funktioniert (hätte ich eigentlich selbst hinbekommen müssen).
Mit dem anderen Teil habe ich ein Problem, also noch mal.
1. In Dok1 wird im Feld TeilNr_T eine Nr. eingegeben.
2. Dok2 wird angelegt und der Wert aus TeilNr_T wird an Feld TeilNrÜbertrag_T übergeben.
Aus diesem Feld zieht sich nun die Teilmaske in Feld TeilNrEingabe_T den Wert aber dieser ist nicht angewählt.
Mein Ausgangsfeld ist also TeilNrÜbertrag_T und mein Auswahlfeld ist TeilNrEingabe_T.
Entsprechen die Formel:
Sub Exiting(Source As Field)
Dim ws As New NotesUIWorkspace
Dim DocThis As NotesDocument
Set docThis = ws.CurrentDocument.Document
If docThis.TeilnrEingabe_T(0) = "" Then
docThis.TeilnrEingabe_T = doc.This.TeilNrÜbertrag_T(0)
End If
End Sub
Wo ist der Fehler.
-
... du hast das im Exiting eines Feldes oder der Maske eingetragen - ist das der richtige Ort? Ich hatte dich so verstanden, daß der Wert bereits bei der Übernahme vererbt werden soll...
ata
-
Sorry Script ist für mich ein Buch mit sieben Siegeln(sob. ich Zeit habe muß ich das ändern)
Also den od. die Werte vererbe ich von Dok1 auf Dok2.
Aus dem Feld in Dok2 hole ich mir den/die Wert(e) in das Feld der Teilmaske. Wenn mehrere Werte dann entweder von Hand selektieren oder mit Button alle selektieren.
Wenn nur ein Wert, dann kann nur dieser Wert gemeint sein also
gleich angewählt.
-
... ich stell dir morgen Abend was ins Forum - das geht schneller..
... nochmal zurück zu deinem Code - wo hast du den plaziert?
ata
-
Der Code ist im Exiting des Feldes ...Übertrag.
Feld ...Übertrag ist im Dok2 und wird aus Dok1. vererbt.
Kadlec
-
... sorry, ich muß dich vertrösten...
ata
-
Hallo ata weiß nicht ob Du mich vergessen hast oder noch keine Zeit hattest.
Anyway ich habe eine andere Lösung gefunden.
Ein zweites Feld berechnet beim anlegen das wenn nur ein Wert vorhanden diesen übernimmt. Das andere Feld für mehrere Werte und in abhängigkeit werden diese beiden versteckt oder sichtbar.
Solltest Du dennoch eine andere Lösung im Sinn haben kannst Du mir diese ja evt. noch mitteilen.
Sag mir doch bitte Bescheid damit ich dieses Thema evt. schließen kann.
Nochmals Danke
-
... noch ein bißchen Geduld... ich habe gerade noch ein paar andere Dinge am köcheln ...
ata