Exemplo n.º 1
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);
            }
        }
Exemplo n.º 2
0
Arquivo: Menu.cs Projeto: xavl369/UGRS
        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);
            }
        }
Exemplo n.º 3
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);
            }
        }
Exemplo n.º 4
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);
            }
        }
Exemplo n.º 5
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);
            }
        }
Exemplo n.º 6
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);
            }
        }
Exemplo n.º 7
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);
            }
        }
Exemplo n.º 8
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);
            }
        }
Exemplo n.º 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);
            }
        }
    }
Exemplo n.º 10
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", "", "");
                }
            }
        }
Exemplo n.º 11
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
            {
            }
        }
Exemplo n.º 12
0
Arquivo: B1_UI.cs Projeto: Fun33/code
    //public void AddMenuItems(string _UniID, string _text, string sSubLocation )
    //{
    //    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_STRING;
    //    oCreationPackage.UniqueID = _UniID;
    //    oCreationPackage.String = _text;
    //    oCreationPackage.Position = 0;
    //    try
    //    {
    //        //SAPbouiCOM.MenuItem  oMenuItem = SBO_Application.Menus.Item(sSubLocation);

    //        SAPbouiCOM.MenuItem oMenuItem = SBO_Application.Menus.Item(sSubLocation);
    //        oMenuItem.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);
    //    }
    //}

    public void AddMenuItems(string _UniID, string _text, SAPbouiCOM.Menus oMenus)
    {
        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_STRING;
        oCreationPackage.UniqueID = _UniID;
        oCreationPackage.String   = _text;
        oCreationPackage.Position = 0;
        try
        {
            oMenus.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);
        }
    }
Exemplo n.º 13
0
Arquivo: Menu.cs Projeto: xavl369/UGRS
        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);
            }
        }
Exemplo n.º 14
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", "", "");
            }
        }
Exemplo n.º 15
0
 public void CreateSubMenu(string id, string title)
 {
     oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
     oCreationPackage.UniqueID = id;
     oCreationPackage.String   = title;
     oMenus.AddEx(oCreationPackage);
 }
        /// <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);

            }
        }
Exemplo n.º 17
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)
            {
            }
        }
Exemplo n.º 18
0
 public void addMenuItem(String uniqueID, String name, SAPbouiCOM.Menus oMenus, SAPbouiCOM.MenuCreationParams oCreationPackage)
 {
     oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
     oCreationPackage.UniqueID = uniqueID;
     oCreationPackage.String   = name;
     oMenus.AddEx(oCreationPackage);
 }
Exemplo n.º 19
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);
            }
        }
Exemplo n.º 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 = "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);
            }
        }
Exemplo n.º 21
0
Arquivo: Menu.cs Projeto: xavl369/UGRS
        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);
            //}
        }
Exemplo n.º 22
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);
                }
            }
        }
Exemplo n.º 23
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);
            }
        }
Exemplo n.º 24
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);
            }
        }
Exemplo n.º 25
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);
            }
        }
Exemplo n.º 26
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);
            }
        }
Exemplo n.º 27
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);
            }
        }
Exemplo n.º 28
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 = "Colaboradores_3";
            oCreationPackage.String   = "Colaboradores";
            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("Colaboradores_3");
                oMenus    = oMenuItem.SubMenus;

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "Colaboradores_3.Form1";
                oCreationPackage.String   = "Colaboradores";
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception)
            { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Este menu ya existe", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }



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

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "Colaboradores_3.suprasec";
                oCreationPackage.String   = "Supra-Secciones";
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception)
            { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Este menu ya existe", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }


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

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "Colaboradores_3.seccionesgr";
                oCreationPackage.String   = "Secciones";
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception)
            { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Este menu ya existe", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }

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

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "Colaboradores_3.tipcol";
                oCreationPackage.String   = "Tipos de Colaboración";
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception)
            { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Este menu ya existe", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }


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

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "Colaboradores_3.edicionesgr";
                oCreationPackage.String   = "Ediciones";
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception)
            { //  Menu already exists
                Application.SBO_Application.SetStatusBarMessage("Este menu ya existe", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Exemplo n.º 29
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.Machinery";
            oCreationPackage.String   = "Maquinaria";
            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)
            {
                LogService.WriteError(string.Format("[Menu - AddMenuItems: {0}]", e.Message));
            }

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

                // Create s sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Machinery.Forms.MachineryForm";
                oCreationPackage.String   = "Subidas";
                oMenus.AddEx(oCreationPackage);

                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Machinery.Forms.frmContracts";
                oCreationPackage.String   = "Contratos";
                oMenus.AddEx(oCreationPackage);

                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Machinery.Forms.frmRiseSearch";
                oCreationPackage.String   = "Búsqueda de contratos-subidas";
                oMenus.AddEx(oCreationPackage);

                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Machinery.Forms.frmRisesCommissions";
                oCreationPackage.String   = "Comisiones maquinaria";
                oMenus.AddEx(oCreationPackage);

                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Machinery.Forms.frmStockTransfer";
                oCreationPackage.String   = "Entrada de consumibles";
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception er)
            { //  Menu already exists
                LogService.WriteError(string.Format("[Menu - AddMenuItems: {0}]", er.Message));
                Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }
Exemplo n.º 30
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.Finances";
            oCreationPackage.String   = "Finanzas";
            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.Finances");
                oMenus    = oMenuItem.SubMenus;

                // Create sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Finances.Payments";
                oCreationPackage.String   = "Recepción de pagos de clientes";
                oMenus.AddEx(oCreationPackage);

                // Create sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Finances.CheckGeneration";
                oCreationPackage.String   = "Generación de pagos de subasta";
                oMenus.AddEx(oCreationPackage);

                // Create sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Finances.BouncedChecks";
                oCreationPackage.String   = "Trato de cheques devueltos";
                oMenus.AddEx(oCreationPackage);

                // Create sub menu
                oCreationPackage.Type     = SAPbouiCOM.BoMenuType.mt_STRING;
                oCreationPackage.UniqueID = "UGRS.AddOn.Finances.InvoiceTest";
                oCreationPackage.String   = "Prueba de facturas";
                oMenus.AddEx(oCreationPackage);
            }
            catch (Exception er)
            { //  Menu already exists
              //Application.SBO_Application.SetStatusBarMessage("Menu Already Exists", SAPbouiCOM.BoMessageTime.bmt_Short, true);
            }
        }