Question for melbor1

I am posting this for Melissa, since it was actually posted as an answer to one of my other questions.

You said in a previous post:

"If the user creates F2 after F1, then create F2 in the backend first and use "CopyAllItems" from NotesDocument
to pull all the items from F1 to F2.  Do the same thing from f2 to F3.  That way all items are stored
in F3 and you don't have to change the form design to access the items through the backend.

In this situation, the F2 has to be created from an action in F1 and likewise F2 to F3, or from a view
with F1/F2 selected."

My original project has changed (who whould have guessed?) and I think this is a good solution my the  
the latest requirements. However, I cannot find a command "CopyAllItems".

Could you please explain.
Who is Participating?
melbor1Connect With a Mentor Commented:
From Notes help:

CopyAllItems method  

Given a destination document, copies all of the items in the current document into the destination document. The item names are unchanged.
Defined in
Data Type
Call notesDocument.CopyAllItems( notesDocument  [, replace ] )
The destination document.
Boolean. If True, the items in the destination document are replaced. If False (default), the items in the destination document are addended.
See Also
AppendItemValue method
Copying an item
CopyItem method
CopyItemToDocument method (in NotesItem)
GetFirstItem method
Items property
NotesItem class
ReplaceItemValue method

So, you would have from F1 to F2.....
(This script is for the Notes Client - I can't remember where you were using this...)

Dim session as New NotesSession
Dim workspace as New NotesUIWorkspace
Dim db as NotesDatabase
Dim uiDoc as NotesUIDocument
Dim form1Doc as NotesDocument
Dim form2Doc as NotesDocument

Set db = session.CurrentDatabase
Set form1Doc = workspace.CurrentDocument.document

'create the form2 doc
Set form2Doc = db.CreateDocument
Call form1Doc.CopyAllItems( form2Doc, True )

'set the form
form2Doc.Form = "F2"
Call form2Doc.Save( True, False )

'Bring up the form2 doc in edit mode
Set uiDoc = workspace.EditDocument( True, form2Doc, False )

Hope this helps and will work for you.
Let me know,

GaryZAuthor Commented:
Thanks, I'm still learning formula language will have to start on Lotus Script.
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.