DokumentCollection bringt kein Ergebnis

[wuwu]

Hallo,

versuche eine DC zu öffen, bringt mir aber kein Ergbnis zurück -> Count = 0

Ansicht ist vorhanden, 1 Spalte kategorisiert  nach KTR

Dim ws As New NotesUIWorkspace   
   Dim uidoc As notesuidocument
   Dim doc As NotesDocument
   
   Set uidoc = ws.CurrentDocument
   Set doc = uidoc.Document
   
   Dim key As String
   key = doc.KTR(0)
   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim view As NotesView
   Dim v_doc As NotesDocument
   Dim dc As NotesDocumentCollection
   Set db = session.GetDatabase("***","Stamm.ntf")
   Set view = db.GetView( "Kostenträger2" )
   Set dc = view.GetAllDocumentsByKey(key)
   
   Set v_doc = dc.GetFirstDocument
   Dim var As String
   Do Until v_doc Is Nothing
      
      var = var & v_doc.KTR(0)&Chr(10)
      Set v_doc = dc.GetNextDocument(v_doc)
   Loop   
   Msgbox v_doc.count

[koehlerbv]

Gehst Du auf die richtige DB ? "stamm.ntf" ist doch eine Schablone ...

Bernhard

[wuwu]

zum testen möchte ich auf die Schablone -> ist das das Problem?

[Axel]

Hi,

ist kein Problem. Um ein Ergebnis zu haben sollten natürlich auch Dokumente enthalten sein.

Was mir Spanisch vorkommt ist der Servername bei GetDatabase.

Set db = session.GetDatabase("***","Stamm.ntf")

Heißt dein Server wirklich *** ?


Axel

[Semeaphoros]

Der kann so nicht heissen, das würde an verschiedensten Stellen falsch ausgewertet, da * als Wildcard gilt

[wuwu]

nein, der Server heist natürlich nicht so, dort steht schon der richtige Name drinnen!

[Axel]

Hi,

ist die Ansicht Kostenträger2 in der ersten Spalte sortiert bzw. kategorisiert?


Axel

[koehlerbv]

Horst schrieb schon anfangs: Ja.

[wuwu]

Ich hab es selber hinbekommen!
Folgende Situation vorher: Das Script wie beschrieben, das Feld KTR ist ein Dialogfeld, ich habe dann den Wert dieses Feldes in ein anderes geschrieben, dieses Feld als Key hergenommen und siehe da es funzt!!!

Eine Frage, mus bei AllDocumentsByKey in der Ansicht die erste Spalte kategorisiert sein, ist das ein mus?

Mfg Horst

[koehlerbv]

Sortiert muss sie sein. Kategorisiert kann sie sein.

Die Ursache Deines Problems muss aber ein anderes sein. Das Umkopieren in ein anderes Feld muss Deinen Fehler dabei korrigiert haben. Ich würde da nochmal genauer forschen.

Bernhard

[wuwu]

das was ich bis jetzt weis ist, KTR is mein Key Feld.

Wenn das Feld Berechnet wird oder eine Dialogfeld ist, kann es für den Key bei der DC nicht verwendet werden, zumindest nicht bei meiner Maske bzw. Ansicht!

Mfg

[Driri]

Aber KTR ist nicht zufällig "Berechnet zur Anzeige" ?

[Semeaphoros]

Das kann wirklich nicht die Ursache sein, denn dem Item im Dokument ist es egal, wie das Feld in der Maske (zur Darstellung) definiert wurde. Dialoglisten sind reine Text-Items im Dokument, bei Berechnet hängt es von der Formel ab, und wenns Berechnet zur Anzeige ist, kommt gar nix ins Dokument, wie Ingo schon angedeutet hat.

[wuwu]

nein, berechnet zur Anzeige ist es auch nicht, das einzige das jetzt noch sein kann ist, das Feld KTR von der anderen Maske(Suchansicht) ist ein Feld vom Typ Zahl, kann das die Ursache sein?

Suchmaske KTR -> Zahl
Eingabemaske KTR -> Dialogfeld

ist das das Problem?

Mfg

[Semeaphoros]

Das ist eine denkbare Fehlerursache

[koehlerbv]

Ja, logisch - das sind Äpfel und Birnen !

Bernhard

[wuwu]

 das heist, ich mus das Feld v_doc im Script auf Text umändern?
Wie kann ich das machen mit cstr(v_doc) oder mus ich das in der Ansicht machen?

Mfg

[koehlerbv]

?? v_doc ist doch ein NotesDocument !

[koehlerbv]

Wenn in doc.KTR (0) eine Zahl und kein Text gespeichert wurde, dann muss es heissen:
key = cstr (doc.KTR (0))

Bernhard

[wuwu]

oder umgekehrt, im Feld doc.KTR wird der Wert über ein Dialogfeld gesetzt, das heist -> Text, oder?

Mein Feld in der Ansicht ist aber eine Zahl.

Also bau ich mein Script um auf .....GetAllDocumentsByKey(Cint(doc.KTR(0)), oder?

Mfg und vorerst danke!!!