Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 482
  • Last Modified:

Rich Text Fields from One Doc to Another

In Lotus Notes design ...  I am trying to bring in data from fields in one doc to another (by unique docid) using an action button which has this code below.  This brings in the data sucessfully for Category but not for Body.   The only difference is that Body is a Rich Text field, while Category is not Rich Text.    How do I get a Rich Text field from one doc to another?   Thanks.

REM "The Unique ID field point to doc that houses the template.";
FIELD Body     := Body;
FIELD Category := Category;
@SetField("Body";    @GetDocField("2E02E270D58FA62286256A8F005937DF"; "Body"    ));
@SetField("Category";@GetDocField("2E02E270D58FA62286256A8F005937DF"; "Category"))
0
blyons48
Asked:
blyons48
1 Solution
 
puneetfredCommented:
This is given in Notes help. pls see below:

Examples: AppendRTItem method

This script takes the Body item on document B and appends it to the end of the Body item on document A. The Body item on document B is deleted using the Remove method defined in NotesItem.

Dim docA As NotesDocument
Dim docB As NotesDocument
Dim rtitemA As Variant
Dim rtitemB As Variant
'...set values of docA and docB...
Set rtitemA = docA.GetFirstItem( "Body" )
Set rtitemB = docB.GetFirstItem( "Body" )
If ( rtitemA.Type = RICHTEXT And _
rtitemB.Type = RICHTEXT ) Then
  Call rtitemA.AppendRTItem( rtitemB )
  Call rtitemB.Remove
  Call docA.Save( False, True )
  Call docB.Save( False, True )
End If
0
 
HemanthaKumarCommented:
Your formula will work if you do that from an action/agent from view by selecting the document where you want the contents to be transfered. @getdocfield for Rtitem will not work in UIdocuments. It will work only for backend document. Even the script will append the rtitem, but you have to save and close and reopen the document for the richtext to realize.

~Hemanth
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Tackle projects and never again get stuck behind a technical roadblock.
Join Now