Hi,I have a multi valued dialog box field. the values are picked up from a view column. When the users select multiple values, we need to append doclinks in a rich text field. This is working fine!.
However, when i again try to select a few more values in the dialoglist field, the values get overwritten… My requirements is to append the doclnks to the already exisitng list of doclinks in the richtext?
Any advise on how to do this?
My code snippet
Dim resumesSel As NotesItem
'This is the dialoglist field
Set resumesSel = doc.getfirstItem(“AssignResSelect”)
Dim rtItemNew As Variant
If Not resumesSel Is Nothing Then
Forall resumes In resumesSel.values
'Get the corresponding resume document for each of the resumes selected.
Dim resView As NotesView
Set resView = db.getView(“ResumeViewforLookup”)
Dim resDoc As NotesDocument
Set resDoc = resView.GetDocumentByKey(resumes,True)
'This part of the code checks if the resume already has been assigned to some other requirement. if yes, prompt the user
If Not resDoc Is Nothing Then
Set rtItemNew =resDoc.GetFirstItem(“AssignedReq”)
If rtItemNew.Type = RICHTEXT Then
Call rtItemNew.AppendText("PMP Ref id " + doc.PMPRef(0))Call rtItemNew.AppendDocLink(doc,“Document Link”)
Call rtItemNew.addNewLine(1)
End If
Call uidoc.refresh
Call resDoc.Save(True,False)
end if
end forall
end if