/// <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);

            }
        }
Example #2
0
        private static void RemoveMenus()
        {
            SAPbouiCOM.Menus Menus = sbo_application.Menus;

            if (Menus.Exists(UserMenu.MenuPrincipal))
            {
                Menus.RemoveEx(UserMenu.MenuPrincipal);
            }
            if (Menus.Exists(UserMenu.Configuracion))
            {
                Menus.RemoveEx(UserMenu.Configuracion);
            }
            if (Menus.Exists(UserMenu.MenuCalidad))
            {
                Menus.RemoveEx(UserMenu.MenuCalidad);
            }
            if (Menus.Exists(UserMenu.MenuComex))
            {
                Menus.RemoveEx(UserMenu.MenuComex);
            }
            if (Menus.Exists(UserMenu.MenuProduccion))
            {
                Menus.RemoveEx(UserMenu.MenuProduccion);
            }
            if (Menus.Exists(UserMenu.MenuRecepcion))
            {
                Menus.RemoveEx(UserMenu.MenuRecepcion);
            }
            if (Menus.Exists(UserMenu.DeleteRow))
            {
                Menus.RemoveEx(UserMenu.DeleteRow);
            }
        }
Example #3
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);
                }
            }
        }
Example #4
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);
            }
        }
Example #5
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);
            }
        }
Example #6
0
        public override void etAfterClick(ref SAPbouiCOM.ItemEvent pVal, ref bool BubbleEvent)
        {
            base.etAfterClick(ref pVal, ref BubbleEvent);
            if (pVal.ItemUID == "btPrint")
            {
                SAPbouiCOM.Menus mnus = oApplication.Menus;

                if (mnus.Exists(printMenuId))
                {
                    mnus.Item(printMenuId).Activate();
                }
                else
                {
                    oApplication.MessageBox("Please upload Production Sequence Report in production report menu");
                }
            }
            if (pVal.ItemUID == opALL.Item.UniqueID || pVal.ItemUID == opREL.Item.UniqueID || pVal.ItemUID == opPL.Item.UniqueID)
            {
                fillReport();
            }
            if (pVal.ItemUID == "btUp")
            {
                int selRow = mtSelRow(mtReport);
                if (selRow > 1)
                {
                    int DE1 = Convert.ToInt32(dtRpt.GetValue("DocEntry", selRow - 1));
                    int DE2 = Convert.ToInt32(dtRpt.GetValue("DocEntry", selRow - 2));

                    string strPos1 = Convert.ToString(dtRpt.GetValue("Seq", selRow - 1));
                    string strPos2 = Convert.ToString(dtRpt.GetValue("Seq", selRow - 2));

                    if (strPos1 != "" && strPos2 != "")
                    {
                        int Pos1 = Convert.ToInt32(dtRpt.GetValue("Seq", selRow - 1));
                        int Pos2 = Convert.ToInt32(dtRpt.GetValue("Seq", selRow - 2));

                        string pl1 = Convert.ToString(dtRpt.GetValue("ProdLine", selRow - 1));
                        string pl2 = Convert.ToString(dtRpt.GetValue("ProdLine", selRow - 2));


                        if (pl1 == pl2 && pl1 != "")
                        {
                            MoveUp(DE1, DE2, Pos1, Pos2);
                            mtReport.SelectRow(selRow - 1, true, false);
                        }
                    }
                    else
                    {
                        oApplication.MessageBox("Please check if production order has been assigned to production line and can be moved");
                    }
                }
            }
            if (pVal.ItemUID == "chMan")
            {
                chApply();
            }
            if (pVal.ItemUID == "btDown")
            {
                int selRow = mtSelRow(mtReport);
                if (selRow < mtReport.RowCount)
                {
                    int    DE1     = Convert.ToInt32(dtRpt.GetValue("DocEntry", selRow - 1));
                    int    DE2     = Convert.ToInt32(dtRpt.GetValue("DocEntry", selRow));
                    string strPos1 = Convert.ToString(dtRpt.GetValue("Seq", selRow - 1));
                    string strPos2 = Convert.ToString(dtRpt.GetValue("Seq", selRow));

                    if (strPos1 != "" && strPos2 != "")
                    {
                        int    Pos1 = Convert.ToInt32(strPos1);
                        int    Pos2 = Convert.ToInt32(strPos2);
                        string pl1  = Convert.ToString(dtRpt.GetValue("ProdLine", selRow - 1));
                        string pl2  = Convert.ToString(dtRpt.GetValue("ProdLine", selRow));


                        if (pl1 == pl2 && pl1 != "")
                        {
                            MoveDown(DE1, DE2, Pos1, Pos2);
                            mtReport.SelectRow(selRow + 1, true, false);
                        }
                    }
                    else
                    {
                        oApplication.MessageBox("Please check if production order has been assigned to production line and can be moved");
                    }
                }
            }

            if ((pVal.ItemUID == opOd.Item.UniqueID || pVal.ItemUID == opDd.Item.UniqueID || pVal.ItemUID == "txFrom" || pVal.ItemUID == "txTo") && !initiallizing)
            {
                if (txFrom.Value != "" || txTo.Value != "")
                {
                    fillReport();
                }
            }
        }