HCL
Skip to main content  
 
   


SPRTechnote


Document is deleted from both the mail file and archive database when attempting to archive it twice via drag and drop

Technote Number: 1199026


Problem:
This issue has been reported to Quality Engineering as SPR# GPKS68JKDY;
however, there are no plans to address it in Notes 6.x.

It is possible that the document(s) may be recovered from the Trash folder
within the Archive database if the Soft Deletions property for the database is
enabled (this property is enabled by default in the mail template). To do
this, open the Trash folder, locate the document(s), and then select the
Restore action button.

To avoid this issue in the future, refresh the view after an error occurs when
you attempt to archive documents using drag and drop.

Supporting Information:
Workaround:
This issue occurs, in part, because the LotusScript code within the
PostDropToArchive event in the Database script does not refresh the view after
the error occurs. The following modification to the event's code will result
in the view refresh (rebuild in this case) carrying out.

1. Using the Designer client, open the mail database and/or template, and in
the design elements listing, select Other -> Database Resources.
2. In the Design pane select the PostDropToArchive event.
3. Modify the code, adding the lines noted below.

Sub Postdroptoarchive(Source As Notesuidatabase, Entryname As Variant, Continue
As Variant)
Dim policy As String

policy = entryname

Dim collection As notesdocumentcollection
Set collection = source.documents

On Error 4000 Goto Error_4000 'Add this line
Call source.Database.ArchiveNow( collection, policy )

Dim ws As New NotesUIWorkspace
Call ws.CurrentView.View.Refresh 'Remove this line if using a 7.x design

'Add the line below if using a 7.x design
Call ws.ViewRebuild
Exitsub:
Exit Sub
Error_4000:
Messagebox Error
If Error="Notes error: Some of the selected documents " &_
"were not deleted because they are still required in this database." Then
Resume Next
Else
Resume Exitsub
End If
End Sub

Note: The event's code can vary slightly. For example in Notes 7.x designs the
DIM statements may appear at the top of the code in some releases and in the
body of the code in others - this will have no effect on the workaround.
More >





  Document options
Print this document
Print view

  Search
Search Advanced Search


  Fix list views

 RSS feeds   RSS
Subscribe to the fix list

  Resources
Using this database
View notices

  HCL Support
HCL Support


    About HCL Privacy Contact