Creating Popup Menu in Desktop Intelligence

Question

I need help creating a popup menu in the Tool menu of Deski.
This popup needs to be visible when a report is open or when no report is open.
It's my first add-in and I can't make my code work.
Sub BuildMyMenu()
Dim PopMenu As CmdBarControl
Dim CleanPop As CmdBarControl
Dim unvButton As CmdBarControl
Dim lsiButton As CmdBarControl
On Error Resume Next    'disable errors temporarily
Set PopMenu = Application.CmdBars(1).Controls("&Tools").Controls("&Clean-Up Utility")
    If Err.Number = 0 Then  'button already exists
        Button.Delete       'delete it so that it can be re-defined
    Else
        Err.Clear           'clear the error so other testing can take place
    End If
Set PopMenu = Application.CmdBars(1).Controls("&Tools").Controls.Add(boBarPopup)
PopMenu.Caption = "&Clean-Up Utility"
PopMenu.DescriptionText = "Clean-Up Utility"
PopMenu.TooltipText = "Clean-Up Utility"
Set unvButton = PopMenu.CmdBarPopup.Controls.Add(boControlButton)
unvButton.Caption = "C&lean-Up Universe..."
unvButton.DescriptionText = "Clean-Up Universe"
unvButton.TooltipText = "Clean-Up Universe"
unvButton.OnAction = filename(ThisDocument) & "!ShowUserForm2"
Set PopMenu = Application.CmdBars(2).Controls("&Tools").Controls("&Clean-Up Utility")
    If Err.Number = 0 Then  'button already exists
        Button.Delete       'delete it so that it can be re-defined
    Else
        Err.Clear           'clear the error so other testing can take place
    End If
Set PopMenu = Application.CmdBars(2).Controls("&Tools").Controls.Add(boBarPopup)
PopMenu.Caption = "&Clean-Up Utility"
PopMenu.DescriptionText = "Clean-Up Utility"
PopMenu.TooltipText = "Clean-Up Utility"
Set unvButton = PopMenu.CmdBarPopup.Controls.Add(boControlButton)
unvButton.Caption = "C&lean-Up Universe..."
unvButton.DescriptionText = "Clean-Up Universe"
unvButton.TooltipText = "Clean-Up Universe"
unvButton.OnAction = filename(ThisDocument) & "!ShowUserForm2"
End Sub
What I need is a popup menu from the Tools menu, that says "Clean-Up Utilities". From that popup menu, 2 more buttons: one that says "Clean-Up Universes" and the other "Clean-Up LSI".
Thanks for your help.

Answer 1

In what way, exactly, isn't it working? Do you see the pop up menu at all?
Did you make sure that JS is enabled in your Acrobat?
I've ran the code and it seems to work fine for me. However, I don't quite
get what it's supposed to do.
Is it supposed to take the user to a specific page, or to a named
destination? It seems like it's trying to do both, which doesn't make much
sense.