reload Form in Composite Application

[zoro07]

I have a Composite Application with an outline navigator.
I would like to make an action button on a form to reload that same form in the composite application.
In Lotusscript I made the following :

Sub Click(Source As Button)
Dim doc As NotesDocument
Dim uiDoc As NotesUIDocument
Dim workspace As New NotesUIWorkspace
Set uidoc = workspace.CurrentDocument
Set doc = uidoc.Document
doc.SaveOptions = "0"
Call uidoc.Close (True)
Call workspace.ComposeDocument( "", "", "foto" )
End Sub

This works fine when run in the form seperately but not when run in the Composite Application.