Пример #1
0
        public void crearMenu()
        {
            try
            {
                Config.getConfig().conectarGuiApi(ref app);
                Config.getConfig().setCompany(ref oCompany, ref app);
                menues  = app.Menus;
                paquete = (SAPbouiCOM.MenuCreationParams)app.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams);

                // el menu item con el Id 2304 pertenece al menu de las compras
                menuItem = app.Menus.Item("2304");
                menues   = menuItem.SubMenus;

                paquete.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                paquete.UniqueID = "mnuSolicitudCmp";
                paquete.String   = "Solicitud de Compra";
                paquete.Enabled  = true;
                paquete.Position = 0;

                menues.AddEx(paquete);
                Config.getConfig().guardarComoXML(app.Menus.GetAsXML(), "menu.xml");
            }
            catch
            {
            }
        }
Пример #2
0
        private static void AddMenuItems()
        {
            try
            {
                sbo_application.Forms.GetFormByTypeAndCount(169, 1).Freeze(true);

                SAPbouiCOM.MenuItem MenuItemModules = sbo_application.Menus.Item(SAPMenu.MenuModules);

                int position = MenuItemModules.SubMenus.Count;

                SAPbouiCOM.MenuItem menuItem = MenuItemModules.SubMenus.Add(UserMenu.MenuPrincipal, $"{AddOnName} {Assembly.GetEntryAssembly().GetName().Version.ToString().Replace(".0.0", "")}", SAPbouiCOM.BoMenuType.mt_POPUP, position);

                menuItem.SubMenus.Add(UserMenu.Configuracion, "Configuracion", SAPbouiCOM.BoMenuType.mt_STRING, 0);
                menuItem.SubMenus.Add(UserMenu.MenuRecepcion, "Recepcion", SAPbouiCOM.BoMenuType.mt_POPUP, ++position);
                menuItem.SubMenus.Add(UserMenu.MenuCalidad, "Calidad", SAPbouiCOM.BoMenuType.mt_POPUP, ++position);
                menuItem.SubMenus.Add(UserMenu.MenuProduccion, "Produccion", SAPbouiCOM.BoMenuType.mt_POPUP, ++position);
                menuItem.SubMenus.Add(UserMenu.MenuComex, "Comex", SAPbouiCOM.BoMenuType.mt_POPUP, ++position);

                foreach (var assembly in CommonFunctions.GetAssemblies(AppDomain.CurrentDomain.BaseDirectory))
                {
                    foreach (Type t in Assembly.LoadFrom(assembly.FullName).GetTypes())
                    {
                        if (t.GetInterface("ISAPBusinessOne") != null)
                        {
                            try
                            {
                                ISAPBusinessOne pluginclass = Activator.CreateInstance(t) as ISAPBusinessOne;

                                string fatherMenu      = pluginclass.FatherMenu();
                                string menuUID         = pluginclass.MenuUID();
                                string captionMenuItem = pluginclass.CaptionMenuItem();

                                if (!string.IsNullOrEmpty(menuUID))
                                {
                                    if (MenuItemModules.SubMenus.Exists(fatherMenu))
                                    {
                                        SAPbouiCOM.MenuItem fatherMenuItem = MenuItemModules.SubMenus.Item(fatherMenu);
                                        position = fatherMenuItem.SubMenus.Count;
                                        fatherMenuItem.SubMenus.Add(menuUID, captionMenuItem, SAPbouiCOM.BoMenuType.mt_STRING, position);
                                    }
                                }
                            }
                            catch (Exception ex)
                            {
                                sbo_application.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error);
                            }
                        }
                    }
                }
            }
            catch (Exception ex)
            {
                sbo_application.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error);
            }
            finally
            {
                sbo_application.Forms.GetFormByTypeAndCount(169, 1).Freeze(false);
                sbo_application.Forms.GetFormByTypeAndCount(169, 1).Update();
            }
        }
Пример #3
0
        public void CreateMenuFolder(string menuId, string MenuName, string ParentId, int Position)
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;
            try
            {
                SAPbouiCOM.MenuCreationParams oCreationPackage = null;
                oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(oApplication.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
                oMenuItem        = oApplication.Menus.Item(ParentId); // moudles'

                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_POPUP;
                oCreationPackage.UniqueID = menuId;
                oCreationPackage.String   = MenuName;
                oCreationPackage.Enabled  = true;
                oCreationPackage.Position = Position;

                oMenus = oMenuItem.SubMenus;
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception e)
            {
                if (!e.Message.Equals("Menu - Already exists  [66000-68]"))
                {
                    oApplication.MessageBox(e.Message, 1, "Ok", "", "");
                }
            }
        }
Пример #4
0
        private void CreateMenuItem(SAPbouiCOM.BoMenuType mType, string uniqueID, string desc, int position, string menuItemId)
        {
            SAPbouiCOM.Menus    Menu     = null;
            SAPbouiCOM.MenuItem MenuItem = null;
            Menu = oApplication.Menus;
            string rootPath = System.Windows.Forms.Application.StartupPath;

            SAPbouiCOM.MenuCreationParams CreationPara = null;
            CreationPara = (SAPbouiCOM.MenuCreationParams)(oApplication.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams));
            MenuItem     = oApplication.Menus.Item(menuItemId);

            try
            {
                Menu = MenuItem.SubMenus;
                CreationPara.Type     = mType;
                CreationPara.UniqueID = uniqueID;
                CreationPara.String   = desc;
                CreationPara.Position = position;
                Menu.AddEx(CreationPara);
            }
            catch (Exception ex)
            {
                string s = ex.ToString();
                //Global.SapApplication.MessageBox(ex.Message, 1, "Ok", "", "");
            }
        }
Пример #5
0
        public void AddMenuItems()
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            SAPbouiCOM.Menus oMenus2 = null;

            oMenus = Application.SBO_Application.Menus;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem        = Application.SBO_Application.Menus.Item("43520"); // moudles'
            oMenus           = oMenuItem.SubMenus;

            try
            {
                oMenus2 = oMenus.Item(7).SubMenus.Item(4).SubMenus;
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Traslados.Form1";
                oCreationPackage.String   = "Traslados de Corrales a Subastas";
                oCreationPackage.Position = oMenus2.Count + 1;
                oMenus2.AddEx(oCreationPackage);
                Application.SBO_Application.SetStatusBarMessage("Addon Corrales a Subastas Listo", SAPbouiCOM.BoMessageTime.bmt_Short, false);
            }
            catch (Exception e)
            {
                //Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #6
0
        protected void AddDeleteMenu()
        {
            SAPbouiCOM.MenuItem oMenuItem = null;
            SAPbouiCOM.Menus    oMenus    = null;

            try
            {
                //  CREATE MENU POPUP MYUSERMENU01 AND ADD IT TO TOOLS MENU
                SAPbouiCOM.MenuCreationParams oCreationPackage = null;
                oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));

                oMenuItem = Application.SBO_Application.Menus.Item("1280"); // Data'

                if (!oMenuItem.SubMenus.Exists("DeleteLine"))
                {
                    oMenus = oMenuItem.SubMenus;
                    oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                    oCreationPackage.UniqueID = "DeleteLine";
                    oCreationPackage.String   = "Delete Line";
                    oCreationPackage.Enabled  = true;
                    oMenus.AddEx(oCreationPackage);
                }
            }
            catch (Exception ex)
            {
            }
        }
        /// <summary>
        /// Adiciona novo item no menu
        /// </summary>
        /// <param name="menu">Item a ser adicionado</param>
        public void Add(MenuModel menu)
        {
            SAPbouiCOM.MenuItem oMenuItem = null;
            SAPbouiCOM.Menus oMenus = SBOApp.Application.Menus;
            SAPbouiCOM.MenuCreationParams oCreationPackage = null;

            if (!String.IsNullOrEmpty(menu.Parent))
            {
                oMenuItem = SBOApp.Application.Menus.Item(menu.Parent);
            }

            if (oMenuItem.SubMenus != null)
            {
                oMenus = oMenuItem.SubMenus;
            }

            if (!oMenus.Exists(menu.UniqueID))
            {
                oCreationPackage = (SAPbouiCOM.MenuCreationParams)SBOApp.Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams);
                oCreationPackage.Type = (SAPbouiCOM.BoMenuType)Convert.ToInt32(menu.Type);
                oCreationPackage.UniqueID = menu.UniqueID;
                oCreationPackage.String = menu.Description;
                oCreationPackage.Enabled = menu.Enabled;

                if (menu.Type == EnumMenuType.mt_POPUP)
                {
                    oCreationPackage.Image = menu.ImageName;
                }

                oCreationPackage.Position = menu.Position;

                oMenus.AddEx(oCreationPackage);

            }
        }
Пример #8
0
    public SAPbouiCOM.Menus AddMenu(string _UniID, string _text, string _location)
    {
        SBO_Application.StatusBar.SetText("Menu建立中....", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning);

        SAPbouiCOM.MenuCreationParams oCreationPackage = null;
        oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
        string sPath = null;

        //sPath = System.IO.Directory.GetParent(Application.StartupPath).ToString();
        //sPath = System.IO.Directory.GetParent(sPath).ToString() + "\\";

        oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_POPUP;
        oCreationPackage.UniqueID = _UniID;
        oCreationPackage.String   = _text;
        oCreationPackage.Position = 0;
        try
        {
            SBO_Application.Menus.Item(_location).SubMenus.AddEx(oCreationPackage);
            SBO_Application.StatusBar.SetText("SDK:Menu建立完成....", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning);
        }
        catch (Exception ex)
        {   //  Menu already exists
            SBO_Application.StatusBar.SetText("SDK:Menu已存在....", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning);
        }
        SAPbouiCOM.MenuItem oMenuItem = SBO_Application.Menus.Item(_UniID);
        SAPbouiCOM.Menus    oMenus    = oMenuItem.SubMenus;
        return(oMenus);
    }
Пример #9
0
    private void AddePaymentFormMenu()
    {
        try
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            oMenus = SBO_Application.Menus;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage          = ((SAPbouiCOM.MenuCreationParams)(SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem                 = SBO_Application.Menus.Item("2048"); // Sales A/R
            oMenus                    = oMenuItem.SubMenus;
            oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
            oCreationPackage.UniqueID = menuePaymentForm;
            oCreationPackage.String   = "eBizCharge ePayment Form";
            oCreationPackage.Enabled  = true;
            oCreationPackage.Image    = null;
            oCreationPackage.Position = 16;

            oMenus.AddEx(oCreationPackage);
        }
        catch (Exception ex)
        {
            if (ex.Message.IndexOf("66000-68") == -1)
            {
                errorLog(ex);
            }
        }
    }
Пример #10
0
        public void AddMenuItems()
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            oMenus = Application.SBO_Application.Menus;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem        = Application.SBO_Application.Menus.Item("43520"); // moudles'

            oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_POPUP;
            oCreationPackage.UniqueID = "UGRS.AddOn.AccountingAccounts";
            oCreationPackage.String   = "Nomina";
            oCreationPackage.Enabled  = true;
            oCreationPackage.Position = -1;

            oMenus = oMenuItem.SubMenus;

            try
            {
                //  If the manu already exists this code will fail
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception e)
            {
            }

            try
            {
                // Get the menu collection of the newly added pop-up item
                oMenuItem = Application.SBO_Application.Menus.Item("UGRS.AddOn.AccountingAccounts");
                oMenus    = oMenuItem.SubMenus;

                // Create s sub menu
                //oCreationPackage.Type = SAPbouiCOM.BoMenuType.mt_STRING;
                //oCreationPackage.UniqueID = "UGRS.AddOn.AccountingAccounts.frmSetup";
                //oCreationPackage.String = "Configuraciones";
                //oMenus.AddEx(oCreationPackage);

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.AccountingAccounts.frmImport";
                oCreationPackage.String   = "Importar";
                oMenus.AddEx(oCreationPackage);


                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.AccountingAccounts.frmConfiguracion";
                oCreationPackage.String   = "Configuración";
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception er)
            { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #11
0
        public void AddMenuItems()
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            oMenus = Application.SBO_Application.Menus;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem        = Application.SBO_Application.Menus.Item("43520"); // moudles'

            oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_POPUP;
            oCreationPackage.UniqueID = "UGRS.AddOn.Permissions";
            oCreationPackage.String   = "Permisos";
            oCreationPackage.Enabled  = true;
            oCreationPackage.Position = -1;

            oMenus = oMenuItem.SubMenus;

            try
            {
                //  If the manu already exists this code will fail
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception)
            {
            }

            try
            {
                // Get the menu collection of the newly added pop-up item
                oMenuItem = Application.SBO_Application.Menus.Item("UGRS.AddOn.Permissions");
                oMenus    = oMenuItem.SubMenus;

                // Create s sub menu
                //oCreationPackage.Type = SAPbouiCOM.BoMenuType.mt_STRING;
                //oCreationPackage.UniqueID = "UGRS.AddOn.Permissions.Prefix";
                //oCreationPackage.String = "Prefijo de aretes";
                //oMenus.AddEx(oCreationPackage);

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Permissions.NC";
                oCreationPackage.String   = "Notas de crédito";
                oMenus.AddEx(oCreationPackage);


                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Permissions.SO";
                oCreationPackage.String   = "Ordenes de Venta Pendientes";
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception)
            { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #12
0
        public void AddMenuItems()
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            SAPbouiCOM.Menus oMenus2 = null;

            oMenus = Application.SBO_Application.Menus;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem        = Application.SBO_Application.Menus.Item("43520"); // moudles'

            //oCreationPackage.Type = SAPbouiCOM.BoMenuType.mt_POPUP;
            //oCreationPackage.UniqueID = "UGRS.AddOn.CreditAndCollection";
            //oCreationPackage.String = "UGRS.AddOn.CreditAndCollection";
            //oCreationPackage.Enabled = true;
            //oCreationPackage.Position = -1;

            oMenus = oMenuItem.SubMenus;

            try
            {
                //  If the manu already exists this code will fail
                oMenus2 = oMenus.Item(6).SubMenus;
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.CreditAndCollection";
                oCreationPackage.String   = "Credito y Cobranza";
                oCreationPackage.Position = oMenus2.Count + 1;
                oMenus2.AddEx(oCreationPackage);
                Application.SBO_Application.SetStatusBarMessage("Addon Credito y Cobranza Listo", SAPbouiCOM.BoMessageTime.bmt_Short, false);
                //oMenus.AddEx(oCreationPackage);
            }
            catch (Exception e)
            {
            }

            //try
            //{
            //    // Get the menu collection of the newly added pop-up item
            //    oMenuItem = Application.SBO_Application.Menus.Item("UGRS.AddOn.CreditAndCollection");
            //    oMenus = oMenuItem.SubMenus;

            //    // Create s sub menu
            //    oCreationPackage.Type = SAPbouiCOM.BoMenuType.mt_STRING;
            //    oCreationPackage.UniqueID = "UGRS.AddOn.CreditAndCollection.Form1";
            //    oCreationPackage.String = "Form1";
            //    oMenus.AddEx(oCreationPackage);
            //}
            //catch (Exception er)
            //{ //  Menu already exists
            //    Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            //}
        }
        /// <summary>
        /// Converte um objeto SAPBouiCOM.MenuItem para MenuItem
        /// </summary>
        /// <param name="pMenu">Um objeto SAP para o menu</param>
        /// <returns>Um objeto menu</returns>
        public static MenuItem ToMenu(this SAPbouiCOM.MenuItem pMenu)
        {
            MenuItem myMenu = new MenuItem();

            myMenu.Checked = pMenu.Checked;
            myMenu.Enabled = pMenu.Enabled;
            myMenu.Image   = pMenu.Image;
            myMenu.String  = pMenu.String;
            myMenu.Type    = (BoMenuType)pMenu.Type.To <Int32>();
            myMenu.UID     = pMenu.UID;
            return(myMenu);
        }
Пример #14
0
        public void AddMenuItems()
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            oMenus = Application.SBO_Application.Menus;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem        = Application.SBO_Application.Menus.Item("43520"); // moudles'

            oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_POPUP;
            oCreationPackage.UniqueID = "UGRS.AddOn.Corrals";
            oCreationPackage.String   = "Corrales";
            oCreationPackage.Enabled  = true;
            oCreationPackage.Position = -1;

            oMenus = oMenuItem.SubMenus;

            try {
                //  If the manu already exists this code will fail
                oMenus.AddEx(oCreationPackage);
            }
            catch {
            }

            try {
                // Get the menu collection of the newly added pop-up item
                oMenuItem = Application.SBO_Application.Menus.Item("UGRS.AddOn.Corrals");
                oMenus    = oMenuItem.SubMenus;

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Corrals.frmDelivery";
                oCreationPackage.String   = "Distribucíon de Alimento";
                oMenus.AddEx(oCreationPackage);

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Corrals.frmMassBilling";
                oCreationPackage.String   = "Facturación Masiva";
                oMenus.AddEx(oCreationPackage);

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Corrals.frmTransfer";
                oCreationPackage.String   = "Translado Corrales Subasta";
                oMenus.AddEx(oCreationPackage);
            }
            catch { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #15
0
        public void AddMenuItems()
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            oMenus = Application.SBO_Application.Menus;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem        = Application.SBO_Application.Menus.Item("2048"); // moudles'

            oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
            oCreationPackage.UniqueID = "ImpresionMasivaOV";
            oCreationPackage.String   = "Impresion orden venta";
            oCreationPackage.Enabled  = true;
            oCreationPackage.Position = 20;

            oMenus = oMenuItem.SubMenus;
            Log log = new Log();

            log.AddLog("Iniciando Addon impresion OV");

            if (Application.SBO_Application.Menus.Exists("ImpresionMasivaOV") == true)
            {
                Application.SBO_Application.Menus.RemoveEx("ImpresionMasivaOV");
            }

            try
            {
                //  If the manu already exists this code will fail
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception e)
            {
            }

            try
            {
                //// Get the menu collection of the newly added pop-up item
                //oMenuItem = Application.SBO_Application.Menus.Item("ImpresionMasivaOV");
                //oMenus = oMenuItem.SubMenus;

                //// Create s sub menu
                //oCreationPackage.Type = SAPbouiCOM.BoMenuType.mt_STRING;
                //oCreationPackage.UniqueID = "ImpresionMasivaOV.Form1";
                //oCreationPackage.String = "Form1";
                //oMenus.AddEx(oCreationPackage);
            }
            catch (Exception er)
            { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #16
0
        public void AddMenuItems()
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            oMenus = Application.SBO_Application.Menus;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage          = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem                 = Application.SBO_Application.Menus.Item("43520"); // moudles'
            oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_POPUP;
            oCreationPackage.UniqueID = "FRM_KLTT";
            oCreationPackage.String   = "Khối lượng thanh toán";
            //oCreationPackage.Image = System.Windows.Forms.Application.StartupPath + "\\KLTT_Icon.png";
            oCreationPackage.Enabled  = true;
            oCreationPackage.Position = -1;

            oMenus = oMenuItem.SubMenus;
            try
            {
                //  If the manu already exists this code will fail
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception e)
            {
            }

            try
            {
                // Get the menu collection of the newly added pop-up item
                oMenuItem = Application.SBO_Application.Menus.Item("FRM_KLTT");
                oMenus    = oMenuItem.SubMenus;

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "U_KLTT.Form1";
                oCreationPackage.String   = "KLTT";
                oCreationPackage.Enabled  = true;
                oCreationPackage.Position = -1;
                oMenus.AddEx(oCreationPackage);

                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "U_KLTT.Approve_Form";
                oCreationPackage.String   = "Phê duyệt bill thanh toán";
                oCreationPackage.Enabled  = true;
                oCreationPackage.Position = -1;
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception er)
            { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #17
0
        private void oApplication_MenuEvent(ref SAPbouiCOM.MenuEvent pVal, out bool BubbleEvent)
        {
            BubbleEvent = true;
            SAPbouiCOM.Form oForm = null;

            try
            {
                SAPbouiCOM.MenuItem oMenuItems = (SAPbouiCOM.MenuItem)oApplication.Menus.Item("47616");
                //SAPbouiCOM.MenuItem oMenuItems = (SAPbouiCOM.MenuItem)oApplication.Menus.Item("43520");

                try
                {
                    oForm = oApplication.Forms.ActiveForm;
                }
                catch (Exception)
                {
                }

                // Stock Shipment
                if (pVal.MenuUID == "EJ_OSTS" && pVal.BeforeAction == false)
                {
                    WarehouseTransfer.Inventory.clsStockShipment oStockShipment = new WarehouseTransfer.Inventory.clsStockShipment(ref oApplication, ref oCompany);
                }

                // Stock Receipt
                if (pVal.MenuUID == "EJ_OSTR" && pVal.BeforeAction == false)
                {
                    WarehouseTransfer.Inventory.clsStockReceipt oStockReceipt = new WarehouseTransfer.Inventory.clsStockReceipt(ref oApplication, ref oCompany);
                }



                if (oForm != null)
                {
                    // Stock Shipment
                    if (oForm.TypeEx == "EJ_OSTS")
                    {
                        WarehouseTransfer.Inventory.clsStockShipment.clsStockShipment_MenuEvent(ref oApplication, ref oCompany, oForm, ref pVal, ref BubbleEvent);
                    }

                    // Stock Receipt
                    if (oForm.TypeEx == "EJ_OSTR")
                    {
                        WarehouseTransfer.Inventory.clsStockReceipt.clsStockReceipt_MenuEvent(ref oApplication, ref oCompany, oForm, ref pVal, ref BubbleEvent);
                    }
                }
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.Message + "\n" + oCompany.GetLastErrorDescription(), "Error", MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
        }
Пример #18
0
        public void AddMenuItems()
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            oMenus          = Application.SBO_Application.Menus;
            SBO_Application = Application.SBO_Application;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem        = Application.SBO_Application.Menus.Item("43520"); // moudles'

            oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_POPUP;
            oCreationPackage.UniqueID = "TransferenciasBancarias";
            oCreationPackage.String   = "Transferencias Bancarias";
            oCreationPackage.Image    = @"\\fssapbo\SAPB1\Anexos\images\coins_add.png";
            oCreationPackage.Enabled  = true;
            oCreationPackage.Position = -1;

            oMenus = oMenuItem.SubMenus;

            if (SBO_Application.Menus.Exists("TransferenciasBancarias") == true)
            {
                SBO_Application.Menus.RemoveEx("TransferenciasBancarias");
            }

            try
            {
                //  If the manu already exists this code will fail
                oMenus.AddEx(oCreationPackage);
            }
            catch //(Exception e)
            {
            }

            try
            {
                // Get the menu collection of the newly added pop-up item
                oMenuItem = Application.SBO_Application.Menus.Item("TransferenciasBancarias");
                oMenus    = oMenuItem.SubMenus;

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "TransferenciasBancarias.Capa_Presentacion.PagosTransf";
                oCreationPackage.String   = "Pagos para Transferencia";
                oMenus.AddEx(oCreationPackage);
            }
            catch //(Exception er)
            {     //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #19
0
        public void AddMenuItems()
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            oMenus = Application.SBO_Application.Menus;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem        = Application.SBO_Application.Menus.Item("43520"); // moudles'

            oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_POPUP;
            oCreationPackage.UniqueID = "ProjectManagement_Function_AddOn";
            oCreationPackage.String   = "ProjectManagement_Function_AddOn";
            oCreationPackage.Enabled  = true;
            oCreationPackage.Image    = System.Windows.Forms.Application.StartupPath + "\\Addons-icon.png";
            oCreationPackage.Position = -1;

            oMenus = oMenuItem.SubMenus;

            try
            {
                //  If the manu already exists this code will fail
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception e)
            {
            }

            try
            {
                // Get the menu collection of the newly added pop-up item
                oMenuItem = Application.SBO_Application.Menus.Item("ProjectManagement_Function_AddOn");
                oMenus    = oMenuItem.SubMenus;

                // Create s sub menu 1
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "ProjectManagement_Function_AddOn.Form1";
                oCreationPackage.String   = "Clone";
                oMenus.AddEx(oCreationPackage);

                // Create s sub menu 2
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "ProjectManagement_Function_AddOn.Form2";
                oCreationPackage.String   = "Import";
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception ex)
            { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #20
0
        public void AddMenuItems()
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            oMenus = Application.SBO_Application.Menus;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem        = Application.SBO_Application.Menus.Item("43520"); // moudles'

            oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_POPUP;
            oCreationPackage.UniqueID = "Subasta";
            oCreationPackage.String   = "Subasta";
            oCreationPackage.Enabled  = true;
            oCreationPackage.Position = -1;

            oMenus = oMenuItem.SubMenus;

            try
            {
                //  If the manu already exists this code will fail
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception)
            {
            }

            try
            {
                // Get the menu collection of the newly added pop-up item
                oMenuItem = Application.SBO_Application.Menus.Item("Subasta");
                oMenus    = oMenuItem.SubMenus;

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Auctions.frmPayment";
                oCreationPackage.String   = "Cobros";
                oMenus.AddEx(oCreationPackage);

                // Create Mail sender sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Auctions.Forms.frmMailSender";
                oCreationPackage.String   = "Envio de correos";
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception)
            { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #21
0
        public void AddMenuItems()
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            oMenus = Application.SBO_Application.Menus;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem        = Application.SBO_Application.Menus.Item("43520"); // moudles'

            oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_POPUP;
            oCreationPackage.UniqueID = "U_ApproveJV";
            oCreationPackage.String   = "Bill Ban chỉ huy / Văn phòng";
            oCreationPackage.Enabled  = true;
            oCreationPackage.Position = -1;

            oMenus = oMenuItem.SubMenus;

            try
            {
                //  If the manu already exists this code will fail
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception e)
            {
            }

            try
            {
                // Get the menu collection of the newly added pop-up item
                oMenuItem = Application.SBO_Application.Menus.Item("U_ApproveJV");
                oMenus    = oMenuItem.SubMenus;

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "U_ApproveJV.BILL_VP";
                oCreationPackage.String   = "Tạo bill văn phòng";
                oMenus.AddEx(oCreationPackage);

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "U_ApproveJV.Form1";
                oCreationPackage.String   = "Phê duyệt chi phí BCH - VP";
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception er)
            { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #22
0
        public void AddMenuItems()
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            oMenus = Application.SBO_Application.Menus;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem        = Application.SBO_Application.Menus.Item("3328"); // moudles'

            oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
            oCreationPackage.UniqueID = "FuncionalidadesAdicionales";
            oCreationPackage.String   = "Parametros Funcionalidades Adicionales";
            oCreationPackage.Enabled  = true;
            oCreationPackage.Position = -1;

            oMenus = oMenuItem.SubMenus;

            if (Application.SBO_Application.Menus.Exists("FuncionalidadesAdicionales") == true)
            {
                Application.SBO_Application.Menus.RemoveEx("FuncionalidadesAdicionales");
            }

            try
            {
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception) {}

            try
            {
                //// Get the menu collection of the newly added pop-up item
                //oMenuItem = Application.SBO_Application.Menus.Item("FuncionalidadesAdicionales");
                //oMenus = oMenuItem.SubMenus;

                //// Create s sub menu
                //oCreationPackage.Type = SAPbouiCOM.BoMenuType.mt_STRING;
                //oCreationPackage.UniqueID = "FuncionalidadesAdicionales.Form1";
                //oCreationPackage.String = "Form1";
                //oMenus.AddEx(oCreationPackage);
            }
            catch
            { //  Menu already exists
              //Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #23
0
        public void AddMenuItems()
        {
            //Pham Quang Huy add comment Test
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            oMenus = Application.SBO_Application.Menus;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem        = Application.SBO_Application.Menus.Item("43520"); // moudles'

            oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_POPUP;
            oCreationPackage.UniqueID = "UserMenu";
            oCreationPackage.String   = "UserMenu";
            oCreationPackage.Enabled  = true;
            oCreationPackage.Position = -1;

            oMenus = oMenuItem.SubMenus;

            try
            {
                //  If the manu already exists this code will fail
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception e)
            {
            }

            try
            {
                // Get the menu collection of the newly added pop-up item
                oMenuItem = Application.SBO_Application.Menus.Item("UserMenu");
                oMenus    = oMenuItem.SubMenus;

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UserMenu.Form1";
                oCreationPackage.String   = "Form1";
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception er)
            { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #24
0
        public void AddMenuItems()
        {
            SAPbouiCOM.Menus    oMenus    = null;
            SAPbouiCOM.MenuItem oMenuItem = null;

            oMenus = Application.SBO_Application.Menus;

            SAPbouiCOM.MenuCreationParams oCreationPackage = null;
            oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem        = Application.SBO_Application.Menus.Item("43520"); // moudles'

            oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_POPUP;
            oCreationPackage.UniqueID = "Approve_PR";
            oCreationPackage.String   = "Phê duyệt Trình duyệt đầu tư";
            oCreationPackage.Enabled  = true;
            oCreationPackage.Position = -1;

            oMenus = oMenuItem.SubMenus;

            try
            {
                //  If the manu already exists this code will fail
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception e)
            {
            }

            try
            {
                // Get the menu collection of the newly added pop-up item
                oMenuItem = Application.SBO_Application.Menus.Item("Approve_PR");
                oMenus    = oMenuItem.SubMenus;

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "Approve_PR.PR_Aprrove";
                oCreationPackage.String   = "Phê duyệt Trình duyệt đầu tư (Purchase Request)";
                oMenus.AddEx(oCreationPackage);
            }
            catch
            { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #25
0
        public void AddMenuItems()
        {
            oMenus           = Application.SBO_Application.Menus;
            oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
            oMenuItem        = Application.SBO_Application.Menus.Item("43520"); // moudles'

            oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_POPUP;
            oCreationPackage.UniqueID = "UGRS.AddOnFoodTransfer";
            oCreationPackage.String   = "Transferencias";
            oCreationPackage.Enabled  = true;
            oCreationPackage.Position = -1;

            oMenus = oMenuItem.SubMenus;

            SAPbouiCOM.Framework.Application.SBO_Application.ItemEvent += new SAPbouiCOM._IApplicationEvents_ItemEventEventHandler(SBO_Application_ItemEvent);

            try {
                //  If the manu already exists this code will fail
                oMenus.AddEx(oCreationPackage);
            }
            catch {
            }

            try {
                // Get the menu collection of the newly added pop-up item
                oMenuItem = Application.SBO_Application.Menus.Item("UGRS.AddOnFoodTransfer");
                oMenus    = oMenuItem.SubMenus;


                // Create s sub menus
                CreateSubMenu("UGRS.AddOnFoodTransfer.Forms.frmTransfer", "Transferencias Pendientes");
                // CreateSubMenu("UGRS.AddOnFoodTransfer.Forms.frmItems", "Transferencia de Artículos");

                if (CheckUser(SAPbouiCOM.Framework.Application.SBO_Application.Company.UserName))
                {
                    CreateSubMenu("UGRS.AddOnFoodTransfer.Forms.frmProcess", "Proceso de Producción");
                }
            }
            catch { //  Menu already exists
                //Applic|ation.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #26
0
        public override void oApplication_RightClickEvent(ref SAPbouiCOM.ContextMenuInfo eventInfo, out bool BubbleEvent)
        {
            base.oApplication_RightClickEvent(ref eventInfo, out BubbleEvent);
            if (eventInfo.BeforeAction)
            {
                SAPbouiCOM.MenuItem oMenuItem = null;
                SAPbouiCOM.Menus    oMenus    = null;


                try
                {
                    //  Create menu popup MyUserMenu01 and add it to Tools menu
                    SAPbouiCOM.MenuCreationParams oCreationPackage = null;
                    oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(oApplication.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));

                    oMenuItem = oApplication.Menus.Item("1280"); // Data'
                    oMenus    = oMenuItem.SubMenus;

                    if (!oMenus.Exists("addGrp"))
                    {
                        oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                        oCreationPackage.UniqueID = "addGrp";
                        oCreationPackage.String   = "Add new Sub Group";
                        oCreationPackage.Enabled  = true;
                        oMenus.AddEx(oCreationPackage);
                    }
                    if (!oMenus.Exists("remGrp"))
                    {
                        oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                        oCreationPackage.UniqueID = "remGrp";
                        oCreationPackage.String   = "Remove Sub Group";
                        oCreationPackage.Enabled  = true;
                        oMenus.AddEx(oCreationPackage);
                    }
                }
                catch (Exception ex)
                {
                    oApplication.MessageBox(ex.Message);
                }
            }
        }
        /// <summary>
        /// Remove item do menu
        /// </summary>
        /// <param name="menu">Item a ser removido</param>
        public void Remove(MenuModel menu)
        {
            SAPbouiCOM.MenuItem oMenuItem = null;
            SAPbouiCOM.Menus oMenus;

            oMenus = SBOApp.Application.Menus;
            if (!String.IsNullOrEmpty(menu.Parent))
            {
                oMenuItem = SBOApp.Application.Menus.Item(menu.Parent);
            }

            if (oMenuItem.SubMenus != null)
            {
                oMenus = oMenuItem.SubMenus;
            }

            if (oMenus.Exists(menu.UniqueID))
            {
                oMenus.Remove(oMenuItem);
            }
        }
Пример #28
0
        public void AddMenuItems()
        {
            try
            {
                SAPbouiCOM.Menus    oMenus    = null;
                SAPbouiCOM.MenuItem oMenuItem = null;

                oMenus = Application.SBO_Application.Menus;

                SAPbouiCOM.MenuCreationParams oCreationPackage = null;
                oCreationPackage = ((SAPbouiCOM.MenuCreationParams)(Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams)));
                oMenuItem        = Application.SBO_Application.Menus.Item("43520"); // moudles'

                oMenuItem                 = Application.SBO_Application.Menus.Item("43540");
                oMenus                    = oMenuItem.SubMenus;
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "frm_TransferItems";
                oCreationPackage.String   = "Transfer Items";
                if (oMenus.Exists("frm_TransferItems"))
                {
                    oMenus.RemoveEx("frm_TransferItems");
                }
                oMenus.AddEx(oCreationPackage);

                oMenuItem                 = Application.SBO_Application.Menus.Item("11520"); // moudles'
                oMenus                    = oMenuItem.SubMenus;
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "frm_TransferSetup";
                oCreationPackage.String   = "Transfer Items Setup";
                if (oMenus.Exists("frm_TransferSetup"))
                {
                    oMenus.RemoveEx("frm_TransferSetup");
                }
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception ex)
            {
                Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Пример #29
0
        //Creación de menú
        private void crearMenu()
        {
            SAPbouiCOM.Form frmApe = application.Forms.GetFormByTypeAndCount(169, 1);
            frmApe.Freeze(true);

            try
            {
                application.StatusBar.SetText(Constantes.PREFIX_MSG_ADDON + "Cargando opciones de menú", SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_None);

                if (application.Menus.Exists(Constantes.MENU_PRINCIPAL_ID))
                {
                    application.Menus.RemoveEx(Constantes.MENU_PRINCIPAL_ID);
                    frmApe.Update();
                }

                XmlDocument xmlMenu = new XmlDocument();
                xmlMenu.LoadXml(AddonSeidorMobile.Properties.Resources.Menu);
                application.LoadBatchActions(xmlMenu.InnerXml);

                SAPbouiCOM.Menus    oMenus    = application.Menus;
                SAPbouiCOM.MenuItem oMenuItem = application.Menus.Item(Constantes.MENU_PRINCIPAL_ID);

                string path = Path.GetTempPath() + "\\menu_logo.jpg";
                AddonSeidorMobile.Properties.Resources.menu_logo.Save(path);
                oMenuItem.Image = path;

                application.StatusBar.SetText(Constantes.PREFIX_MSG_ADDON + "Menú cargado con éxito", SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Success);
            }
            catch (Exception e)
            {
                application.StatusBar.SetText(Constantes.PREFIX_MSG_ADDON + e.Message, SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Error);
            }
            finally
            {
                frmApe.Freeze(false);
                frmApe.Update();
            }
        }
Пример #30
0
        /// <summary>
        /// Method for creating Menu
        /// </summary>
        /// <param name="parentUID"></param>
        /// <param name="targetMenuUID"></param>
        /// <param name="menuType"></param>
        /// <param name="menuCaption"></param>
        /// <param name="position"></param>
        /// <param name="image"></param>
        void CreateMenuItem(string parentUID, string targetMenuUID, SAPbouiCOM.BoMenuType menuType, string menuCaption, [Optional] int position, [Optional] string image)
        {
            SAPbouiCOM.MenuItem targetMenu = null;

            try
            {
                SAPbouiCOM.Menus oMenus = PublicVariable.oApplication.Menus;

                if (oMenus.Exists(parentUID) == false)
                {
                    PublicVariable.oApplication.StatusBar.SetText(String.Format("Parent Menu {0} not found", parentUID), SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning);
                }

                if (oMenus.Exists(targetMenuUID))
                {
                    oMenus.RemoveEx(targetMenuUID);
                }

                SAPbouiCOM.MenuItem parentMenu = oMenus.Item(parentUID);
                SAPbouiCOM.Menus    subMenus   = parentMenu.SubMenus;

                SAPbouiCOM.MenuCreationParams oMCP = (SAPbouiCOM.MenuCreationParams)PublicVariable.oApplication.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_MenuCreationParams);

                oMCP.UniqueID = targetMenuUID;
                oMCP.Type     = menuType;
                oMCP.String   = menuCaption;
                oMCP.Position = position;
                oMCP.Image    = image;

                targetMenu = subMenus.AddEx(oMCP);
            }
            catch (Exception ex)
            {
                PublicVariable.oApplication.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error);
            }
        }