Beispiel #1
0
 private void pObjMtxRoutes_ClickBefore(object sboObject, SAPbouiCOM.SBOItemEventArg pVal, out bool BubbleEvent)
 {
     BubbleEvent = true;
     try
     {
         if (pVal.Row > 0)
         {
             SetRoutes(pVal.Row);
             pObjMtxRoutes.SelectRow(pVal.Row, true, false);
             //pIntCode = (int)(lObjDtRoutes.Columns.Item("Code").Cells.Item(pVal.Row - 1).Value);
             //pIntRow = pVal.Row;
         }
         else
         {
             pRoutes = null;
             //pIntCode = 0;
             //pIntRow = 0;
         }
     }
     catch (Exception ex)
     {
         LogService.WriteError(ex.Message);
         LogService.WriteError(ex);
         UIApplication.ShowMessageBox(ex.Message);
     }
 }
Beispiel #2
0
        public SalesOrderLinesDTO GetSalesOrderLinesDTO(string pStrDocNum, string pSTrTicket)
        {
            SalesOrderLinesDTO       mObjSalesOrderLines = new SalesOrderLinesDTO();
            List <CommissionDebtDTO> lLstDebt            = new List <CommissionDebtDTO>();

            SAPbobsCOM.Recordset lObjResults = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset);
            try
            {
                Dictionary <string, string> lLstParams = new Dictionary <string, string>();
                lLstParams.Add("DocNum", pStrDocNum);
                lLstParams.Add("Ticket", pSTrTicket);
                string lStrQuery = this.GetSQL("GetSOLines").Inject(lLstParams);
                lObjResults.DoQuery(lStrQuery);
                if (lObjResults.RecordCount > 0)
                {
                    for (int i = 0; i < lObjResults.RecordCount; i++)
                    {
                        mObjSalesOrderLines.ItemCode    = lObjResults.Fields.Item("ItemCode").Value.ToString();
                        mObjSalesOrderLines.Description = lObjResults.Fields.Item("ItemName").Value.ToString();
                        mObjSalesOrderLines.Folio       = lObjResults.Fields.Item("U_GLO_Ticket").Value.ToString();
                        mObjSalesOrderLines.Shared      = lObjResults.Fields.Item("U_TR_Shared").Value.ToString() == "N" ? false : true;
                        mObjSalesOrderLines.PayloadType = lObjResults.Fields.Item("U_TR_LoadType").Value.ToString();
                        mObjSalesOrderLines.VehicleType = lObjResults.Fields.Item("U_TR_VehicleType").Value.ToString();

                        mObjSalesOrderLines.Route     = Convert.ToInt16(lObjResults.Fields.Item("U_TR_Paths").Value.ToString());
                        mObjSalesOrderLines.Employee  = lObjResults.Fields.Item("SlpName").Value.ToString();
                        mObjSalesOrderLines.Asset     = lObjResults.Fields.Item("OcrCode2").Value.ToString();
                        mObjSalesOrderLines.TotKm     = lObjResults.Fields.Item("U_TR_TotKm").Value.ToString();
                        mObjSalesOrderLines.Extra     = lObjResults.Fields.Item("U_TR_AdditionalExpense").Value.ToString();
                        mObjSalesOrderLines.KmA       = lObjResults.Fields.Item("U_TR_TypeA").Value.ToString();
                        mObjSalesOrderLines.KmB       = lObjResults.Fields.Item("U_TR_TypeB").Value.ToString();
                        mObjSalesOrderLines.KmC       = lObjResults.Fields.Item("U_TR_TypeC").Value.ToString();
                        mObjSalesOrderLines.KmD       = lObjResults.Fields.Item("U_TR_TypeD").Value.ToString();
                        mObjSalesOrderLines.KmE       = lObjResults.Fields.Item("U_TR_TypeE").Value.ToString();
                        mObjSalesOrderLines.KmF       = lObjResults.Fields.Item("U_TR_TypeF").Value.ToString();
                        mObjSalesOrderLines.Heads     = lObjResults.Fields.Item("U_TR_Heads").Value.ToString();
                        mObjSalesOrderLines.TotKg     = lObjResults.Fields.Item("U_TR_TotKilos").Value.ToString();
                        mObjSalesOrderLines.Bags      = lObjResults.Fields.Item("U_GLO_BagsBales").Value.ToString();
                        mObjSalesOrderLines.UnitPrice = float.Parse(lObjResults.Fields.Item("Price").Value.ToString());
                    }
                }
            }
            catch (Exception ex)
            {
                LogService.WriteError("CommissionDAO (GetCommissionDebt): " + ex.Message);
                LogService.WriteError(ex);
                UIApplication.ShowError(string.Format("GetCommissionDebt: {0}", ex.Message));
            }
            finally
            {
                MemoryUtility.ReleaseComObject(lObjResults);
            }
            return(mObjSalesOrderLines);
        }
Beispiel #3
0
 private bool CheckMtxItems()
 {
     mBoolInsurance      = false;
     mObjSalesOrderLines = null;
     for (int i = 1; i <= mObjMtxSO.RowCount; i++)
     {
         mObjTxtItem = (SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("1").Cells.Item(i).Specific;
         if (!string.IsNullOrEmpty(mObjTxtItem.Value) && TransportsItem(mObjTxtItem.Value))
         {
             SetSalesOrderLine(i);
         }
         else if (Insuranceline(mObjTxtItem.Value))
         {
             mBoolInsurance = true;
         }
     }
     return(mObjSalesOrderLines != null || mBoolInsurance ? true : false);
 }
Beispiel #4
0
        private void SetRoutes(int pIntRow)
        {
            pRoutes = new SalesOrderLinesDTO();

            pRoutes.Route = (int)(lObjDtRoutes.Columns.Item("Code").Cells.Item(pIntRow - 1).Value);

            pRoutes.RouteName    = ((SAPbouiCOM.EditText)pObjMtxRoutes.Columns.Item("cName").Cells.Item(pIntRow).Specific).Value.ToString();
            pRoutes.Origin       = ((SAPbouiCOM.EditText)pObjMtxRoutes.Columns.Item("cOrign").Cells.Item(pIntRow).Specific).Value.ToString();
            pRoutes.MOrigin      = ((SAPbouiCOM.EditText)pObjMtxRoutes.Columns.Item("cMOrgn").Cells.Item(pIntRow).Specific).Value.ToString();
            pRoutes.Destination  = ((SAPbouiCOM.EditText)pObjMtxRoutes.Columns.Item("cDest").Cells.Item(pIntRow).Specific).Value.ToString();
            pRoutes.MDestination = ((SAPbouiCOM.EditText)pObjMtxRoutes.Columns.Item("cMDest").Cells.Item(pIntRow).Specific).Value.ToString();

            pRoutes.KmA = ((SAPbouiCOM.EditText)pObjMtxRoutes.Columns.Item("cKmA").Cells.Item(pIntRow).Specific).Value.ToString();
            pRoutes.KmB = ((SAPbouiCOM.EditText)pObjMtxRoutes.Columns.Item("cKmB").Cells.Item(pIntRow).Specific).Value.ToString();
            pRoutes.KmC = ((SAPbouiCOM.EditText)pObjMtxRoutes.Columns.Item("cKmC").Cells.Item(pIntRow).Specific).Value.ToString();
            pRoutes.KmD = ((SAPbouiCOM.EditText)pObjMtxRoutes.Columns.Item("cKmD").Cells.Item(pIntRow).Specific).Value.ToString();
            pRoutes.KmE = ((SAPbouiCOM.EditText)pObjMtxRoutes.Columns.Item("cKmE").Cells.Item(pIntRow).Specific).Value.ToString();
            pRoutes.KmF = ((SAPbouiCOM.EditText)pObjMtxRoutes.Columns.Item("cKmF").Cells.Item(pIntRow).Specific).Value.ToString();
        }
Beispiel #5
0
        private void SetSalesOrderLine(int pIntRow)
        {
            mObjSalesOrderLines = new SalesOrderLinesDTO();

            mObjSalesOrderLines.ItemCode    = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("1").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.Description = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("3").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.Shared      = ((SAPbouiCOM.EditText)mObjUFForm.Items.Item("U_TR_Shared").Specific).Value == "N" ? false : true;
            mObjSalesOrderLines.Folio       = ((SAPbouiCOM.EditText)mObjUFForm.Items.Item("U_GLO_Ticket").Specific).Value;
            //mObjSalesOrderLines.Shared = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("U_TR_Compartido").Cells.Item(pIntRow).Specific).Value == "N" ? false : true; //mObjTransportService.GetRouteService().CheckIfShared(mObjSalesOrderLines.Folio) ? true : false;
            mObjSalesOrderLines.PayloadType = ((SAPbouiCOM.ComboBox)mObjMtxSO.Columns.Item("U_TR_LoadType").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.VehicleType = ((SAPbouiCOM.ComboBox)mObjMtxSO.Columns.Item("U_TR_VehicleType").Cells.Item(pIntRow).Specific).Value;
            string lStrRoute = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("U_TR_Paths").Cells.Item(pIntRow).Specific).Value;

            lStrRoute = string.IsNullOrEmpty(lStrRoute) ? "0" : lStrRoute;
            mObjSalesOrderLines.Route = Convert.ToInt32(lStrRoute);

            string lStr = ((SAPbouiCOM.ComboBox)mObjMtxSO.Columns.Item("27").Cells.Item(pIntRow).Specific).Selected.Description;

            mObjSalesOrderLines.Employee = ((SAPbouiCOM.ComboBox)mObjMtxSO.Columns.Item("27").Cells.Item(pIntRow).Specific).Selected.Description;
            mObjSalesOrderLines.Asset    = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("2003").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.TotKm    = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("U_TR_TotKm").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.Extra    = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("U_TR_AdditionalExpen").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.KmA      = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("U_TR_TypeA").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.KmB      = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("U_TR_TypeB").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.KmC      = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("U_TR_TypeC").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.KmD      = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("U_TR_TypeD").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.KmE      = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("U_TR_TypeE").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.KmF      = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("U_TR_TypeF").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.TotKg    = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("U_TR_TotKilos").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.Heads    = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("U_TR_Heads").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.Bags     = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("U_GLO_BagsBales").Cells.Item(pIntRow).Specific).Value;
            mObjSalesOrderLines.Varios   = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("U_TR_OtherLoad").Cells.Item(pIntRow).Specific).Value;

            string lStrUnitPrice = ((SAPbouiCOM.EditText)mObjMtxSO.Columns.Item("14").Cells.Item(pIntRow).Specific).Value;

            lStrUnitPrice = Regex.Replace(lStrUnitPrice, "[^0-9.]", "");
            mObjSalesOrderLines.UnitPrice = float.Parse(lStrUnitPrice);
        }