theObject := @Prompt([OKCANCELLIST]; "Insert Document Object"; "Pick an object
type to insert. Use the first option for any object type not listed."; ""; "
An object type not listed" : "Microsoft Excel Worksheet" : "Adobe Acrobat
Document" : "Microsoft Graph 5.0" : "Microsoft Graph 3.0" : "Microsoft Excel
Chart" : "Microsoft Word 2.0 Document" : "Microsoft Word 6.0 Document");
@If(theObject = 1; @Return(@Prompt([OK]; "No Selection"; "Be sure to click on
one of the listed choices before clicking OK.")); @Success);
@If(theObject = " An object type not listed"; @Do(@PostedCommand([EditDown]);