[Last Call] Learn how to a build a cloud-first strategyRegister Now

x
?
Solved

Question for melbor1

Posted on 2001-07-25
2
Medium Priority
?
190 Views
Last Modified: 2013-12-18
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.
0
Comment
Question by:GaryZ
2 Comments
 
LVL 2

Accepted Solution

by:
melbor1 earned 600 total points
ID: 6317539
From Notes help:

CopyAllItems method  

Example
Given a destination document, copies all of the items in the current document into the destination document. The item names are unchanged.
Defined in
NotesDocument
Data Type
Boolean
Syntax
Call notesDocument.CopyAllItems( notesDocument  [, replace ] )
Parameters
notesDocument
The destination document.
replace
Boolean. If True, the items in the destination document are replaced. If False (default), the items in the destination document are addended.
Example
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,

Melissa
0
 

Author Comment

by:GaryZ
ID: 6318096
Thanks, I'm still learning formula language will have to start on Lotus Script.
0

Featured Post

Hire Technology Freelancers with Gigs

Work with freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely, and get projects done right.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This is an old article, please see an updated version of this article, located here: http://www.experts-exchange.com/articles/23619/Notes-8-5x-Windows-7-Notes-info-and-tips.html
I thought it will be a good idea to make a post as it will help in case someone else faces these issues. I trust this gives an idea how each entry in Notes.ini can mean a lot for the Domino Server to be functioning properly. This article discusses t…
Loops Section Overview
As many of you are aware about Scanpst.exe utility which is owned by Microsoft itself to repair inaccessible or damaged PST files, but the question is do you really think Scanpst.exe is capable to repair all sorts of PST related corruption issues?
Suggested Courses

830 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question