Das Notes Forum

Domino 9 und frühere Versionen => ND8: Entwicklung => Thema gestartet von: pimpfling am 19.05.08 - 12:22:36

Titel: Probleme mit AppendDocLink
Beitrag von: pimpfling am 19.05.08 - 12:22:36

Hallo

Ich möchte per Button aus einem bestehenden Dokument (Dok1) ein neues erstellen (Dok2).
Das neue Dokument (Dok2) soll in einem Feld die DocumentIID in einem Textfeld beinhalten und zusätzlich einen Doc_Link auf das Dok1 in einem RT Feld haben.
Das pasten der DocID in ein Feld des Dok2 funktioniert - nur das einfügen des Doc_Links geht nicht.

Folgende Fehlermeldung bekomme ich:
"Type mismatch in method AssignClassInstance: AINSTANCE found, Unknown expected"

Button Code:
Sub Click(Source As Button)
   Dim uiws As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
   Dim uidoc2 As NotesUIDocument
   Dim rtitem As NotesRichTextItem
   Dim doc As NotesDocument
   
   Set uidoc = uiws.CurrentDocument
   Call uidoc.Save
   id = uidoc.FieldGetText("main_docid")
   Set doc = uidoc.Document
   
   Set uidoc2 = uiws.ComposeDocument("","","frmToDo")   
   Set uidoc2 = uiws.CurrentDocument
   
   Call uidoc2.FieldSetText("ToDo_did",id)
                Set rtitem = uidoc2.document.GetFirstItem( "ToDo_doclink" )
   Call rtitem.AppendDocLink( doc, "Link zum Hauptdokument")
End Sub

Wo steckt der Fehler?

Titel: Re: Probleme mit AppendDocLink
Beitrag von: m3 am 19.05.08 - 13:12:21

1) Es fehlt ein ErrorHandling (On Error Goto ...)
2) und daraus sich ergebend die Zeilennummer, in welcher der Fehler auftritt. IMHO hat der gepostete Code nix mit dem Fehler zu tun.
3) Willst Du da ev. eine Haupt-/Antwort-Dokument Hierarchie (http://atnotes.de/index.php?topic=13984.0) aufbauen?

Titel: Re: Probleme mit AppendDocLink
Beitrag von: pimpfling am 19.05.08 - 13:51:56

Hallo

Danke für die schnelle Antwort.
Ich habe jetzt heraus gefunden das der Fehler in der folgenden Zeile auftritt:
Set rtitem = uidoc2.document.GetFirstItem( "ToDo_doclink" )

Mir ist nicht klar wo dort der Type Mismatch auftritt...

Im Prinzip will ich mehrere Dokumente (Dok2) mit einem Dokuemt (Dok1) verknüpfen.
Die Dok2 Dokumente werden dann in einer embedded View im Dok1 angezeigt (funktioniert über die DokID)
Kann ich das auch mit Antwortdokumenten machen?
Ich werde mir die Anleitung für die Antwortdokumente mal ansehen...

Titel: Re: Probleme mit AppendDocLink
Beitrag von: Andrew Harder am 19.05.08 - 13:57:02

flag = notesDocument.Save( force, createResponse [, markRead ] )

Boolean. If True, the current document becomes a response to the original document...

Zur Info: Notes speichert dann die UniversalID des Vaterdokumentes im Feld $REF.
Wenn Du also eine Anicht hast und die Erste Spalte genau dieses Feld anzeigen würde...

Titel: Re: Probleme mit AppendDocLink
Beitrag von: pimpfling am 19.05.08 - 16:07:04

Klingt einfach :)

Werde ich mal ausprobieren, danke...

Titel: Re: Probleme mit AppendDocLink
Beitrag von: pimpfling am 20.05.08 - 11:35:37

Hat wunderbar funktioniert - vielen Dank.