Domino 9 und frühere Versionen > ND7: Entwicklung

Immer doppelte RT-Felder nach AppendDocLink ?

(1/1)

LisaS:
Hallo,

kann mir jemand veraten, warum ich nach dieser Aktion immer ein 'DocLink' Richtext-Feld mehr in den Dok.Properties sehe?

--- Code: ---Forall elem In tmpC
Set col = view.GetAllDocumentsByKey(elem)
If Not col Is Nothing Then
Set doc = col.GetFirstDocument
Do Until doc Is Nothing
Set rti = doc.GetFirstItem( "DocLink" )
Call rti.AppendDocLink( thisDoc, "Zum Projekt " + Cstr(thisDoc.proj_md_Number(0)),Cstr(thisDoc.proj_md_Number(0)) )
Call doc.Save( False, True )
Set doc = col.GetNextDocument(doc)
Loop
End If
End Forall
--- Ende Code ---
Eigendlich sollte der Link in das vorhandene Richtextfeld.
Wenn ich das Dok. dann im Frontend öffne und speicher, dann ist wieder nur ein 'DocLink'-Feld in den Properties zu sehen.

Helft mir mal bitte auf die sprünge..
Grüße
Hitcher

LisaS:
Habs gefunden:

--- Code: ---Forall elem In tmpC
Set col = view.GetAllDocumentsByKey(Fulltrim(elem))
If Not col Is Nothing Then
Set doc = col.GetFirstDocument
Do Until doc Is Nothing
Set rti = New notesrichtextitem(doc,"DocLink")
Call rti.AppendDocLink( thisDoc, "Zum Projekt " + Cstr(thisDoc.proj_md_Number(0)),Cstr(thisDoc.proj_md_Number(0)) )
Call doc.Save( False, True )
Set doc = col.GetNextDocument(doc)
Loop
End If
End Forall
--- Ende Code ---
So geht es.... ;D

Grüße

Navigation

[0] Themen-Index