NotesViewNavigation

[Klafu]

Hallo zusammen

Ich habe eine Ansicht, in welcher in der 3. Spalte die Kategorie des jeweiligen Dokuments steht.
Wie kann ich nun gezielt über die NotesViewNavigation auf diese Spalte zugreifen? Geht das überhaupt ?
Hab über die Sufu und die Notes Hilfe irgendwie nichts genaues gefunden, was mir hilft.

Ich muss nämlich in Word ein Menü erstellen in dem die Dokumente in der jeweiligen Kategorie aufgelistet sind. *siehe Anhang*

Gruß

[Klafu]

Könnt ihr mir nich sagen wie ich in die Spalte komm, in der die Kategorien stehn ?

[thomson666]

in die spalte kommst über NotesView
und dann NotesViewcolumns

dort bekommst die spalte...
was du aber brauchst sind die kategorien...
die einträge durchgehen in ein array/liste schreiben, doppelte filtern und dann!? weiterverarbeiten oder zur verfügung stellen wo du das brauchst...

ich kapier nur nicht wieso diese formulare im word sind!? aber das ist organisatorisch bei euch vermutlich so, den sinn versteh ich nicht, notes ist GENAU für solche sachen gemacht...

[Klafu]

Hallo thomson, danke für deine Antwort.
Ich werde mir jetzt mal speziell die Columns anschaun.

ich kapier nur nicht wieso diese formulare im word sind!? aber das ist organisatorisch
bei euch vermutlich so, den sinn versteh ich nicht, notes ist GENAU für solche sachen gemacht...

Das ist deswegen so, da hinter jedem Dokument eine andere Wordvorlage steckt und die soll bequemerweise auch über ein Word Menü aufgerufen werden können.

Gruß

[Klafu]

So: Nach kurzem Urlaub melde ich mich nun zurück.
Wär das als erster Ansatz dann so richtig ?

Code

 Set templatedb = Session.GetDatabase("", "testDB.nsf")
 If Not templatedb Is Nothing Then
       Set View = templatedb.GetView("number")
       If Not View Is Nothing Then
          
             Set notesViewNavigator = View.CreateViewNav
             Set Column = notesViewNavigator.GetColumn(4)
             Set notesDocument = Column.GetFirstDocument
          
       End If
 End If

[thomson666]

nein das funktioniert so leider nicht, mit den columns kannst du formulas reinschreiben.

ich bin leider bei deinem beitrag mir scheint auf der leitung gestanden...
du holst dir nur die view und schreibst alle einträge in eine liste
dazu liest du von dem jeweiligem dokument das feld aus in dem die kategorie steht

dann nimmst du das resultat und verwendest die bei dir im word ein !?

nur mit einer schleife alle dokumente durchgehen, das feldauslesen, in eine liste schreiben und die dann fürs word weiterverarbeiten das ist alles!?

ich hoffe das war einigermaßen verständlich...

[koehlerbv]

ich hoffe das war einigermaßen verständlich...

Nein. Ausserdem klemmt die Umschalttaste, was es noch schwerer macht.

Denk beim Schreiben bitte zuerst an die Leser! 

Bernhard (als Moderator)

[Driri]

ich bin leider bei deinem beitrag mir scheint auf der leitung gestanden...
du holst dir nur die view und schreibst alle einträge in eine liste
dazu liest du von dem jeweiligem dokument das feld aus in dem die kategorie steht

dann nimmst du das resultat und verwendest die bei dir im word ein !?

nur mit einer schleife alle dokumente durchgehen, das feldauslesen, in eine liste schreiben und die dann fürs word weiterverarbeiten das ist alles!?

Was spricht gegen ein Evaluate in Kombination mit @Unique(@DBColumn(...)) ?

[Klafu]

Hallo, mir fällt auch gerade auf, das ich vergessen habe etwas wichtiges zu erwähnen:
Ich entwickle die Word - Notes Schnittestelle in Word (VBA)

[Axel]

Was spricht gegen ein Evaluate in Kombination mit @Unique(@DBColumn(...)) ?

Das es aus Word heraus per VBA über die OLE/COM-Schnittstelle gemacht werden soll.


Axel

[Klafu]

du holst dir nur die view und schreibst alle einträge in eine liste
dazu liest du von dem jeweiligem dokument das feld aus in dem die kategorie steht

dann nimmst du das resultat und verwendest die bei dir im word ein !?

so dann ?

Code

Set templatedb = Session.GetDatabase("", "LVDocs.nsf")
    If Not templatedb Is Nothing Then
       Set View = templatedb.GetView("number")
       If Not View Is Nothing Then
       
       
         Set notesViewNavigator = View.CreateViewNav()
         Set Entry = notesViewNavigator.GetFirstDocument
         Set ValueEntry = Entry.getItemValue("Category")

Weil der Debugger sagt mir, das die Methode getItemValue nicht unterstüzt wird.
Aber das Array muss ich ja auslesen.

Wie sieht denn die "liste" aus ? Ist das eine logische Liste ?

Ich glaub, ich steh auch gerade etwas auf dem Schlauch

[Axel]

Mal so ins Blaue gedacht.

Erstelle die eine Maske mit einem Textfeld (Mehrfachwerte zulassen). Beim Vorgabewert trägst du eine @DBColum-Formel (evt. ist @Unique notwendig) ein und greifst damit auf die 3.Spalte der Ansicht zu. Zusätzlich fügst du noch ein SaveOptions-Feld ein und das setzt du auf 0.

In Word erstellst du mit dieser Maske ein temporäres Dokument und damit solltest du das Feld auslesen können und somit an die Kategorien drankommen.

Wie gesagt, das ist nur mal so ne Idee. Ich bin mir nicht sicher ob's so funktioniert. Probier's mal aus.


Axel

[Klafu]

Okay, danke für eure Hilfe.
Habs nun fast geschafft 

[Axel]

Lässt du uns an deinem Fortschritt teilhaben? Das kann für andere User mit gleichen oder ähnlichen Problemen äußerst hilfreich sein.

Danke.

Axel

[Klafu]

Ich mach es nun so, das ich einfach per Makro jedes Dokument in der Ansicht durchgehe und den Inhalt, des Feldes "Kategorie" entnehme.

Es sollte so auch klappen.
Bin grad noch am testen, das ich die Dokumente, die alle die selbe Kategorie haben in ein gemeinsames Untermenü bekomme

[Klafu]

Hallo.
Nun muss ich hier nochmal was fragen


bei dem Code

Code

Set View = templatedb.GetView("CategoryView")
            
            Set nav = View.CreateViewNav()
            Set entry = nav.GetFirst

wird mir in Word angezeigt das: entry = 0 ist (?)
Ein Fehler kommt aber erst gegen Ende des Codes bei:

Code

Set entry = nav.GetNext(entry)

(Fehler: Typen Unverträglich)
Wo liegt der Fehler ?

Würd mich über hilfe freuen

[Klafu]

Ich hab mal alle getNext... und auch gotoNext... Methoden durchgetestet. Und es gibt 2 verschiedene Fehler:
Bei GetNext...  Methoden kommt:"Typen unverträglich"
Bei GoToNext... Methoden kommt: "Objekt unterstützt diese Eigenschaft oder Methode nicht"

Bis zu dieser Stelle läuft alles gut und dann ... :/
ich weis nicht, was ich gegen die Fehler machen soll
kann das an dem Entry = 0 liegen? (post oben)

Gruß
Christoph

[Axel]

Ich denke mal, dass das auf jeden Fall an dem Wert 0 liegt. Eigentlich wird nämlich ein Objekt erwartet.

Kann es sein, dass in der Ansicht kein Wert enthalten ist? Oder in einen der beiden Zeilen

Set View = templatedb.GetView("CategoryView")
Set nav = View.CreateViewNav()

geht was schief.

Du solltest auf jeden Fall eine Fehlerbehandlung einbauen und solche eventualitäten abfangen.


Axel

[Klafu]

Danke für dein Post
Also, die Ansicht ist gefüllt

Wenn ich frag:
If not View is Nothing then - da läuft der Code rüber

und wenn ich frag:
If View <> "" - da sagt er mir beim ausführen, dass das Objekt die Methode nicht unterstützt und es wird abgebrochen


Gruß

[Axel]

und wenn ich frag:
If View <> "" - da sagt er mir beim ausführen, dass das Objekt die Methode nicht unterstützt und es wird abgebrochen

Ist ja logisch. Du kannst nicht wenn ein Objekt erwartet wird auf eine leere Zeichenkette prüfen. Das geht nur mit ...is Nothing.

Wie sieht's denn dann mit der Zeile Set nav.... aus?

Wie sieht den der Code komplett aus?

Axel