private void Matrix0_ClickBefore(object sboObject, SAPbouiCOM.SBOItemEventArg pVal, out bool BubbleEvent)
 {
     BubbleEvent = true;
     try
     {
         oForm.EnableMenu("1283", false);
         oForm.EnableMenu("1284", false);
     }
     catch (Exception) { }
 }
Ejemplo n.º 2
0
        private static void LoadInfo(SAPbouiCOM.Form oForm)
        {
            SAPbobsCOM.Recordset oRecordset = null;
            SAPbouiCOM.Matrix    oMatrix    = null;
            SAPbouiCOM.Matrix    oMatrixMm  = null;

            try
            {
                oForm.Freeze(true);
                oRecordset = Conexion_SBO.m_oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset);
                oMatrixMm  = oForm.Items.Item("Mtx_Mn").Specific;
                oRecordset.DoQuery("SELECT \"DocNum\" FROM \"@SEI_SETVALH\" ");
                if (oRecordset.RecordCount > 0)
                {
                    SAPbouiCOM.EditText oedit = null;
                    oForm.Mode = SAPbouiCOM.BoFormMode.fm_FIND_MODE;
                    String docNUM = Convert.ToString(oRecordset.Fields.Item(0).Value);
                    oedit       = oForm.Items.Item("DocNum").Specific;
                    oedit.Value = docNUM;
                    oForm.EnableMenu("1281", false); // 1281 --> Buscar
                    oForm.EnableMenu("1282", false); // 1282 --> Crear
                    oForm.Items.Item("1").Click(SAPbouiCOM.BoCellClickType.ct_Regular);
                    oForm.Items.Item("DocNum").Enabled = false;
                    oForm.Items.Item("DocNum").Visible = false;
                    oMatrixMm.AddRow();
                }
                else
                {
                    oForm.Mode = SAPbouiCOM.BoFormMode.fm_ADD_MODE;
                    //oForm.Items.Item("DocNum").Enabled = false;
                    oForm.Items.Item("DocNum").Visible = false;
                    //oMatrix.AddRow(2);
                    ////lines
                    //((SAPbouiCOM.EditText)(oMatrix.Columns.Item("Col_0").Cells.Item(1).Specific)).Value = "Entrada de mercancias";
                    //((SAPbouiCOM.CheckBox)(oMatrix.Columns.Item("Col_1").Cells.Item(1).Specific)).Checked = true;
                    //((SAPbouiCOM.EditText)(oMatrix.Columns.Item("Col_2").Cells.Item(1).Specific)).Value = "1";
                    //((SAPbouiCOM.EditText)(oMatrix.Columns.Item("Col_0").Cells.Item(2).Specific)).Value = "Oferta de compra";
                    //((SAPbouiCOM.CheckBox)(oMatrix.Columns.Item("Col_1").Cells.Item(2).Specific)).Checked = true;
                    //((SAPbouiCOM.EditText)(oMatrix.Columns.Item("Col_2").Cells.Item(1).Specific)).Value = "2";

                    //((SAPbouiCOM.CheckBox)(oForm.Items.Item("cbSentAcep").Specific)).Checked = true;

                    oMatrixMm.AddRow();
                    ((SAPbouiCOM.EditText)(oMatrixMm.Columns.Item("Col_0").Cells.Item(1).Specific)).Value = "0";
                    ((SAPbouiCOM.EditText)(oMatrixMm.Columns.Item("Col_1").Cells.Item(1).Specific)).Value = "0";
                }
                //oForm.Items.Item("Mtx1").Visible = false;
                oForm.Freeze(false);
            }
            catch (Exception ex)
            {
                oForm.Freeze(false);
            }
        }
        void __app_FormDataEvent(ref SAPbouiCOM.BusinessObjectInfo BusinessObjectInfo, out bool BubbleEvent)
        {
            BubbleEvent = true;
            try
            {
                if (BusinessObjectInfo.FormTypeEx == "CTIAMDC" && BusinessObjectInfo.EventType == SAPbouiCOM.BoEventTypes.et_FORM_DATA_LOAD && BusinessObjectInfo.BeforeAction == false)
                {
                    __Form = __app.Forms.GetForm("CTIAMDC", 0);
                    __Form.EnableMenu("1282", true);
                    //__Form.EnableMenu("1289", true);
                    __Form.Mode = SAPbouiCOM.BoFormMode.fm_VIEW_MODE;
                }

                if (BusinessObjectInfo.FormTypeEx == "CTIAMDC" && BusinessObjectInfo.EventType == SAPbouiCOM.BoEventTypes.et_FORM_DATA_ADD && BusinessObjectInfo.ActionSuccess == true && BusinessObjectInfo.BeforeAction == false)
                {
                    __Form = __app.Forms.GetForm("CTIAMDC", 0);
                    __app.ActivateMenuItem("1289");
                }
            }
            catch (COMException e1)
            {
                __app.MessageBox(e1.Message, 0, "Ok", "", "");
            }
            catch (SqlException e1)
            {
                __app.MessageBox(e1.Message, 0, "Ok", "", "");
            }
            catch (Exception e1)
            {
                __app.MessageBox(e1.Message, 0, "Ok", "", "");
            }
        }
        private void OnCustomInitialize()
        {
            // Ready Matrix to populate data
            Matrix0.Clear();
            Matrix0.Columns.Item("Col_0").Visible = false;
            Matrix0.Columns.Item("Col_1").Visible = false;

            // Querying the DB Data source
            oForm = Application.SBO_Application.Forms.Item(this.UIAPIRawForm.UniqueID);
            oForm.Select();

            LoadDataMatrix();

            oForm.EnableMenu("1281", false);
            oForm.EnableMenu("1282", false);
        }
 internal void ActivateForm(SAPbouiCOM.Form f, string defaultBrowser)
 {
     f.Freeze(true);
     f.EnableMenu("1288", true);
     f.EnableMenu("1289", true);
     f.EnableMenu("1290", true);
     f.EnableMenu("1291", true);
     f.EnableMenu("1292", false);
     f.EnableMenu("1293", false);
     f.EnableMenu("6913", false);
     f.EnableMenu("1283", false);
     f.Freeze(false);
     f.Update();
     //f.DefButton = "1";
     f.DataBrowser.BrowseBy = defaultBrowser;
     f.Mode = SAPbouiCOM.BoFormMode.fm_ADD_MODE;
 }
 private void OnCustomInitialize()
 {
     oForm = Application.SBO_Application.Forms.Item(this.UIAPIRawForm.UniqueID);
     //oForm =  Application.SBO_Application.Forms.ActiveForm;
     oForm.EnableMenu("1281", false);
     oForm.EnableMenu("1282", false);
     oForm.EnableMenu("1288", false);
     oForm.EnableMenu("1289", false);
     oForm.EnableMenu("1290", false);
     oForm.EnableMenu("1291", false);
     Matrix0.Columns.Item("Code").Visible     = false;
     Matrix0.Columns.Item("DocEntry").Visible = false;
     Cargar_Datos_Matrix();
 }
Ejemplo n.º 7
0
        public twmKDS_EXPXML()
        {
            try
            {
                //Draw the form
                String sFileName = string.Format("{0}.xml", this.GetType().Name);
                bool   bSuccess  = true;
                if (System.IO.File.Exists(Environment.CurrentDirectory + "\\" + sFileName))
                {
                    System.Xml.XmlDocument oXml = new System.Xml.XmlDocument();
                    oXml.Load(Environment.CurrentDirectory + "\\" + sFileName);
                    String sXml = eCommon.ModifySize(oXml.InnerXml);
                    try
                    {
                        eCommon.SBO_Application.LoadBatchActions(ref sXml);
                    }
                    catch
                    {
                        bSuccess = false;
                    }
                }
                else
                {
                    String ResourceName = string.Format("{0}.Src.Resource.{1}", System.Reflection.Assembly.GetExecutingAssembly().GetName().Name, sFileName);

                    String sXml = eCommon.ModifySize(eCommon.GetXMLResource(ResourceName));
                    try
                    {
                        eCommon.SBO_Application.LoadBatchActions(ref sXml);
                    }
                    catch {
                        bSuccess = false;
                    }
                }

                if (bSuccess)
                {
                    _oForm = eCommon.SBO_Application.Forms.ActiveForm;
                    if (_oForm.TypeEx.StartsWith("-"))
                    {
                        //a UDF form is opened. Close it.
                        String UDFFormUID    = _oForm.UniqueID;
                        String ParentFormUID = eCommon.GetParentFormUID(_oForm);
                        _oForm.Close();

                        _oForm = eCommon.SBO_Application.Forms.ActiveForm;
                        if (_oForm.UniqueID != ParentFormUID)
                        {
                            _oForm = eCommon.SBO_Application.Forms.Item(ParentFormUID);
                        }
                    }
                    _oForm.EnableMenu("6913", false);

                    GetItemReferences();
                    // Initform can be use if you want to fill anything or color anything
                    InitForm();
                    if (!SBOAddon.oOpenForms.Contains(_oForm.UniqueID))
                    {
                        SBOAddon.oOpenForms.Add(_oForm.UniqueID, this);
                    }

                    _oForm.Visible = true;
                }
            }
            catch (Exception ex)
            {
                System.Windows.Forms.MessageBox.Show(ex.Message);
            }
        }
Ejemplo n.º 8
0
        //Edit Button
        private void Button2_PressedAfter(object sboObject, SAPbouiCOM.SBOItemEventArg pVal)
        {
            try
            {
                if (Grid0.Rows.SelectedRows.Count == 1)
                {
                    oApp.ActivateMenuItem(MenuUID);
                    SAPbouiCOM.Form frm = Application.SBO_Application.Forms.ActiveForm;
                    frm.Mode = SAPbouiCOM.BoFormMode.fm_FIND_MODE;
                    frm.Items.Item("1_U_E").Enabled = true;
                    //find Selected Key Matrix
                    string DocNum = Grid0.DataTable.GetValue("Document Number", Grid0.Rows.SelectedRows.Item(0, SAPbouiCOM.BoOrderType.ot_RowOrder)).ToString();

                    ((SAPbouiCOM.EditText)frm.Items.Item("1_U_E").Specific).Value = DocNum;
                    frm.Items.Item("1").Click();
                    frm.EnableMenu("1282", false);  // Add New Record
                    frm.EnableMenu("1288", false);  // Next Record
                    frm.EnableMenu("1289", false);  // Pevious Record
                    frm.EnableMenu("1290", false);  // First Record
                    frm.EnableMenu("1291", false);  // Last record
                    frm.EnableMenu("1283", false);  // Remove
                    frm.EnableMenu("1284", false);  // Cancel
                    frm.EnableMenu("1286", false);  // Close
                    frm.EnableMenu("1304", false);  //Refresh
                    frm.EnableMenu("BILLVP_Remove_Line", false);
                    frm.EnableMenu("BILLVP_Add_Line", false);
                    //Disable Header
                    foreach (SAPbouiCOM.Item it in frm.Items)
                    {
                        if (it.Type == SAPbouiCOM.BoFormItemTypes.it_EDIT || it.Type == SAPbouiCOM.BoFormItemTypes.it_COMBO_BOX)
                        {
                            switch (it.Description.Trim())
                            {
                            case "Financial Project":
                                it.Enabled = true;
                                break;

                            case "Project Name":
                                it.Enabled = true;
                                break;

                            case "BP Code":
                                it.Enabled = true;
                                break;

                            case "BP Name":
                                it.Enabled = true;
                                break;

                            case "Bill Type":
                                it.Enabled = true;
                                break;

                            case "Period":
                                it.Enabled = true;
                                break;

                            case "From Date":
                                it.Enabled = true;
                                break;

                            case "To Date":
                                it.Enabled = true;
                                break;

                            case "Tạm ứng":
                                it.Enabled = true;
                                break;
                            }
                        }
                    }
                }
                else
                {
                    oApp.MessageBox("Please select record !");
                }
            }
            catch (Exception ex)
            {
                oApp.MessageBox(ex.Message);
            }
        }
Ejemplo n.º 9
0
Archivo: Menu.cs Proyecto: bagundes/sui
 public static void EnableAddRemoveRows(ref SAPbouiCOM.Form oForm)
 {
     oForm.EnableMenu("1292", true);
     oForm.EnableMenu("1293", true);
     klib.Shell.WriteLine(R.Project.ID, LOG, $"SUI - Enabled add/remove row menu in {oForm.UniqueID}");
 }
Ejemplo n.º 10
0
Archivo: Menu.cs Proyecto: bagundes/sui
 public static void FormIsNotDataSource(ref SAPbouiCOM.Form oForm)
 {
     oForm.EnableMenu("1281", false);
     oForm.EnableMenu("1282", false);
     klib.Shell.WriteLine(R.Project.ID, LOG, $"SUI - Disabled the data source menus in {oForm.UniqueID}");
 }
        void __app_MenuEvent(ref SAPbouiCOM.MenuEvent pVal, out bool BubbleEvent)
        {
            BubbleEvent = true;

            #region "Main Menu"
            if (pVal.BeforeAction == false)
            {
                if (pVal.MenuUID == "MDC_MNU_GRP")
                {
                    XmlDocument oXMLDoc  = new XmlDocument();
                    string      MenuPath = Application.StartupPath + "\\SrfFiles\\AGR.srf";
                    oXMLDoc.Load(MenuPath);
                    __app.LoadBatchActions(oXMLDoc.InnerXml);
                    string UName = __app.Company.UserName.ToString();


                    oRs1 = (SAPbobsCOM.Recordset)____bobCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset);
                    oRs2 = (SAPbobsCOM.Recordset)____bobCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset);
                    oRs3 = (SAPbobsCOM.Recordset)____bobCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset);

                    try
                    {
                        Manual = false;
                        __Form = __app.Forms.GetForm("AGR", 0);
                        oGrid  = __Form.Items.Item("grid").Specific;

                        __Form = __app.Forms.ActiveForm;
                        __Form.EnableMenu("4870", true);

                        __Form.Mode  = SAPbouiCOM.BoFormMode.fm_ADD_MODE;
                        __Form.State = SAPbouiCOM.BoFormStateEnum.fs_Maximized;


                        string SqlDoc = "";
                        SqlDoc = "CALL AGING_REPORT (NULL)";
                        oRs2.DoQuery(SqlDoc);


                        DT = null;

                        if (oRs2.RecordCount > 0)
                        {
                            if (DT == null)
                            {
                                DT = __Form.DataSources.DataTables.Add("DT1" + DateTime.Now.Second);
                            }

                            DT.ExecuteQuery(SqlDoc);

                            oGrid.DataTable = DT;
                            oGrid.AutoResizeColumns();

                            oGrid.Columns.Item("Customer Code").Editable = false;
                            oGrid.Columns.Item("Customer Name").Editable = false;

                            oGrid.Columns.Item("Customer Name").Editable = false;
                            oGrid.Columns.Item("Type").Editable          = false;
                            SAPbouiCOM.EditTextColumn Typcol = (SAPbouiCOM.EditTextColumn)oGrid.Columns.Item("DocEntry");
                            Typcol.LinkedObjectType = "13";
                            oGrid.Columns.Item("TransType").Visible = false;
                            oGrid.Columns.Item("DocEntry").Editable = false;

                            oGrid.Columns.Item("Document No.").Editable      = false;
                            oGrid.Columns.Item("Customer Ref. No.").Editable = false;
                            oGrid.Columns.Item("Posting Date").Editable      = false;
                            oGrid.Columns.Item("Due Date").Editable          = false;
                            oGrid.Columns.Item("Future").Editable            = false;
                            oGrid.Columns.Item("0-30 Days").Editable         = false;
                            oGrid.Columns.Item("31-60 Days").Editable        = false;
                            oGrid.Columns.Item("61-90 Days").Editable        = false;
                            oGrid.Columns.Item("91-120 Days").Editable       = false;
                            oGrid.Columns.Item("121+ Days").Editable         = false;
                            oGrid.Columns.Item("Balance Due").Editable       = false;

                            SAPbouiCOM.EditTextColumn col = (SAPbouiCOM.EditTextColumn)oGrid.Columns.Item("AWDocEntry");
                            col.LinkedObjectType = "UDOB1CZHDR";
                            col.Width            = 15;

                            oGrid.Columns.Item("DocEntry").Editable = false;
                            oGrid.Columns.Item("Previous Collection Notes").Editable = false;

                            oGrid.CollapseLevel = 1;
                            DataColumn column;


                            // Create new DataColumn, set DataType, ColumnName and add to DataTable.
                            column = new DataColumn();
                            if (Htable.Columns.Contains("DocEntry"))
                            {
                                Htable.Columns.Remove("DocEntry");
                            }
                            column.DataType   = System.Type.GetType("System.Int32");
                            column.ColumnName = "DocEntry";
                            Htable.Columns.Add(column);

                            // Create second column.
                            column = new DataColumn();

                            if (Htable.Columns.Contains("Collection Notes"))
                            {
                                Htable.Columns.Remove("Collection Notes");
                            }
                            column.DataType   = Type.GetType("System.String");
                            column.ColumnName = "Collection Notes";
                            Htable.Columns.Add(column);
                        }
                    }
                    catch (Exception e)
                    {
                        MessageBox.Show(e.Message.ToString());
                        BubbleEvent = false;
                    }
                }
            }
            #endregion

            //#region "Navigate Menu"

            //if (pVal.BeforeAction == true)
            //{
            //    if (pVal.MenuUID == "1281")
            //    {
            //        //__XForm = __app.Forms.ActiveForm;
            //        //__XForm.Items.Item("Item_1").Enabled = true;
            //    }
            //}
            //#endregion
        }