Buggy ws.editdocument & Domino7

Hi there,we have an app which contains a frameset with 3 frames.

“navigation”, “top” and “content”. “Top” contains a view with existing documents. As you mark one of these docs, it is displayed in the “content”-frame. The form contains a button which copies the doc’s content into a new doc and afterwards opens it in order to edit it. This is the code:

Sub Click(Source As Button)

Dim session As  NotesSession

Dim db As NotesDatabase

Dim workspace As New NotesUIWorkspace

Dim uidoc As NotesUIDocument

Dim item As NotesItem

Dim view As NotesView

Set session = New NotesSession

Set db = session.CurrentDatabase

Set uidoc = workspace.CurrentDocument

Call [function which copies the values to a temp doc]

Set  view = db.GetView("(ListeMaTatDat)")

Call view.Refresh

Call workspace.ViewRefresh

On Error Goto errorhandl



If uidoc.EditMode Then

	Call uidoc.Refresh

	Call uidoc.Save

End If

Call uidoc.Close



Set doc = New notesDocument(db)

doc.form = "TAET"

Set doc.Zeit =tmpZeit [from temp doc]

Set doc.SummeAcc = tmpSummeAcc

Set doc.SummeTat = tmpSummeTat 

Set doc.Bemerkung = tmpBemerkung

Call tmpTatDatum.AdjustDay( 1 )

Set doc.TatDatum = tmpTatDatum

Set doc.MaName = tmpMaName

success = doc.ComputeWithForm( False, False )



Set uidoc = workspace.editdocument(True,doc,False)



Exit Sub

ErrorHandl:

Exit Sub

End Sub

This codes works great w/ Domino6, but not w/ Domino7:

the new doc opens for 0.5 seconds and then the prior doc is displayed again. The funny thing is that not every user has this problem and even these users don’t get the “error” all the time (but mostly!).

Deleting the private-on-firt-use-view from the “top”-frame results in a one-time-succes pressing the button. Afterwards, it doesn’t work any more…

Any suggestion will be appreciated!!!

Thanks in advance,

BUzzy