Example #1
0
        /// <summary>
        /// Checkea y descheckea todas las columnas de la matrix variedades
        /// </summary>
        public static void EjecutarChecking(SAPbouiCOM.Form oForm)
        {
            SAPbouiCOM.Button oButton    = oForm.Items.Item("bt_chk").Specific;
            SAPbouiCOM.Matrix oMatrix    = oForm.Items.Item("matrixVar").Specific;
            SAPbouiCOM.Matrix oMatrixCrt = oForm.Items.Item("matrixCrt").Specific;

            oForm.Freeze(true);

            // Check
            if (oButton.Caption.Equals("check"))
            {
                for (int i = 1; i <= oMatrix.RowCount; i++)
                {
                    SAPbouiCOM.CheckBox chk = (SAPbouiCOM.CheckBox)oMatrix.Columns.Item("co_Chk").Cells.Item(i).Specific;
                    chk.Checked = true;
                }
                DataBindCuarteles(oForm);
                oButton.Caption = "uncheck";
            }
            // Uncheck
            else
            {
                for (int i = 1; i <= oMatrix.RowCount; i++)
                {
                    SAPbouiCOM.CheckBox chk = (SAPbouiCOM.CheckBox)oMatrix.Columns.Item("co_Chk").Cells.Item(i).Specific;
                    chk.Checked = false;
                }
                oMatrixCrt.Clear();
                oButton.Caption = "check";
            }

            oForm.Freeze(false);
        }
Example #2
0
        public void GetItemReferences()
        {
            try
            {
                _oForm.Freeze(false);
                _cbARINV       = _oForm.Items.Item("cbARINV").Specific as SAPbouiCOM.CheckBox;
                _cbARCN        = _oForm.Items.Item("cbARCN").Specific as SAPbouiCOM.CheckBox;
                _cbAPINV       = _oForm.Items.Item("cbAPINV").Specific as SAPbouiCOM.CheckBox;
                _cbAPCN        = _oForm.Items.Item("cbAPCN").Specific as SAPbouiCOM.CheckBox;
                _txtDTFRM      = _oForm.Items.Item("txtDTFRM").Specific as SAPbouiCOM.EditText;
                _txtDTTO       = _oForm.Items.Item("txtDTTO").Specific as SAPbouiCOM.EditText;
                _btnView       = _oForm.Items.Item("btnView").Specific as SAPbouiCOM.Button;
                _btnCP         = _oForm.Items.Item("btnCP").Specific as SAPbouiCOM.Button;
                _txtPath       = _oForm.Items.Item("txtPath").Specific as SAPbouiCOM.EditText;
                _btnExport     = _oForm.Items.Item("btnExport").Specific as SAPbouiCOM.Button;
                _grid_Trans    = _oForm.Items.Item("grid_Trans").Specific as SAPbouiCOM.Grid;
                _dt_grid_Trans = _oForm.DataSources.DataTables.Item("grid_Trans");

                _btnView.PressedAfter   += _btnView_PressedAfter;
                _btnExport.PressedAfter += _btnExport_PressedAfter;
                // Double click events
                _grid_Trans.DoubleClickAfter += _grid_Trans_DoubleClickAfter;
                _btnCP.PressedAfter          += _btnCP_PressedAfter;
            }
            catch (Exception Ex) { eCommon.SBO_Application.MessageBox(Ex.Message); }
        }
Example #3
0
        internal void ForbiddenUncheck(int lIntActiveRow)
        {
            lObjCheckboxInv = ValidCheckinRow(lIntActiveRow);

            if (lObjCheckboxInv != null)
            {
                lObjFormChargesXml.Freeze(true);

                string lStrCorral = Convert.ToString(((SAPbouiCOM.EditText)lObjMatrix.Columns.Item("colWhs").Cells.Item(lIntActiveRow).Specific).Value);
                if (!AddedAlready(lStrCorral))
                {
                    foreach (var item in lStrlstCorral)
                    {
                        if (lStrCorral == item)
                        {
                            lObjCheckboxInv.Caption = "Y";
                        }
                    }
                }
                else
                {
                    lObjCheckboxInv.Caption = "N";
                }

                lObjFormChargesXml.Freeze(false);
            }
        }
Example #4
0
 /// <summary>
 /// Initialize components. Called by framework after form created.
 /// </summary>
 public override void OnInitializeComponent()
 {
     this.StaticText0              = ((SAPbouiCOM.StaticText)(this.GetItem("Item_0").Specific));
     this.StaticText1              = ((SAPbouiCOM.StaticText)(this.GetItem("Item_1").Specific));
     this.StaticText2              = ((SAPbouiCOM.StaticText)(this.GetItem("Item_2").Specific));
     this.CheckBoxImpresion        = ((SAPbouiCOM.CheckBox)(this.GetItem("chkImp").Specific));
     this.StaticText3              = ((SAPbouiCOM.StaticText)(this.GetItem("Item_4").Specific));
     this.EditTextDocDesde         = ((SAPbouiCOM.EditText)(this.GetItem("docDesde").Specific));
     this.StaticText4              = ((SAPbouiCOM.StaticText)(this.GetItem("Item_6").Specific));
     this.EditTextDocHasta         = ((SAPbouiCOM.EditText)(this.GetItem("docHasta").Specific));
     this.CBoxTpoEstado            = ((SAPbouiCOM.ComboBox)(this.GetItem("tpoEstado").Specific));
     this.CBoxtpoRuta              = ((SAPbouiCOM.ComboBox)(this.GetItem("tpoRuta").Specific));
     this.CBoxtpoRuta.ClickBefore += new SAPbouiCOM._IComboBoxEvents_ClickBeforeEventHandler(this.CBoxtpoRuta_ClickBefore);
     this.StaticText5              = ((SAPbouiCOM.StaticText)(this.GetItem("Item_10").Specific));
     this.StaticText6              = ((SAPbouiCOM.StaticText)(this.GetItem("Item_11").Specific));
     this.EditTextFechaDesde       = ((SAPbouiCOM.EditText)(this.GetItem("FechaD").Specific));
     this.StaticText7              = ((SAPbouiCOM.StaticText)(this.GetItem("Item_13").Specific));
     this.EditTextFechaHasta       = ((SAPbouiCOM.EditText)(this.GetItem("FechaH").Specific));
     this.oGrid = ((SAPbouiCOM.Grid)(this.GetItem("Grid").Specific));
     this.oGrid.LinkPressedBefore    += new SAPbouiCOM._IGridEvents_LinkPressedBeforeEventHandler(this.oGrid_LinkPressedBefore);
     this.oGrid.LinkPressedAfter     += new SAPbouiCOM._IGridEvents_LinkPressedAfterEventHandler(this.oGrid_LinkPressedAfter);
     this.oGrid.DoubleClickBefore    += new SAPbouiCOM._IGridEvents_DoubleClickBeforeEventHandler(this.oGrid_DoubleClickBefore);
     this.oGrid.DoubleClickAfter     += new SAPbouiCOM._IGridEvents_DoubleClickAfterEventHandler(this.oGrid_DoubleClickAfter);
     this.ButtonBuscar                = ((SAPbouiCOM.Button)(this.GetItem("bBuscar").Specific));
     this.ButtonBuscar.ClickBefore   += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.ButtonBuscar_ClickBefore);
     this.ButtonImprimir              = ((SAPbouiCOM.Button)(this.GetItem("bImprimir").Specific));
     this.ButtonImprimir.ClickAfter  += new SAPbouiCOM._IButtonEvents_ClickAfterEventHandler(this.ButtonImprimir_ClickAfter);
     this.ButtonImprimir.ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.ButtonImprimir_ClickBefore);
     this.ButtonCancelar              = ((SAPbouiCOM.Button)(this.GetItem("bCancelar").Specific));
     this.ButtonCancelar.ClickAfter  += new SAPbouiCOM._IButtonEvents_ClickAfterEventHandler(this.ButtonCancelar_ClickAfter);
     this.ButtonCancelar.ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.ButtonCancelar_ClickBefore);
     this.CheckBox1 = ((SAPbouiCOM.CheckBox)(this.GetItem("chk_sel").Specific));
     this.OnCustomInitialize();
 }
Example #5
0
        /// <summary>
        /// Revisa el estado de la matrix cuarteles para dar valor correcto al boton check cuarteles
        /// </summary>
        public static void SetButtonCheckCuarteles(SAPbouiCOM.Form oForm)
        {
            SAPbouiCOM.Matrix oMatrix = oForm.Items.Item("matrixCrt").Specific;
            SAPbouiCOM.Button oButton = oForm.Items.Item("bt_chkC").Specific;
            bool Chekeados            = false;

            // Recorremos la matrix de cuarteles para saber si hay chekeados
            for (int i = 1; i <= oMatrix.RowCount; i++)
            {
                SAPbouiCOM.CheckBox chk = (SAPbouiCOM.CheckBox)oMatrix.Columns.Item("co_Chk").Cells.Item(i).Specific;
                if (chk.Checked)
                {
                    Chekeados = true;
                    break;
                }
            }

            // si hay valores chekeados cambiar button
            if (Chekeados)
            {
                oButton.Caption = "uncheck";
            }
            else
            {
                oButton.Caption = "check";
            }
        }
Example #6
0
    public void BatchPreauth(SAPbouiCOM.Form form)
    {
        try {
            if (cfgBatchPreauth != "Y")
            {
                return;
            }
            if (SBO_Application.MessageBox("Run pre-auth on selected orders?", 1, "Yes", "No") != 1)
            {
                return;
            }

            SAPbouiCOM.Matrix oMatrix = (SAPbouiCOM.Matrix)form.Items.Item("10").Specific;
            for (int i = 1; i <= oMatrix.RowCount; i++)
            {
                SAPbouiCOM.CheckBox check = (SAPbouiCOM.CheckBox)oMatrix.Columns.Item("1").Cells.Item(i).Specific;
                if (check.Checked)
                {
                    string docnum             = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("11").Cells.Item(i).Specific).Value;
                    string customerid         = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("10").Cells.Item(i).Specific).Value;
                    int    docentry           = getDocEntry("17", docnum, customerid);
                    SAPbobsCOM.Documents oDoc = (SAPbobsCOM.Documents)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oOrders);
                    if (oDoc.GetByKey(docentry))
                    {
                        if (oDoc.DocumentStatus == SAPbobsCOM.BoStatus.bost_Close)
                        {
                            SBO_Application.SetStatusBarMessage("eBizCharge Batch pre-auth sales order : " + docnum + " is closed.", SAPbouiCOM.BoMessageTime.bmt_Medium, true);
                        }
                        else
                        {
                            SAPCust sapcust = getCustomerByID(customerid, "");
                            if (sapcust == null)
                            {
                                SBO_Application.SetStatusBarMessage("eBizCharge Batch pre-auth sales order : " + docnum + " error customer: " + customerid + " has no payment method.", SAPbouiCOM.BoMessageTime.bmt_Medium, true);
                            }
                            else
                            {
                                if (isOrderPreauthed(docentry.ToString()))
                                {
                                    SBO_Application.SetStatusBarMessage("eBizCharge Batch pre-auth sales order : " + docnum + " order already pre-authed", SAPbouiCOM.BoMessageTime.bmt_Medium, true);
                                }
                                else
                                {
                                    BatchPreauth_PreAuthCustomer(oDoc, sapcust);
                                }
                            }
                        }
                    }
                    else
                    {
                        SBO_Application.SetStatusBarMessage("eBizCharge Batch pre-auth can not retrieve sales order : " + docnum + ". " + oCompany.GetLastErrorDescription(), SAPbouiCOM.BoMessageTime.bmt_Medium, true);
                    }
                }
            }
        }
        catch (Exception ex)
        {
        }
    }
Example #7
0
        private void InitiallizeForm()
        {
            isForLoading = true;
            oForm.Freeze(true);

            tab1 = (SAPbouiCOM.Folder)oForm.Items.Item("21").Specific;
            tab3 = (SAPbouiCOM.Folder)oForm.Items.Item("19").Specific;
            tab4 = (SAPbouiCOM.Folder)oForm.Items.Item("35").Specific;

            dtHead  = oForm.DataSources.DataTables.Item("dtHead");
            Animals = oForm.DataSources.DataTables.Item("Animals");
            DTRpt   = oForm.DataSources.DataTables.Item("DTRpt");
            dtPro   = oForm.DataSources.DataTables.Item("dtPro");
            dtReqT  = oForm.DataSources.DataTables.Item("dtReqT");
            dtTypeS = oForm.DataSources.DataTables.Item("dtTypeS");


            ocflCard = (SAPbouiCOM.ChooseFromList)oForm.ChooseFromLists.Item("cflCard");
            cflcardcode(ocflCard, "cflCard");


            mtAnimals = (SAPbouiCOM.Matrix)oForm.Items.Item("mtAnimals").Specific;
            mtReqT    = (SAPbouiCOM.Matrix)oForm.Items.Item("mtReqT").Specific;

            mtRpt     = (SAPbouiCOM.Matrix)oForm.Items.Item("mtRpt").Specific;
            mtProd    = (SAPbouiCOM.Matrix)oForm.Items.Item("mtProd").Specific;
            mtTypePRO = (SAPbouiCOM.Matrix)oForm.Items.Item("mtTypePRO").Specific;


            cbAT = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbAT").Specific;
            cbAC = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbAC").Specific;


            txQtyT     = (SAPbouiCOM.EditText)oForm.Items.Item("29").Specific;
            txSupplier = (SAPbouiCOM.EditText)oForm.Items.Item("47").Specific;

            chSO  = (SAPbouiCOM.CheckBox)oForm.Items.Item("chSO").Specific;
            chPRO = (SAPbouiCOM.CheckBox)oForm.Items.Item("crRPRO").Specific;

            dtHead.Rows.Add(1);
            dtHead.SetValue("DocDate", 0, DateTime.Now);
            dtHead.SetValue("PoDate", 0, DateTime.Now);

            dtHead.SetValue("stDate", 0, DateTime.Now.AddDays(1));
            dtHead.SetValue("eDate", 0, DateTime.Now.AddDays(4));
            oForm.Freeze(false);
            fillCB();

            txQtyT.Item.Enabled = false;
            oForm.PaneLevel     = 4;
            tab4.Select();
            isForLoading = false;
            fillPO();
            mtProd.Item.Visible = false;
            fillAThash();
            RefreshForm();
        }
Example #8
0
        private void FindSameInspection(string lStrInspection, string lStrAction)
        {
            for (int i = 1; i <= lObjMatrix.RowCount; i++)
            {
                if (Convert.ToString(((SAPbouiCOM.EditText)lObjMatrix.Columns.Item("ColID").Cells.Item(i).Specific).Value) == lStrInspection)
                {
                    lObjCheckboxInsp = (SAPbouiCOM.CheckBox)lObjMatrix.Columns.Item("Col_0").Cells.Item(i).Specific;

                    lObjCheckboxInsp.Caption = lStrAction;
                }
            }
        }
Example #9
0
 private SAPbouiCOM.CheckBox ValidCheckinRow(int lIntActiveRow)
 {
     SAPbouiCOM.CheckBox lObjCheckBoxT = null;
     try
     {
         lObjCheckBoxT = (SAPbouiCOM.CheckBox)lObjMatrix.Columns.Item("colChck").Cells.Item(lIntActiveRow).Specific;
         return(lObjCheckBoxT);
     }
     catch (Exception err)
     {
         return(lObjCheckBoxT = null);
     }
 }
 private bool getMatrixSelect(SAPbouiCOM.Matrix oMatrix, string Col, int Row)
 {
     try
     {
         SAPbouiCOM.CheckBox oCB = (SAPbouiCOM.CheckBox)oMatrix.Columns.Item(Col).Cells.Item(Row).Specific; //Cast the Cell of the matrix to the respective type , in this case EditText
         return(oCB.Checked);                                                                               //Get the value form the EditText
     }
     catch (Exception ex)
     {
         errorLog("Can't find row:" + Row.ToString() + ",col:" + Col + "\r\n" + ex.Message);
     }
     return(false);
 }
Example #11
0
 private SAPbouiCOM.CheckBox ValidateRow(int lIntRow)
 {
     SAPbouiCOM.CheckBox lObjCheckBoxT = null;
     try
     {
         lObjCheckBoxT = (SAPbouiCOM.CheckBox)lObjMatrix.Columns.Item("Col_0").Cells.Item(lIntRow).Specific;
         return(lObjCheckBoxT);
     }
     catch (Exception ex)
     {
         return(lObjCheckBoxT = null);
     }
 }
Example #12
0
        private void InitiallizeForm()
        {
            oForm.Freeze(true);

            initiallizing = true;

            dtAtrr = oForm.DataSources.DataTables.Item("dtAtrr");
            dtHead = oForm.DataSources.DataTables.Item("dtHead");
            dtLOV  = oForm.DataSources.DataTables.Item("dtLOV");

            dtHead.Rows.Add(1);
            mtAttr = (SAPbouiCOM.Matrix)oForm.Items.Item("mtAttr").Specific;
            mtLOV  = (SAPbouiCOM.Matrix)oForm.Items.Item("mtLOV").Specific;

            cbType = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbType").Specific;
            cbLOV  = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbLOV").Specific;
            cbType.Item.DisplayDesc = true;
            cbLOV.Item.DisplayDesc  = true;

            txSAtt   = (SAPbouiCOM.EditText)oForm.Items.Item("txSAtt").Specific;
            txNCode  = (SAPbouiCOM.EditText)oForm.Items.Item("txNCode").Specific;
            txNName  = (SAPbouiCOM.EditText)oForm.Items.Item("txNName").Specific;
            txCode   = (SAPbouiCOM.EditText)oForm.Items.Item("txCode").Specific;
            txName   = (SAPbouiCOM.EditText)oForm.Items.Item("txName").Specific;
            txDef    = (SAPbouiCOM.EditText)oForm.Items.Item("txDef").Specific;
            txNV     = (SAPbouiCOM.EditText)oForm.Items.Item("txNV").Specific;
            txNDescr = (SAPbouiCOM.EditText)oForm.Items.Item("txNDescr").Specific;
            txSQL    = (SAPbouiCOM.EditText)oForm.Items.Item("txSQL").Specific;
            txVD     = (SAPbouiCOM.EditText)oForm.Items.Item("txVD").Specific;

            btAddAttr = (SAPbouiCOM.Button)oForm.Items.Item("btAddAttr").Specific;
            btDelAttr = (SAPbouiCOM.Button)oForm.Items.Item("btDelAttr").Specific;
            btUPAtt   = (SAPbouiCOM.Button)oForm.Items.Item("btUPAtt").Specific;
            btDownAtt = (SAPbouiCOM.Button)oForm.Items.Item("btDownAtt").Specific;
            btAddLOV  = (SAPbouiCOM.Button)oForm.Items.Item("btAddLOV").Specific;
            btDelLOV  = (SAPbouiCOM.Button)oForm.Items.Item("btDelLOV").Specific;
            btUpLOV   = (SAPbouiCOM.Button)oForm.Items.Item("btUpLOV").Specific;
            btDownLOV = (SAPbouiCOM.Button)oForm.Items.Item("btDownLOV").Specific;
            btUpdate  = (SAPbouiCOM.Button)oForm.Items.Item("btUpdate").Specific;


            chActive = (SAPbouiCOM.CheckBox)oForm.Items.Item("chActive").Specific;

            // oForm.Items.Item("btUpd").Enabled = false;
            oForm.Freeze(false);

            initiallizing = false;
            txSAtt.Active = true;
            fillCb();
            getCodes();
        }
Example #13
0
 /// <summary>
 /// Initialize components. Called by framework after form created.
 /// </summary>
 public override void OnInitializeComponent()
 {
     this.lObjTxtClient    = ((SAPbouiCOM.EditText)(this.GetItem("txtClient").Specific));
     this.StaticText0      = ((SAPbouiCOM.StaticText)(this.GetItem("Item_1").Specific));
     this.lObjMtxRejectOut = ((SAPbouiCOM.Matrix)(this.GetItem("mtxReject").Specific));
     this.lObjBtnSearch    = ((SAPbouiCOM.Button)(this.GetItem("btnSearch").Specific));
     this.lObjBtnExit      = ((SAPbouiCOM.Button)(this.GetItem("btnOutput").Specific));
     this.lObjBtnInvoice   = ((SAPbouiCOM.Button)(this.GetItem("btnInvo").Specific));
     // this.lObjChckBox = ((SAPbouiCOM.CheckBox)(this.GetItem("ChckP").Specific));
     this.lObjChckBox      = ((SAPbouiCOM.CheckBox)(this.UIAPIRawForm.Items.Item("ChckP").Specific));
     this.lObjEdTxtDocDate = ((SAPbouiCOM.EditText)(this.GetItem("txtSpD").Specific));
     this.lObjLbl          = ((SAPbouiCOM.StaticText)(this.GetItem("lblSpd").Specific));
     this.OnCustomInitialize();
 }
Example #14
0
        public void GetItemReferences()
        {
            try
            {
                _txtPath = _oForm.Items.Item("txtPath").Specific as SAPbouiCOM.EditText;
                _cbPO    = _oForm.Items.Item("cbPO").Specific as SAPbouiCOM.CheckBox;
                _cbSO    = _oForm.Items.Item("cbSO").Specific as SAPbouiCOM.CheckBox;
                _btnPath = _oForm.Items.Item("btnPath").Specific as SAPbouiCOM.Button;
                _btnSave = _oForm.Items.Item("btnSave").Specific as SAPbouiCOM.Button;

                _btnPath.PressedAfter += _btnPath_PressedAfter;
                _btnSave.PressedAfter += _btnSave_PressedAfter;
            }
            catch (Exception Ex) { eCommon.SBO_Application.MessageBox(Ex.Message); }
        }
Example #15
0
        public void GetItemReferences()
        {
            try
            {
                _btnView    = _oForm.Items.Item("btnView").Specific as SAPbouiCOM.Button;
                _txtCSTCD   = _oForm.Items.Item("txtCSTCD").Specific as SAPbouiCOM.EditText;
                _txtDTFRM   = _oForm.Items.Item("txtDTFRM").Specific as SAPbouiCOM.EditText;
                _txtDTTO    = _oForm.Items.Item("txtDTTO").Specific as SAPbouiCOM.EditText;
                _txtSrchPO  = _oForm.Items.Item("txtSrchPO").Specific as SAPbouiCOM.EditText;
                _btnNext    = _oForm.Items.Item("btnNext").Specific as SAPbouiCOM.Button;
                _btnBack    = _oForm.Items.Item("btnBack").Specific as SAPbouiCOM.Button;
                _txtTTLAMT  = _oForm.Items.Item("txtTtlAmt").Specific as SAPbouiCOM.EditText;
                _txtTTLQTY  = _oForm.Items.Item("txtTtlQty").Specific as SAPbouiCOM.EditText;
                _txtTTLCBOX = _oForm.Items.Item("txtTtlCrt").Specific as SAPbouiCOM.EditText;

                _txtNAME  = _oForm.Items.Item("txtNAME").Specific as SAPbouiCOM.EditText;
                _txtPSTDT = _oForm.Items.Item("txtPSTDT").Specific as SAPbouiCOM.EditText;
                _txtDUEDT = _oForm.Items.Item("txtDUEDT").Specific as SAPbouiCOM.EditText;
                _txtDOCDT = _oForm.Items.Item("txtDOCDT").Specific as SAPbouiCOM.EditText;
                _txtRMK   = _oForm.Items.Item("txtRMK").Specific as SAPbouiCOM.EditText;
                _cbDraft  = _oForm.Items.Item("cbDraft").Specific as SAPbouiCOM.CheckBox;
                _btnPost  = _oForm.Items.Item("btnPost").Specific as SAPbouiCOM.Button;
                _mat_CST  = _oForm.Items.Item("mat_CST").Specific as SAPbouiCOM.Matrix;
                // Make the matrix fill the area
                _mat_CST.AutoResizeColumns();

                //initialize the data table first
                _dt_CST = _oForm.DataSources.DataTables.Item("dt_SelectCusfromORDR");
                _dt_LST = _oForm.DataSources.DataTables.Item("dtListLines");

                _grid_CST = _oForm.Items.Item("grid_CST").Specific as SAPbouiCOM.Grid;

                _btnPost.PressedAfter         += _btnPost_PressedAfter;
                _btnBack.PressedAfter         += _btnBack_PressedAfter;
                _btnNext.PressedAfter         += _btnNext_PressedAfter;
                _btnView.PressedBefore        += _btnView_PressedBefore;
                _txtCSTCD.ChooseFromListAfter += _txtCSTCD_ChooseFromListAfter;
                _txtSrchPO.KeyDownAfter       += _txtSrchPO_KeyDownAfter;
                _grid_CST.ValidateAfter       += _grid_CST_ValidateAfter;
                _grid_CST.PressedAfter        += _grid_CST_PressedAfter;
                _mat_CST.LinkPressedBefore    += _mat_CST_LinkPressedBefore;
                // Double click events
                _grid_CST.DoubleClickAfter += _grid_CST_DoubleClickAfter;
                _mat_CST.DoubleClickAfter  += _mat_CST_DoubleClickAfter;
            }
            catch (Exception Ex) { eCommon.SBO_Application.MessageBox(Ex.Message); }
        }
Example #16
0
        public void GetItemReferences()
        {
            try
            {
                _txtVendor = _oForm.Items.Item("txtVendor").Specific as SAPbouiCOM.EditText;
                _txtDTFRM  = _oForm.Items.Item("txtDTFRM").Specific as SAPbouiCOM.EditText;
                _txtDTTO   = _oForm.Items.Item("txtDTTO").Specific as SAPbouiCOM.EditText;
                _btnView   = _oForm.Items.Item("btnView").Specific as SAPbouiCOM.Button;
                _txtSrchPO = _oForm.Items.Item("txtSrchPO").Specific as SAPbouiCOM.EditText;
                _txtTTLAMT = _oForm.Items.Item("txtTtlAmt").Specific as SAPbouiCOM.EditText;
                _txtTTLQTY = _oForm.Items.Item("txtTtlQty").Specific as SAPbouiCOM.EditText;

                _txtNAME  = _oForm.Items.Item("txtNAME").Specific as SAPbouiCOM.EditText;
                _txtPSTDT = _oForm.Items.Item("txtPSTDT").Specific as SAPbouiCOM.EditText;
                _txtDUEDT = _oForm.Items.Item("txtDUEDT").Specific as SAPbouiCOM.EditText;
                _txtDOCDT = _oForm.Items.Item("txtDOCDT").Specific as SAPbouiCOM.EditText;
                _txtRMK   = _oForm.Items.Item("txtRMK").Specific as SAPbouiCOM.EditText;

                _btnPost = _oForm.Items.Item("btnPost").Specific as SAPbouiCOM.Button;
                _btnNext = _oForm.Items.Item("btnNext").Specific as SAPbouiCOM.Button;
                _btnBack = _oForm.Items.Item("btnBack").Specific as SAPbouiCOM.Button;
                _cbDraft = _oForm.Items.Item("cbDraft").Specific as SAPbouiCOM.CheckBox;

                _mat_Vendor = _oForm.Items.Item("mat_Vendor").Specific as SAPbouiCOM.Matrix;

                _mat_Vendor.AutoResizeColumns();
                _dt_VendorMatrix = _oForm.DataSources.DataTables.Item("dt_VendorfromOPOR");

                _grid_Vendor   = _oForm.Items.Item("grid_Ven").Specific as SAPbouiCOM.Grid;
                _dt_VendorGrid = _oForm.DataSources.DataTables.Item("dtListLines");

                _mat_Vendor.LinkPressedBefore  += _mat_Vendor_LinkPressedBefore;
                _txtSrchPO.KeyDownAfter        += _txtSrchPO_KeyDownAfter;
                _txtVendor.ChooseFromListAfter += _txtVendor_ChooseFromListAfter;
                _btnView.PressedBefore         += _btnView_PressedBefore;
                _btnNext.PressedAfter          += _btnNext_PressedAfter;
                _btnBack.PressedAfter          += _btnBack_PressedAfter;
                _grid_Vendor.PressedAfter      += _grid_Vendor_PressedAfter;
                _grid_Vendor.ValidateAfter     += _grid_Vendor_ValidateAfter;
                _btnPost.PressedAfter          += _btnPost_PressedAfter;
                // Double click events
                _grid_Vendor.DoubleClickAfter += _grid_Vendor_DoubleClickAfter;
                _mat_Vendor.DoubleClickAfter  += _mat_Vendor_DoubleClickAfter;
            }
            catch (Exception Ex) { eCommon.SBO_Application.MessageBox(Ex.Message); }
        }
Example #17
0
        private void checkSameInspections(int lIntActiveRow)
        {
            lObjCheckboxInsp = ValidateRow(lIntActiveRow);

            if (lObjCheckboxInsp != null)
            {
                string lStrIdIspection = Convert.ToString(((SAPbouiCOM.EditText)lObjMatrix.Columns.Item("ColID").Cells.Item(lIntActiveRow).Specific).Value);

                if (lStrIdIspection != "0")
                {
                    if (lObjCheckboxInsp.Checked)
                    {
                        FindSameInspection(lStrIdIspection, "Y");
                    }
                    else
                    {
                        FindSameInspection(lStrIdIspection, "N");
                    }
                }
            }
        }
Example #18
0
 public override void OnInitializeComponent()
 {
     this.StaticText0 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_0").Specific));
     this.StaticText1 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_3").Specific));
     this.StaticText2 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_5").Specific));
     this.StaticText3 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_6").Specific));
     this.StaticText4 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_10").Specific));
     this.StaticText5 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_13").Specific));
     this.StaticText6 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_14").Specific));
     this.ComboBox0   = ((SAPbouiCOM.ComboBox)(this.GetItem("Item_2").Specific));
     this.ComboBox0.ComboSelectAfter += new SAPbouiCOM._IComboBoxEvents_ComboSelectAfterEventHandler(this.ComboBox0_ComboSelectAfter);
     this.ComboBox1 = ((SAPbouiCOM.ComboBox)(this.GetItem("cbo_btype").Specific));
     this.ComboBox1.ComboSelectAfter += new SAPbouiCOM._IComboBoxEvents_ComboSelectAfterEventHandler(this.ComboBox1_ComboSelectAfter);
     this.CheckBox0 = ((SAPbouiCOM.CheckBox)(this.GetItem("chk_new").Specific));
     this.CheckBox0.PressedAfter += new SAPbouiCOM._ICheckBoxEvents_PressedAfterEventHandler(this.CheckBox0_PressedAfter);
     this.EditText0 = ((SAPbouiCOM.EditText)(this.GetItem("txt_bpcode").Specific));
     this.EditText0.LostFocusAfter += new SAPbouiCOM._IEditTextEvents_LostFocusAfterEventHandler(this.EditText0_LostFocusAfter);
     this.EditText1             = ((SAPbouiCOM.EditText)(this.GetItem("txt_prjn").Specific));
     this.EditText2             = ((SAPbouiCOM.EditText)(this.GetItem("txt_period").Specific));
     this.EditText3             = ((SAPbouiCOM.EditText)(this.GetItem("txt_fr").Specific));
     this.EditText4             = ((SAPbouiCOM.EditText)(this.GetItem("txt_to").Specific));
     this.Grid0                 = ((SAPbouiCOM.Grid)(this.GetItem("grd_lst").Specific));
     this.Button0               = ((SAPbouiCOM.Button)(this.GetItem("bt_n").Specific));
     this.Button0.PressedAfter += new SAPbouiCOM._IButtonEvents_PressedAfterEventHandler(this.Button0_PressedAfter);
     this.Button1               = ((SAPbouiCOM.Button)(this.GetItem("bt_v").Specific));
     this.Button1.PressedAfter += new SAPbouiCOM._IButtonEvents_PressedAfterEventHandler(this.Button1_PressedAfter);
     this.Button2               = ((SAPbouiCOM.Button)(this.GetItem("bt_e").Specific));
     this.Button2.PressedAfter += new SAPbouiCOM._IButtonEvents_PressedAfterEventHandler(this.Button2_PressedAfter);
     this.Button3               = ((SAPbouiCOM.Button)(this.GetItem("bt_d").Specific));
     this.Button3.PressedAfter += new SAPbouiCOM._IButtonEvents_PressedAfterEventHandler(this.Button3_PressedAfter);
     this.Button4               = ((SAPbouiCOM.Button)(this.GetItem("bt_l").Specific));
     this.Button4.PressedAfter += new SAPbouiCOM._IButtonEvents_PressedAfterEventHandler(this.Button4_PressedAfter);
     this.StaticText7           = ((SAPbouiCOM.StaticText)(this.GetItem("Item_1").Specific));
     this.EditText5             = ((SAPbouiCOM.EditText)(this.GetItem("txt_tu").Specific));
     this.StaticText8           = ((SAPbouiCOM.StaticText)(this.GetItem("Item_4").Specific));
     this.EditText6             = ((SAPbouiCOM.EditText)(this.GetItem("txt_ktu").Specific));
     this.StaticText9           = ((SAPbouiCOM.StaticText)(this.GetItem("Item_8").Specific));
     this.EditText7             = ((SAPbouiCOM.EditText)(this.GetItem("txt_note").Specific));
     this.OnCustomInitialize();
 }
Example #19
0
        private void InitiallizeForm()
        {
            oForm.Freeze(true);

            initiallizing = true;


            dtRM = oForm.DataSources.DataTables.Item("dtRM");
            dtRD = oForm.DataSources.DataTables.Item("dtRD");

            dtHeads = oForm.DataSources.DataTables.Item("dtHead");
            dtHeads.Rows.Add(1);
            mtR   = (SAPbouiCOM.Matrix)oForm.Items.Item("mtR").Specific;
            mtRD  = (SAPbouiCOM.Matrix)oForm.Items.Item("mtRD").Specific;
            cbCM  = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbCM").Specific;
            txAP  = (SAPbouiCOM.EditText)oForm.Items.Item("txAP").Specific;
            txnRN = (SAPbouiCOM.EditText)oForm.Items.Item("txnRN").Specific;

            txRN = (SAPbouiCOM.EditText)oForm.Items.Item("txRN").Specific;

            btAddR = (SAPbouiCOM.Button)oForm.Items.Item("btAddR").Specific;
            btAddD = (SAPbouiCOM.Button)oForm.Items.Item("btAddD").Specific;
            btDelD = (SAPbouiCOM.Button)oForm.Items.Item("btDelD").Specific;
            btDelR = (SAPbouiCOM.Button)oForm.Items.Item("btDelR").Specific;
            cbBU   = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbBU").Specific;

            cbBU.ValidValues.Add("01", "Size / Area");
            cbBU.ValidValues.Add("02", "Volume");
            cbBU.ValidValues.Add("03", "Floors");
            cbBU.Select(0, SAPbouiCOM.BoSearchKey.psk_Index);
            cbBU.Item.DisplayDesc = true;
            chActive = (SAPbouiCOM.CheckBox)oForm.Items.Item("chActive").Specific;
            oForm.Items.Item("btUpd").Enabled = false;
            oForm.Freeze(false);

            initiallizing = false;
            txnRN.Active  = true;
            fillCb();
            getCodes();
        }
Example #20
0
        private void Button0_ClickBefore(object sboObject, SAPbouiCOM.SBOItemEventArg pVal, out bool BubbleEvent)
        {
            BubbleEvent = true;
            try
            {
                if (EditText1.Value == "")
                {
                    Application.SBO_Application.MessageBox("Favor de capturar el Folio de la solicitud");
                    return;
                }
                SAPbobsCOM.StockTransfer lObjStockTrasnfer;
                string               lStrFolio     = EditText1.Value;
                SAPbobsCOM.SBObob    lObjSBObob    = (SAPbobsCOM.SBObob)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoBridge);
                SAPbobsCOM.Recordset lObjRecordSet = (SAPbobsCOM.Recordset)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset);
                lObjRecordSet = lObjSBObob.GetObjectKeyBySingleValue(SAPbobsCOM.BoObjectTypes.oInventoryTransferRequest, "DocNum", lStrFolio, SAPbobsCOM.BoQueryConditions.bqc_Equal);
                SAPbobsCOM.StockTransfer lObjInventory = (SAPbobsCOM.StockTransfer)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oInventoryTransferRequest);
                if (lObjRecordSet.RecordCount == 1)
                {
                    lObjInventory.GetByKey(int.Parse(lObjRecordSet.Fields.Item(0).Value.ToString()));
                }

                Memory.ReleaseComObject(lObjSBObob);
                Memory.ReleaseComObject(lObjRecordSet);

                SAPbobsCOM.Recordset lObjRecordSet2 = (SAPbobsCOM.Recordset)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset);
                lObjRecordSet2.DoQuery("select T0.U_CR_Batch, T0.DocEntry,T0.LineNum, T0.OpenQty, T0.WhsCode, T0.FromWhsCod, T0.U_CR_CardCode, T0.ItemCode from WTQ1 T0 inner join OWTQ T1 on T1.DocEntry = T0.DocEntry Inner join OCRD T3 on T3.cardcode = T0.U_CR_CardCode where T1.DocNum = '" + lStrFolio + "' and T0.InvntSttus = 'O'");

                lLstExtraData = new List <object>();

                for (int i = 0; i < lObjRecordSet2.RecordCount; i++)
                {
                    lLstExtraData.Add(new
                    {
                        Lote        = lObjRecordSet2.Fields.Item(0).Value.ToString(),
                        DocEntry    = lObjRecordSet2.Fields.Item(1).Value.ToString(),
                        LineNum     = lObjRecordSet2.Fields.Item(2).Value.ToString(),
                        Quantity    = lObjRecordSet2.Fields.Item(3).Value.ToString(),
                        Whscode     = lObjRecordSet2.Fields.Item(4).Value.ToString(),
                        FromWhscode = lObjRecordSet2.Fields.Item(5).Value.ToString(),
                        CardCode    = lObjRecordSet2.Fields.Item(6).Value.ToString(),
                        ItemCode    = lObjRecordSet2.Fields.Item(7).Value.ToString()
                    });
                    lObjRecordSet2.MoveNext();
                }

                Memory.ReleaseComObject(lObjRecordSet2);



                lObjStockTrasnfer = (SAPbobsCOM.StockTransfer)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oStockTransfer);

                bool lBolIsSuccesss = false;
                for (int i = 1; i <= Matrix1.RowCount; i++)
                {
                    SAPbouiCOM.CheckBox lObjChk = (SAPbouiCOM.CheckBox)Matrix1.Columns.Item(0).Cells.Item(i).Specific;

                    if (lObjChk.Checked)
                    {
                        lObjStockTrasnfer.FromWarehouse = ((SAPbouiCOM.EditText)Matrix1.Columns.Item(3).Cells.Item(i).Specific).Value;
                        lObjStockTrasnfer.ToWarehouse   = ((dynamic)lLstExtraData[i - 1]).Whscode;
                        string lStrCardCode = ((SAPbouiCOM.EditText)Matrix1.Columns.Item("Col_6").Cells.Item(i).Specific).Value;
                        string lStrAlmacen  = ((SAPbouiCOM.EditText)Matrix1.Columns.Item("Col_3").Cells.Item(i).Specific).Value;
                        string lStrCantidad = ((SAPbouiCOM.EditText)Matrix1.Columns.Item("Col_4").Cells.Item(i).Specific).Value;
                        string lStrTrans    = ((SAPbouiCOM.EditText)Matrix1.Columns.Item("Col_5").Cells.Item(i).Specific).Value;
                        string lStrItemCode = ((SAPbouiCOM.EditText)Matrix1.Columns.Item("Col_7").Cells.Item(i).Specific).Value;
                        var    lObjData     = new
                        {
                            CardCode = lStrCardCode,
                            Almacen  = lStrAlmacen,
                            Cantidad = lStrCantidad,
                            Trans    = lStrTrans,
                            ItemCode = lStrItemCode
                        };
                        if (lStrTrans.Trim() != "")
                        {
                            lObjStockTrasnfer = AddLines(lObjStockTrasnfer, lObjInventory, lObjData);
                            lBolIsSuccesss    = true;
                        }
                        else
                        {
                            Application.SBO_Application.StatusBar.SetText("Capturar cantidad", SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Error);
                        }
                    }
                }
                if (lBolIsSuccesss)
                {
                    lObjStockTrasnfer.DocDate = DateTime.Now;

                    if (lObjStockTrasnfer.Add() != 0)
                    {
                        int    error    = oCompany.GetLastErrorCode();
                        string strError = oCompany.GetLastErrorDescription();
                        Application.SBO_Application.MessageBox(strError);
                    }
                    else
                    {
                        EditText1.Value = "";
                        LoadMatrixPeticiones();
                        Application.SBO_Application.StatusBar.SetText("Traslado correctamente efectuado.", SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Success);
                    }
                }
                else
                {
                    Application.SBO_Application.StatusBar.SetText("No se ha seleccionado ningun almacen para el traslado.", SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Error);
                }
            }
            catch (Exception ex)
            {
                Application.SBO_Application.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Error);
            }
        }
Example #21
0
        /// <summary>
        /// Trae los datos para grilla de cuarteles segun variedades asignadas (check)
        /// </summary>
        public static void DataBindCuarteles(SAPbouiCOM.Form oForm)
        {
            SAPbouiCOM.Matrix oMatrix   = oForm.Items.Item("matrixVar").Specific;
            string            query     = string.Empty;
            List <string>     Chekeados = new List <string>();
            string            Desc      = string.Empty;

            // Recorremos la matrix de variedades y obtenemos los valores con check
            for (int i = 1; i <= oMatrix.RowCount; i++)
            {
                SAPbouiCOM.CheckBox chk = (SAPbouiCOM.CheckBox)oMatrix.Columns.Item("co_Chk").Cells.Item(i).Specific;
                if (chk.Checked)
                {
                    Chekeados.Add(oMatrix.Columns.Item("co_Cod").Cells.Item(i).Specific.Value);
                    Desc = oMatrix.Columns.Item("co_Desc").Cells.Item(i).Specific.Value.ToString();
                }
            }

            // Si hay variedades chekeadas asignar cuarteles
            if (Chekeados.Count > 0)
            {
                int index = 0;
                foreach (string sCampo in Campo)
                {
                    foreach (string var in Chekeados)
                    {
                        if (!index.Equals(0))
                        {
                            query += " UNION ";
                        }

                        switch (Conexion_SBO.m_oCompany.DbServerType)
                        {
                        case SAPbobsCOM.BoDataServerTypes.dst_HANADB:
                            query += @"SELECT 'Y' as ""check"", ""U_SEI_CRT"" as ""Cuartel"", ""U_SEI_VAR"" as ""Variedad"", ""U_SEI_HEC"" as ""Hec"", ""U_SEI_ESP"" as ""Esp"", ""Code"" as ""Campo"" FROM ""@SEI_DMDC"" WHERE ""Code"" = '" + sCampo + @"' AND ""U_SEI_VAR"" = '" + var + @"' AND ""U_SEI_EST""='Activo'";
                            break;

                        default:
                            query += @"SELECT 'Y' as check, U_SEI_CRT as Cuartel, U_SEI_VAR as Variedad, U_SEI_HEC as Hec, U_SEI_ESP as Esp, Code as Campo FROM @SEI_DMDC WHERE Code = '" + sCampo + @"' AND U_SEI_VAR = '" + var + @"' AND U_SEI_EST='Activo'";
                            break;
                        }

                        index++;
                    }
                }

                oForm.DataSources.DataTables.Item("CUARTELES").ExecuteQuery(query);
                oMatrix = oForm.Items.Item("matrixCrt").Specific;
                oMatrix.Columns.Item("co_Chk").DataBind.Bind("CUARTELES", "check");
                oMatrix.Columns.Item("co_Crt").DataBind.Bind("CUARTELES", "Cuartel");
                oMatrix.Columns.Item("co_Desc").DataBind.Bind("CUARTELES", "Variedad");
                oMatrix.Columns.Item("co_Hec").DataBind.Bind("CUARTELES", "Hec");
                oMatrix.Columns.Item("co_Esp").DataBind.Bind("CUARTELES", "Esp");
                oMatrix.Columns.Item("co_Cpo").DataBind.Bind("CUARTELES", "Campo");
                oMatrix.Clear();
                oMatrix.LoadFromDataSource();

                // Si hay variedades chekeades setear boton check variedades
                SAPbouiCOM.Button oButton = oForm.Items.Item("bt_chk").Specific;
                oButton.Caption = "uncheck";
            }
            else
            {
                oMatrix = oForm.Items.Item("matrixCrt").Specific;
                oMatrix.Clear();
                // Si no hay variedades chekeades setear boton check variedades y cuarteles
                SAPbouiCOM.Button oButton = oForm.Items.Item("bt_chk").Specific;
                oButton.Caption = "check";
            }
        }