Domino 9 und frühere Versionen > ND8: Entwicklung
2.Feld in Abhängikeit zum 1.Feld füllen
Schorsch:
Hallo liebes Forum.
Wahrscheinlich ist es nur eine Kleinigkeit aber ich hab n Brett vorm Kopf.
Ich fülle eine Ansicht mit werten zu Druckermodellen und den dazugehörigen Verbrauchsmitteln.
Diese Ansicht ist Kategorisiert und hat 2 Spalten.
Nun möchte ich mit einem Dokument hier Werte zum ausgewählten Druckermodell auslesen.
Im ersten Feld steht folgendes (Formel für Auswahl) "Modell":
@DbColumn("":"NoCache";"":"";"Ansichtsname";1)
Das funktioniert prima.
Im zweiten Feld steht dies (Formel für Auswahl) "Patrone, Toner etc.":
Test:= @DbLookup("NOTES":"NoCache";"":"";"Ansichtsname";"1.Feld";2);
@If(@IsError(Test); "ERROR"; Test)
Hier kommt aber in der Auswahl immer nur "ERROR".
Die DB ist auch schon indiziert. Beides sind Kombiefleder und sind bearbeitbar.
Jede Hilfe ist willkommen.
Georg
koehlerbv:
Steht "1.Feld" wirklich in Anführungszeichen?
Schorsch:
Ja das steht in Anführungsstrichen. Hatte ich aber auch schon anders, also ohne.
koehlerbv:
Mit Anführungszeichen wird nach dem angegebenen Text, also dem Feldnamen, gesucht. Das ist natürlich falsch - Du willst nach dem Inhalt des Feldes suchen, also ohne Anführungszeichen.
Wenn das auch mit korrekter Syntax fehlschlägt: Gehe in die Suchansicht und tippe dort den gewünschten Inhalt ein, um derart zu suchen. Erzielst Du dann einen Treffer?
Bernhard
Schorsch:
Hi Bernhard,
Danke für deine Hilfe,
In der Ansicht selber kann ich nach allem gewünschte suchen und bekomme auch die richtigen Ergebnisse.
Ich hab mir auch schon ein Textfeld als Hilfe angelegt und hier folgendes Script hinterlegt >Entering<:
Dim session As New NotesSession
Dim db As NotesDatabase
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim sdoc As NotesDocument
Dim view As NotesView
Dim doccoll As NotesDocumentCollection
Set db = session.CurrentDatabase
Set uidoc = workspace.CurrentDocument
Dim searchvar As String
searchvar = uidoc.FieldGetText( "1.Feld" )
Set view = db.GetView( "Ansichtsname" )
Set doccoll = view.GetAllDocumentsByKey(searchvar)
Set sdoc = doccoll.GetFirstDocument
While Not sdoc Is Nothing
x = sdoc.2.Feld(0)
Call uidoc.FieldAppendText( "hilfsfeld", " ; " & x )
Set sdoc = doccoll.GetNextDocument(sdoc)
Wend
Da werden mir die entsprechenden Einträge angezeigt. Gibt es eine Möglichkeit diese dann in das Auswahlfeld zu bekommen.
Georg
Navigation
[0] Themen-Index
[#] Nächste Seite
Zur normalen Ansicht wechseln