Begin Menu % 
      Begin MChoice 1 
         Submenu         =   %A
         Title           =   &File
      End
      Begin MChoice 2 
         Title           =   &Edit
      End
      Begin MChoice 3 
         Title           =   &Window
      End
      Begin MChoice 4 
         Submenu         =   %D
         Title           =   &Help
      End
   End
   Begin Menu %A 
      Visible         =   1
      Begin MChoice 1 
         Title           =   &Open
         Begin Event EvSELECT 
----------- Begin Document ActionLogic 1
	d open^abc
----------- End
         End
      End
      Begin MChoice 2 
         Title           =   &Close
      End
      Begin MChoice 3 
         Title           =   &Exit
      End
   End
   Begin Menu %D 
      Visible         =   1
      Begin MChoice 1 
         Title           =   &About
      End
   End