I'm opening the Dialogbox using the Queryopendocument event of a view.

Dim doc as NotesDocument
Dim ws as New NotesUIWorkspace
Set doc = Source.Documents.GetFirstDocument()
If not doc is Nothing then
  Call ws.Dialogbox("Item", True, True, True, False, False, False, "My Item", doc, True, True, True)
End If
'Set Continue to false to prohibit opening of the document
Continue = False

The dialogbox opens fine and displays the data. Now, on the dialogbox form there is a button to open a Picklist so I can pick a different item. I want my selection to populate the ItemName field on the dialogbox.

Here's the code for the button.

sContent:=@PickList( [Custom]:[Single] ; "" ; "ProductLookup" ; "Product Selector" ; "Select a product from the list"; 4);
@SetField("ItemName";"sContent")

The problem is, when I click the button on the dialogbox and the picklist pops open, the underlying dialogbox closes.