Pesaroso, você é direito. Precisa “ajustou o docA = o dc.GetNextDocument (docA)” imediatamente antes que o wend.
O laço não era o ponto, embora. A diferença importante é que cria um doclink ao original original, sem fazer a docB uma resposta. Isto é conseguido perto
RTI não ofuscante como NotesRichTextItem
…
ajustar RTI = NotesRichTextItem novo (docB, “CopyOrigin”)
chamar rti.AppendDoclink (docA, "", o "")