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.

What else is on the dialog box? Why would it close?

I can't remember why but I've run into something like this. I believe you that the dialog box closes; I just don't remember why.

Oh, one other thing -- in the formula you're setting the item to the string "sContent", not the variable sContent. Should be:

@SetField("itemname"; sContent)