public static void LoadComboQuery(string _query, ref SAPbouiCOM.ComboBox oComboBox, string fieldValue, string fieldDesc, SAPbobsCOM.Company oCompany) { SAPbobsCOM.Recordset businessObject = (SAPbobsCOM.Recordset)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); businessObject.DoQuery(_query); SAPbouiCOM.ValidValues validValues = oComboBox.ValidValues; while (oComboBox.ValidValues.Count > 0) { oComboBox.ValidValues.Remove(0, SAPbouiCOM.BoSearchKey.psk_Index); } if (!string.Equals(fieldDesc, string.Empty)) { while (!businessObject.EoF) { validValues.Add((dynamic)businessObject.Fields.Item(fieldValue).Value, (dynamic)businessObject.Fields.Item(fieldDesc).Value); businessObject.MoveNext(); } } else { while (!businessObject.EoF) { validValues.Add((dynamic)businessObject.Fields.Item(fieldValue).Value, ""); businessObject.MoveNext(); } } }
private void LoadComboQueryRecordset(string _query, dynamic oComboBox, string fieldValue, string fieldDesc, SAPbobsCOM.Company oCompany) { //oApp = (SAPbouiCOM.Application)Application.SBO_Application; //oCompany = (SAPbobsCOM.Company)oApp.Company.GetDICompany(); SAPbobsCOM.Recordset businessObject = (SAPbobsCOM.Recordset)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); businessObject.DoQuery(_query); SAPbouiCOM.ValidValues validValues = oComboBox.ValidValues; CleanComboBox(oComboBox); if (!string.Equals(fieldDesc, string.Empty)) { while (!businessObject.EoF) { validValues.Add((dynamic)businessObject.Fields.Item(fieldValue).Value, (dynamic)businessObject.Fields.Item(fieldDesc).Value); businessObject.MoveNext(); } } else { while (!businessObject.EoF) { validValues.Add((dynamic)businessObject.Fields.Item(fieldValue).Value, ""); businessObject.MoveNext(); } } }
private void LoadSchemeCodes() { SAPbouiCOM.Form oForm = default(SAPbouiCOM.Form); try { oForm = this.CurrentForm; oForm.Freeze(true); SAPbobsCOM.Recordset oRs = SBOCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); string sql_GetSchemeCodes = @"select * from ""@AVA_FM_OCRS"" where ""U_Active"" = N'Y' "; oRs.DoQuery(sql_GetSchemeCodes); SAPbouiCOM.ComboBox cbxSchemes = oForm.Items.Item(CBX_SCHEMECODE).Specific; while (cbxSchemes.ValidValues.Count > 0) { cbxSchemes.ValidValues.Remove(0, SAPbouiCOM.BoSearchKey.psk_Index); } for (int iRSRowCounter = 0; iRSRowCounter < oRs.RecordCount; iRSRowCounter++) { cbxSchemes.ValidValues.Add(oRs.Fields.Item("Code").Value, oRs.Fields.Item("Name").Value); oRs.MoveNext(); } if (cbxSchemes.ValidValues.Count > 0) { cbxSchemes.Select(0, SAPbouiCOM.BoSearchKey.psk_Index); LoadScheme(cbxSchemes.Selected.Value); } } catch (Exception ex) { throw ex; } finally { oForm.Freeze(false); } #endregion }
public List <string> GetLastAuctions(string pStrCostingCode) { SAPbobsCOM.Recordset lObjRecordset = null; List <string> lLstAuctions = new List <string>(); try { string lStrQuery = this.GetSQL("GetLastsAuctions").InjectSingleValue("CostingCode", pStrCostingCode); lObjRecordset = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); lObjRecordset.DoQuery(lStrQuery); if (lObjRecordset.RecordCount > 0) { for (int i = 0; i < lObjRecordset.RecordCount; i++) { string lStrFolio = lObjRecordset.Fields.Item("U_Folio").Value.ToString(); lLstAuctions.Add(lStrFolio); lObjRecordset.MoveNext(); } } } catch (Exception ex) { UIApplication.ShowError(string.Format("GetActions: {0}", ex.Message)); LogService.WriteError("MailSenderDAO (GetActions): " + ex.Message); LogService.WriteError(ex); } finally { MemoryUtility.ReleaseComObject(lObjRecordset); } return(lLstAuctions); }
public AccountDTO GetBankAccount(string pStrBankAcctNumber) { SAPbobsCOM.Recordset lObjResults = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); AccountDTO lObjAccount = new AccountDTO(); try { string lStrQuery = this.GetSQL("GetAccountByAcctNumber").InjectSingleValue("BankAcctNumber", pStrBankAcctNumber); lObjResults.DoQuery(lStrQuery); if (lObjResults.RecordCount > 0) { for (int i = 0; i < lObjResults.RecordCount; i++) { lObjAccount.BankCode = lObjResults.GetColumnValue <string>("BankCode"); lObjAccount.Account = lObjResults.GetColumnValue <string>("Account"); lObjAccount.Branch = lObjResults.GetColumnValue <string>("Branch"); lObjAccount.GLAccount = lObjResults.GetColumnValue <string>("GLAccount"); lObjResults.MoveNext(); } } return(lObjAccount); } catch (Exception e) { LogUtility.WriteError(string.Format("[BankDAO - GetBankAccount] Error al obtener la cuenta para el banco {0}: {1}", pStrBankAcctNumber, e.Message)); throw new Exception(string.Format("Error al obtener las cuenta para el banco {0}: {1}", pStrBankAcctNumber, e.Message)); } finally { MemoryUtility.ReleaseComObject(lObjResults); } }
public IList <CreditCardDTO> GetCreditCards() { SAPbobsCOM.Recordset lObjResults = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); IList <CreditCardDTO> lLstObjCreditCards = new List <CreditCardDTO>(); try { string lStrQuery = this.GetSQL("GetCreditCards"); lObjResults.DoQuery(lStrQuery); if (lObjResults.RecordCount > 0) { for (int i = 0; i < lObjResults.RecordCount; i++) { CreditCardDTO lObjCreditCard = new CreditCardDTO(); lObjCreditCard.CreditCard = Convert.ToInt32(lObjResults.Fields.Item("CreditCard").Value.ToString()); lObjCreditCard.CardName = lObjResults.Fields.Item("CardName").Value.ToString(); lObjCreditCard.AcctCode = lObjResults.Fields.Item("AcctCode").Value.ToString(); lObjCreditCard.Country = lObjResults.Fields.Item("Country").Value.ToString(); lLstObjCreditCards.Add(lObjCreditCard); lObjResults.MoveNext(); } } return(lLstObjCreditCards); } catch (Exception e) { LogUtility.WriteError(string.Format("[CreditCardDAO - GetCreditCards] Error al obtener las tarjetas de credito: {0}", e.Message)); throw new Exception(string.Format("Error al obtener las tarjetas de crédito: {0}", e.Message)); } finally { MemoryUtility.ReleaseComObject(lObjResults); } }
internal static List <OUTB> RetornaValores() { var lista = new List <OUTB>(); SAPbobsCOM.Recordset oRs = SapFramework.Connections.B1AppDomain.RSQuery("select TableName, Descr, TblNum, ObjectType, UsedInObj, LogTable, Archivable, ArchivDate from OUTB"); while (!oRs.EoF) { lista.Add(new OUTB() { TableName = oRs.Fields.Item("TableName").Value.ToString(), Descr = oRs.Fields.Item("Descr").Value.ToString(), TblNum = Convert.ToInt32(oRs.Fields.Item("TblNum").Value.ToString()), ObjectType = oRs.Fields.Item("ObjectType").Value.ToString(), Archivable = oRs.Fields.Item("Archivable").Value.ToString(), ArchivDate = oRs.Fields.Item("ArchivDate").Value.ToString(), LogTable = oRs.Fields.Item("LogTable").Value.ToString(), UsedInObj = oRs.Fields.Item("UsedInObj").Value.ToString() }); oRs.MoveNext(); } Objects.LimpaMemoria(oRs); return(lista); }
public IList <PaymentMethodDTO> GetPaymentMethods() { SAPbobsCOM.Recordset lObjResults = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); IList <PaymentMethodDTO> lLstObjPaymentMethods = new List <PaymentMethodDTO>(); try { string lStrQuery = this.GetSQL("GetPaymentMethods"); lObjResults.DoQuery(lStrQuery); if (lObjResults.RecordCount > 0) { for (int i = 0; i < lObjResults.RecordCount; i++) { PaymentMethodDTO lObjPaymentMethodDTO = new PaymentMethodDTO(); lObjPaymentMethodDTO.PayMethCod = lObjResults.Fields.Item("PayMethCod").Value.ToString(); lObjPaymentMethodDTO.Descript = lObjResults.Fields.Item("Descript").Value.ToString(); lLstObjPaymentMethods.Add(lObjPaymentMethodDTO); lObjResults.MoveNext(); } } return(lLstObjPaymentMethods); } catch (Exception e) { LogUtility.WriteError(string.Format("[PaymentMethodDAO - GetPaymentMethods] Error al obtener los metodos de pago: {0}", e.Message)); throw new Exception(string.Format("Error al obtener los métodos de pago: {0}", e.Message)); } finally { MemoryUtility.ReleaseComObject(lObjResults); } }
public IList <BankDTO> GetBanks() { SAPbobsCOM.Recordset lObjResults = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); IList <BankDTO> lLstObjBanks = new List <BankDTO>(); try { string lStrQuery = this.GetSQL("GetBanks"); lObjResults.DoQuery(lStrQuery); if (lObjResults.RecordCount > 0) { for (int i = 0; i < lObjResults.RecordCount; i++) { BankDTO lObjBank = new BankDTO(); lObjBank.BankCode = lObjResults.GetColumnValue <string>("BankCode"); lObjBank.BankName = lObjResults.GetColumnValue <string>("BankName"); lLstObjBanks.Add(lObjBank); lObjResults.MoveNext(); } } return(lLstObjBanks); } catch (Exception e) { LogUtility.WriteError(string.Format("[BankDAO - GetBanks] Error al obtener los bancos: {0}", e.Message)); throw new Exception(string.Format("Error al obtener los bancos: {0}", e.Message)); } finally { MemoryUtility.ReleaseComObject(lObjResults); } }
void Load_SubProject(string pFProject) { if (this.ComboBox1.ValidValues.Count > 1) { //Remove Valid Value this.ComboBox1.Select("", SAPbouiCOM.BoSearchKey.psk_ByValue); int itm_count = ComboBox1.ValidValues.Count; for (int i = 0; i < itm_count - 1; i++) { this.ComboBox1.ValidValues.Remove(1, SAPbouiCOM.BoSearchKey.psk_Index); } } SAPbobsCOM.Recordset oR_RecordSet = (SAPbobsCOM.Recordset)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); //oR_RecordSet.DoQuery("Select AbsEntry, NAME as 'Description' from OPHA where TYP =1 and ProjectID = " + pProject_AbsEntry.ToString()); oR_RecordSet.DoQuery(string.Format("SELECT AbsEntry,NAME FROM OPMG T0 WHERE T0.[FIPROJECT] = '{0}'and T0.[STATUS] <> 'T' ORDER BY AbsEntry", pFProject)); try { this.ComboBox1.ValidValues.Add("", ""); } catch { } if (oR_RecordSet.RecordCount > 0) { while (!oR_RecordSet.EoF) { ComboBox1.ValidValues.Add(oR_RecordSet.Fields.Item("AbsEntry").Value.ToString(), oR_RecordSet.Fields.Item("NAME").Value.ToString()); oR_RecordSet.MoveNext(); } } }
public List <PayLoadTypeDTO> GetPayloadTypeList() { SAPbobsCOM.Recordset lObjResults = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); List <PayLoadTypeDTO> lLstPayloadType = new List <PayLoadTypeDTO>(); try { string lStrQuery = this.GetSQL("PayloadTypes"); lObjResults.DoQuery(lStrQuery); if (lObjResults.RecordCount > 0) { for (int i = 0; i < lObjResults.RecordCount; i++) { lLstPayloadType.Add(new PayLoadTypeDTO() { Name = lObjResults.Fields.Item("Name").Value.ToString(), Code = lObjResults.Fields.Item("Code").Value.ToString(), }); lObjResults.MoveNext(); } } } catch (Exception ex) { UIApplication.ShowError(string.Format("GetPayloadTypeList: {0}", ex.Message)); LogService.WriteError("RouteListDAO (GetPayloadTypeList): " + ex.Message); LogService.WriteError(ex); } finally { MemoryUtility.ReleaseComObject(lObjResults); } return(lLstPayloadType); }
public List <string> GetAuthorizers(string pStrConfigName) { SAPbobsCOM.Recordset lObjResults = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); List <string> lStrUsers = new List <string>(); try { Dictionary <string, string> lLstParams = new Dictionary <string, string>(); lLstParams.Add("ConfigName", pStrConfigName); string lStrQuery = this.GetSQL("GetAuthorizers").Inject(lLstParams); lObjResults.DoQuery(lStrQuery); if (lObjResults.RecordCount > 0) { for (int i = 0; i < lObjResults.RecordCount; i++) { lStrUsers.Add(lObjResults.Fields.Item("U_Value").Value.ToString()); lObjResults.MoveNext(); } } } catch (Exception ex) { LogService.WriteError("CommissionDAO (GetAauthorizers): " + ex.Message); LogService.WriteError(ex); UIApplication.ShowError(string.Format("GetAauthorizers: {0}", ex.Message)); } finally { MemoryUtility.ReleaseComObject(lObjResults); } return(lStrUsers); }
public List <string> GetLastAuctions() { SAPbobsCOM.Recordset lObjRecordset = null; List <string> lLstAuctions = new List <string>(); try { string lStrQuery = this.GetSQL("GetLastAuction"); lObjRecordset = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); lObjRecordset.DoQuery(lStrQuery); if (lObjRecordset.RecordCount > 0) { for (int i = 0; i < lObjRecordset.RecordCount; i++) { string lStrFolio = lObjRecordset.Fields.Item("U_Folio").Value.ToString(); lLstAuctions.Add(lStrFolio); lObjRecordset.MoveNext(); } } } catch (Exception ex) { LogUtility.WriteError(string.Format("[AuctionDAO - GetLastAuctions] Error al obtener la ultima subasta: {0}", ex.Message)); throw new Exception(string.Format("Error al obtener la última subasta: {0}", ex.Message)); } finally { MemoryUtility.ReleaseComObject(lObjRecordset); } return(lLstAuctions); }
public IList <InvoiceRowDTO> GetGroupedLines(int pDocEntry) { SAPbobsCOM.Recordset lObjResults = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); IList <InvoiceRowDTO> lLstObjInvoiceRows = new List <InvoiceRowDTO>(); try { string lStrQuery = this.GetSQL("GetGroupedLines").InjectSingleValue("DocEntry", pDocEntry); lObjResults.DoQuery(lStrQuery); if (lObjResults.RecordCount > 0) { for (int i = 0; i < lObjResults.RecordCount; i++) { InvoiceRowDTO lObjInvoiceRowDTO = new InvoiceRowDTO(); lObjInvoiceRowDTO.LineTotal = Convert.ToDouble(lObjResults.Fields.Item("LineTotal").Value.ToString()); lObjInvoiceRowDTO.TaxCode = lObjResults.Fields.Item("TaxCode").Value.ToString(); lObjInvoiceRowDTO.OcrCode = lObjResults.Fields.Item("OcrCode").Value.ToString(); lObjInvoiceRowDTO.OcrCode2 = lObjResults.Fields.Item("OcrCode2").Value.ToString(); lObjInvoiceRowDTO.OcrCode3 = lObjResults.Fields.Item("OcrCode3").Value.ToString(); lLstObjInvoiceRows.Add(lObjInvoiceRowDTO); lObjResults.MoveNext(); } } return(lLstObjInvoiceRows); } catch (Exception e) { return(lLstObjInvoiceRows); } finally { MemoryUtility.ReleaseComObject(lObjResults); } }
private List <object> GetListBatch(string pStrAlmacen, string oStrCardCode, string pStrItemCode, List <object> pLstUsedBatch) { SAPbobsCOM.Recordset lObjRecordSet3 = (SAPbobsCOM.Recordset)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); lObjRecordSet3.DoQuery("SELECT T0.DistNumber AS BatchNumber, T1.Quantity FROM OBTN AS T0 INNER JOIN dbo.OBTQ AS T1 ON T0.ItemCode = T1.ItemCode AND T0.SysNumber = T1.SysNumber where T1.WhsCode = '" + pStrAlmacen + "' and T1.Quantity>0 and MnfSerial is not null and T0.MnfSerial = '" + oStrCardCode + "' and T0.ItemCode = '" + pStrItemCode + "' order by T0.ExpDate asc"); List <object> lLstrLotes = new List <object>(); while (!lObjRecordSet3.EoF) { var lObjUsedBatch = pLstUsedBatch.Find(x => ((dynamic)x).Batch == lObjRecordSet3.Fields.Item(0).Value.ToString()); if (lObjUsedBatch == null || ((dynamic)lObjUsedBatch).Quantity < int.Parse(lObjRecordSet3.Fields.Item(1).Value.ToString())) { lLstrLotes.Add(new { Batch = lObjRecordSet3.Fields.Item(0).Value.ToString(), Quantity = int.Parse(lObjRecordSet3.Fields.Item(1).Value.ToString()) }); } lObjRecordSet3.MoveNext(); } Memory.ReleaseComObject(lObjRecordSet3); return(lLstrLotes); }
/// <summary> /// Obtiene la configuración inicial /// </summary> private void ObtenerConfiguracionInicial() { try { listaDatos.Clear(); _oRec = null; _oRec = oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); _oRec2 = null; _oRec2 = oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); _oRec.DoQuery(@"SELECT T0.FieldID, T0.AliasID, T3.U_Usuario FROM dbo.CUFD T0 INNER JOIN dbo.UFD1 T1 ON T1.TableID = T0.TableID AND T0.FieldID = T1.FieldID, dbo.[@SAPCP_CONFIGUSUARIO] T3 WHERE T0.TableID = '@SAPCP_CONFIGUSUARIO' GROUP BY T0.FieldID, T0.AliasID, T3.U_Usuario ORDER BY T3.U_Usuario ASC"); for (int fila = 0; fila < _oRec.RecordCount; fila++) { itemDatos = new DatosConfiguracionCampos(); itemDatos.usuario = _oRec.Fields.Item("U_Usuario").Value.ToString(); itemDatos.campo = "U_" + _oRec.Fields.Item("AliasID").Value.ToString(); _oRec2.DoQuery(@"SELECT " + itemDatos.campo.ToString() + " " + "FROM dbo.[@SAPCP_CONFIGUSUARIO] " + "WHERE U_Usuario = '" + itemDatos.usuario.ToString() + "'"); itemDatos.activo = _oRec2.Fields.Item(itemDatos.campo.ToString()).Value == "Y" ? true : false; listaDatos.Add(itemDatos); _oRec.MoveNext(); } } catch (Exception ex) { throw new Exception("Error al obtener configuración inicial: " + ex.Message); } finally { try { if (_oRec != null) { System.Runtime.InteropServices.Marshal.ReleaseComObject(_oRec); } if (_oRec2 != null) { System.Runtime.InteropServices.Marshal.ReleaseComObject(_oRec2); } } catch (Exception) { } } }
public List <CommissionDriverDTO> GetComissionsDriverSaved(string pStrCommissionSaved) { List <CommissionDriverDTO> lLstComissionDTO = new List <CommissionDriverDTO>(); SAPbobsCOM.Recordset lObjResults = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); try { Dictionary <string, string> lLstParams = new Dictionary <string, string>(); lLstParams.Add("CommissionID", pStrCommissionSaved); string lStrQuery = this.GetSQL("GetCommissionsDriverSaved").Inject(lLstParams); lObjResults.DoQuery(lStrQuery); if (lObjResults.RecordCount > 0) { for (int i = 0; i < lObjResults.RecordCount; i++) { lLstComissionDTO.Add(new CommissionDriverDTO() { Type = lObjResults.Fields.Item("Type").Value.ToString(), Id = lObjResults.Fields.Item("Id").Value.ToString(), DocNum = lObjResults.Fields.Item("Id").Value.ToString(), DocDate = Convert.ToDateTime(lObjResults.Fields.Item("DocDate").Value.ToString()), ItemName = lObjResults.Fields.Item("ItemName").Value.ToString(), Route = lObjResults.Fields.Item("Route").Value.ToString(), AF = lObjResults.Fields.Item("AF").Value.ToString(), TypLoad = lObjResults.Fields.Item("TypLoad").Value.ToString(), DriverId = lObjResults.Fields.Item("U_DriverId").Value.ToString(), Driver = lObjResults.Fields.Item("U_Driver").Value.ToString(), FrgAm = Convert.ToDouble(lObjResults.Fields.Item("U_FrgAm").Value.ToString()), InsAm = Convert.ToDouble(lObjResults.Fields.Item("U_InsAm").Value.ToString()), LstDisc = Convert.ToDouble(lObjResults.Fields.Item("U_LstDisc").Value.ToString()), WkDisc = Convert.ToDouble(lObjResults.Fields.Item("U_WkDisc").Value.ToString()), Comm = Convert.ToDouble(lObjResults.Fields.Item("U_Comm").Value.ToString()), TotDisc = Convert.ToDouble(lObjResults.Fields.Item("U_TotComm").Value.ToString()), Doubt = Convert.ToDouble(lObjResults.Fields.Item("U_Doubt").Value.ToString()), NoGenerate = lObjResults.Fields.Item("U_NoGenerate").Value.ToString() == "Y" ? true : false, }); //var ss = lObjResults.Fields.Item("U_NoGenerate").Value.ToString() == "Y" ? true : false, lObjResults.MoveNext(); } } } catch (Exception ex) { LogService.WriteError("CommissionDAO (GetComissionsDrivers): " + ex.Message); LogService.WriteError(ex); UIApplication.ShowError(string.Format("GetComissionsDrivers: {0}", ex.Message)); } finally { MemoryUtility.ReleaseComObject(lObjResults); } return(lLstComissionDTO); }
private void cargarRuta() { String fechaD, fechaH; try { oForm.Freeze(true); if (CBoxtpoRuta.ValidValues.Count > 0) { for (int i = CBoxtpoRuta.ValidValues.Count - 1; i >= 0; i--) { CBoxtpoRuta.ValidValues.Remove(i, SAPbouiCOM.BoSearchKey.psk_Index); } } fechaD = ((System.String)((SAPbouiCOM.EditText)oForm.Items.Item("FechaD").Specific).Value); fechaH = ((System.String)((SAPbouiCOM.EditText)oForm.Items.Item("FechaH").Specific).Value); s = @"SELECT T0.""U_RUTA"" ""Code"" , T0.""U_RUTA"" ""Name"" FROM ""ORDR"" T0 WHERE T0.""U_RUTA"" IS NOT NULL AND T0.""DocDueDate"" BETWEEN '{0}' AND '{1}' GROUP BY T0.""U_RUTA"" ORDER BY T0.""U_RUTA"""; s = String.Format(s, fechaD, fechaH); oRecordSet.DoQuery(s); oRecordSet.MoveFirst(); int a = oRecordSet.RecordCount; while (!oRecordSet.EoF) { string code = (String)(oRecordSet.Fields.Item("Code").Value); string name = (String)(oRecordSet.Fields.Item("Name").Value); CBoxtpoRuta.ValidValues.Add(code, name); oRecordSet.MoveNext(); ; } if (CBoxtpoRuta.ValidValues.Count > 0) { CBoxtpoRuta.ValidValues.Add("Todos", "Todos"); //oRecordSet.MoveNext(); } } catch (Exception e) { Application.SBO_Application.StatusBar.SetText(e.Message + " ** Trace: " + e.StackTrace, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); log.AddLog(e.Message + " ** Trace: "); } finally { oForm.Freeze(false); } }
internal static List <CUFD> RetornaValores() { var lista = new List <CUFD>(); SAPbobsCOM.Recordset oRs = SapFramework.Connections.B1AppDomain.RSQuery(@"SELECT TableID , FieldID , AliasID , Descr , TypeID , EditType , SizeID , EditSize , Dflt , NotNull , IndexID , RTable , RField , Action , Sys , DfltDate , RelUDO FROM CUFD"); while (!oRs.EoF) { lista.Add(new CUFD() { TableID = oRs.Fields.Item("TableID").Value.ToString(), FieldID = Convert.ToInt32(oRs.Fields.Item("FieldID").Value.ToString()), AliasID = oRs.Fields.Item("AliasID").Value.ToString(), Descr = oRs.Fields.Item("Descr").Value.ToString(), TypeID = oRs.Fields.Item("TypeID").Value.ToString(), EditType = oRs.Fields.Item("EditType").Value.ToString(), SizeID = Convert.ToInt32(oRs.Fields.Item("SizeID").Value.ToString()), EditSize = Convert.ToInt32(oRs.Fields.Item("EditSize").Value.ToString()), Dflt = oRs.Fields.Item("Dflt").Value.ToString(), NotNull = oRs.Fields.Item("NotNull").Value.ToString(), IndexID = oRs.Fields.Item("IndexID").Value.ToString(), RTable = oRs.Fields.Item("RTable").Value.ToString(), RField = Convert.ToInt32(oRs.Fields.Item("RField").Value.ToString()), Action = oRs.Fields.Item("Action").Value.ToString(), Sys = oRs.Fields.Item("Sys").Value.ToString(), DfltDate = Convert.ToDateTime(oRs.Fields.Item("DfltDate").Value.ToString()), RelUDO = oRs.Fields.Item("RelUDO").Value.ToString() }); oRs.MoveNext(); } Objects.LimpaMemoria(oRs); return(lista); }
public IList <SellerReportDTO> GetSellerBatches(string pStrSeller, string pStrAuction) { SAPbobsCOM.Recordset lObjRecordSet = null; Dictionary <string, string> lLstStrParameters = new Dictionary <string, string>(); List <SellerReportDTO> lLstSellerReports = new List <SellerReportDTO>(); lLstStrParameters.Add("Auction", pStrAuction); lLstStrParameters.Add("Seller", pStrSeller); try { lObjRecordSet = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); string lStrQuery = this.GetSQL("GetSellerBatches").Inject(lLstStrParameters); lObjRecordSet.DoQuery(lStrQuery); if (lObjRecordSet.RecordCount > 0) { for (int i = 0; i < lObjRecordSet.RecordCount; i++) { lLstSellerReports.Add(new SellerReportDTO() { BatchNumber = lObjRecordSet.Fields.Item("U_Number").Value.ToString(), Quantity = Convert.ToInt32(lObjRecordSet.Fields.Item("U_Quantity").Value), Article = lObjRecordSet.Fields.Item("U_ItemType").Value.ToString(), AverageWeight = float.Parse(lObjRecordSet.Fields.Item("U_AverageWeight").Value.ToString()), TotalWeight = float.Parse(lObjRecordSet.Fields.Item("U_Weight").Value.ToString()), Price = decimal.Parse(lObjRecordSet.Fields.Item("U_Price").Value.ToString()), Amount = decimal.Parse(lObjRecordSet.Fields.Item("U_Amount").Value.ToString()), Unsold = lObjRecordSet.Fields.Item("U_Unsold").Value.ToString(), UnsoldMotive = (string)lObjRecordSet.Fields.Item("U_UnsoldMotive").Value.ToString(), Reprogrammed = lObjRecordSet.Fields.Item("U_Reprogrammed").Value.ToString(), Gender = lObjRecordSet.Fields.Item("U_Gender").Value.ToString(), Buyer = lObjRecordSet.Fields.Item("U_Buyer").Value.ToString(), Stat = (string)lObjRecordSet.Fields.Item("Stat").Value.ToString(), Orden = (int)lObjRecordSet.Fields.Item("Orden").Value }); lObjRecordSet.MoveNext(); } } } catch (Exception lObjException) { UIApplication.ShowError(string.Format("GetActions: {0}", lObjException.Message)); LogService.WriteError("MailSenderDAO (GetActions): " + lObjException.Message); LogService.WriteError(lObjException); } finally { MemoryUtility.ReleaseComObject(lObjRecordSet); } return(lLstSellerReports); }
private void LoadScheme(string SchemeCode) { SAPbouiCOM.Form oForm = default(SAPbouiCOM.Form); try { oForm = this.CurrentForm; oForm.Freeze(true); SAPbouiCOM.Grid oGrid = oForm.Items.Item(GRID_SCHEME).Specific; oGrid.DataTable.Clear(); SAPbobsCOM.Recordset oRs = SBOCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); string sql_GetScheme = @"select * from ""@AVA_FM_CRS1"" where ""Code"" = N'{0}'"; sql_GetScheme = string.Format(sql_GetScheme, SchemeCode); oRs.DoQuery(sql_GetScheme); if (oRs.RecordCount > 0) { IList <Scheme> schemes = new List <Scheme>(); Scheme temp = default(Scheme); for (int iRSRowCounter = 0; iRSRowCounter < oRs.RecordCount; iRSRowCounter++) { temp = new Scheme(oRs.Fields.Item("U_RuleSchmsID").Value, oRs.Fields.Item("U_RuleSchmsDesc").Value, oRs.Fields.Item("U_RuleSchmsType").Value, oRs.Fields.Item("U_RuleSchmsLen").Value, oRs.Fields.Item("U_RuleSchmsDefault").Value, oRs.Fields.Item("U_Padding").Value == "Y" ? true : false, oRs.Fields.Item("U_PadString").Value); oGrid.DataTable.Columns.Add(oRs.Fields.Item("U_RuleSchmsID").Value, oRs.Fields.Item("U_RuleSchmsType").Value == "I" ? SAPbouiCOM.BoFieldsType.ft_Integer : SAPbouiCOM.BoFieldsType.ft_AlphaNumeric, oRs.Fields.Item("U_RuleSchmsLen").Value); oGrid.Columns.Item(oRs.Fields.Item("U_RuleSchmsID").Value).TitleObject.Caption = oRs.Fields.Item("U_RuleSchmsDesc").Value; schemes.Add(temp); oRs.MoveNext(); } Scheme = schemes; oGrid.DataTable.Rows.Add(); foreach (var item in schemes) { if (string.IsNullOrEmpty(item.RuleSchmsDefault)) { continue; } else if (item.RuleSchmsDefault.ToUpper().Equals("NULL")) { continue; } oGrid.DataTable.SetValue(item.RuleSchmsID, oGrid.DataTable.Rows.Offset, item.RuleSchmsDefault); } oGrid.RowHeaders.Width = 20; } } catch (Exception ex) { throw ex; } finally { oForm.Freeze(false); } }
public static List <PermisoDetBean> listarDetalle(string codigo) { var res = new List <PermisoDetBean>(); SAPbobsCOM.Recordset mRS = null; try { mRS = Conexion.company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); mRS.DoQuery("select T0.\"id\",T0.\"idMenu\",T1.\"descripcion\",T0.\"accesa\",T0.\"crea\", " + " T0.\"edita\",T0.\"aprueba\",T0.\"rechaza\",T0.\"escogePrecio\" " + " from " + BdMobile.BD_NAME + "." + BdMobile.TB_PERMISOS + " T0 JOIN " + BdMobile.BD_NAME + "." + BdMobile.TB_MENUAPP + " T1 " + " ON T0.\"idMenu\" = T1.\"id\" " + " where T0.\"idPerfil\" = '" + codigo + "' and T0.\"idEmpresa\" = " + EmpresaDAO.obtenerIdInterno() + " order by T0.\"id\""); if (mRS.RecordCount > 0) { while (!mRS.EoF) { res.Add(new PermisoDetBean() { LineId = int.Parse(mRS.Fields.Item("id").Value.ToString().Trim()), codigoMenu = mRS.Fields.Item("idMenu").Value.ToString().Trim(), descripcionMenu = mRS.Fields.Item("descripcion").Value.ToString().Trim(), accesa = mRS.Fields.Item("accesa").Value.ToString().Trim(), crea = mRS.Fields.Item("crea").Value.ToString().Trim(), edita = mRS.Fields.Item("edita").Value.ToString().Trim(), aprueba = mRS.Fields.Item("aprueba").Value.ToString().Trim(), rechaza = mRS.Fields.Item("rechaza").Value.ToString().Trim(), escogePrecio = mRS.Fields.Item("escogePrecio").Value.ToString().Trim() }); mRS.MoveNext(); } } } catch (Exception ex) { StatusMessageError("PermisoDAO > listarDetalle() > " + ex.Message); } finally { if (mRS != null) { LiberarObjetoGenerico(mRS); } } return(res); }
/* * const string CC_USD = "840"; * const string CC_CAN = "124"; * const string CC_EUR = "978"; * public string getCurrencyCode(string currency) * { * if (cfgIsSandbox == "Y") * return CC_USD; * * switch (currency) * { * * case "USD": * return CC_USD; * case "CAN": * return CC_CAN; * case "$": * return CC_USD; * case "CAD": * return CC_CAN; * case "EUR": * return CC_EUR; * } * return CC_USD; * } * */ public void createAcctList() { string sql = "select \"DocEntry\",\"U_GroupName\",\"U_CardType\",\"U_CardName\",\"U_AcctCode\",\"U_CardCode\",\"U_SourceKey\",\"U_Pin\", \"U_Currency\", \"U_BranchID\" from \"@CCCARDACCT\""; SAPbobsCOM.Recordset oRS = (SAPbobsCOM.Recordset)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); try { initSetupCardAcct(); initUpdateCardAcctWithOCRC("v", "isa"); initUpdateCardAcctWithOCRC("m", "aster"); initUpdateCardAcctWithOCRC("a", "mer"); initUpdateCardAcctWithOCRC("ds", "iscover"); initUpdateCardAcctWithOCRC("eCheck", "eCheck"); string t = "Card name added to List: "; cardAcctList = new List <CCCardAcct>(); oRS.DoQuery(sql); while (!oRS.EoF) { string g = (string)oRS.Fields.Item(1).Value; if (g.ToUpper().IndexOf("NOT USE") == -1) { CCCardAcct acct = new CCCardAcct(); acct.DocEntry = (int)oRS.Fields.Item(0).Value; acct.U_GroupName = (string)oRS.Fields.Item(1).Value; acct.U_CardType = (string)oRS.Fields.Item(2).Value; acct.U_CardName = (string)oRS.Fields.Item(3).Value; acct.U_AcctCode = (string)oRS.Fields.Item(4).Value; acct.U_CardCode = (string)oRS.Fields.Item(5).Value; acct.U_SourceKey = (string)oRS.Fields.Item(6).Value; acct.U_Pin = (string)oRS.Fields.Item(7).Value; acct.U_Currency = (string)oRS.Fields.Item(8).Value; acct.U_BranchID = (string)oRS.Fields.Item(9).Value; cardAcctList.Add(acct); t = t + acct.U_CardName + "," + acct.U_GroupName + "\r\n"; } oRS.MoveNext(); } } catch (Exception ex) { errorLog(ex); errorLog(sql); } finally { System.Runtime.InteropServices.Marshal.ReleaseComObject(oRS); oRS = null; } }
public static bool registrarMenuDetalleDefault(string codMenu, string descripcion) { var res = true; SAPbobsCOM.Recordset mRS = null; SAPbobsCOM.Recordset mRSInsert = null; try { mRS = Conexion.company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); mRSInsert = Conexion.company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); mRS.DoQuery("select distinct \"idPerfil\", \"idEmpresa\" from " + BdMobile.BD_NAME + "." + BdMobile.TB_PERMISOS); string idMenu = MenuAppDAO.obtenerIdxCodigo(codMenu); if (mRS.RecordCount > 0) { while (!mRS.EoF) { string idPerfil = mRS.Fields.Item("idPerfil").Value.ToString().Trim(); string idEmpresa = mRS.Fields.Item("idEmpresa").Value.ToString().Trim(); mRSInsert.DoQuery("insert into " + BdMobile.BD_NAME + "." + BdMobile.TB_PERMISOS + " values (" + obtenerUltimoId() + ", " + idEmpresa + ", " + idMenu + ", '" + idPerfil + "', 'N', 'N', 'N', 'N', 'N', 'N')"); mRS.MoveNext(); } } } catch (Exception ex) { res = false; StatusMessageError("PermisoDAO > registrarDetalleDefault() > " + ex.Message); } finally { if (mRS != null) { LiberarObjetoGenerico(mRS); } if (mRSInsert != null) { LiberarObjetoGenerico(mRSInsert); } } return(res); }
public IList <InvoiceDTO> GetClientInvoices(string pCardCode, string pDocStatus = "%") { SAPbobsCOM.Recordset lObjResults = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); IList <InvoiceDTO> lLstObjInvoices = new List <InvoiceDTO>(); try { string lStrQuery = this.GetSQL("GetClientInvoices").InjectSingleValue("CardCode", pCardCode).InjectSingleValue("DocStatus", pDocStatus); lObjResults.DoQuery(lStrQuery); if (lObjResults.RecordCount > 0) { for (int i = 0; i < lObjResults.RecordCount; i++) { //lObjResults.GetColumnValue<int>("CheckKey"); InvoiceDTO lObjInvoiceDTO = new InvoiceDTO(); lObjInvoiceDTO.DocStatus = lObjResults.GetColumnValue <string>("DocStatus"); lObjInvoiceDTO.DocNum = lObjResults.GetColumnValue <int>("DocNum"); lObjInvoiceDTO.Series = lObjResults.GetColumnValue <int>("Series"); lObjInvoiceDTO.SeriesName = lObjResults.GetColumnValue <string>("SeriesName"); lObjInvoiceDTO.DocNum = lObjResults.GetColumnValue <int>("DocNum"); lObjInvoiceDTO.DocEntry = lObjResults.GetColumnValue <int>("DocEntry"); lObjInvoiceDTO.TransId = lObjResults.GetColumnValue <int>("TransId"); lObjInvoiceDTO.DocDate = lObjResults.GetColumnValue <DateTime>("DocDate"); lObjInvoiceDTO.DocDueDate = lObjResults.GetColumnValue <DateTime>("DocDueDate"); lObjInvoiceDTO.DocCur = lObjResults.GetColumnValue <string>("DocCur"); lObjInvoiceDTO.DocTotal = lObjResults.GetColumnValue <double>("DocTotal"); lObjInvoiceDTO.DocTotalFC = lObjResults.GetColumnValue <double>("DocTotalFC"); lObjInvoiceDTO.PaidToDate = lObjResults.GetColumnValue <double>("PaidToDate"); lObjInvoiceDTO.DocRemaining = lObjResults.GetColumnValue <double>("DocRemaining"); lObjInvoiceDTO.CardCode = lObjResults.GetColumnValue <string>("CardCode"); lObjInvoiceDTO.OcrCode = lObjResults.GetColumnValue <string>("OcrCode"); lObjInvoiceDTO.ObjType = lObjResults.GetColumnValue <string>("ObjType"); lLstObjInvoices.Add(lObjInvoiceDTO); lObjResults.MoveNext(); } } return(lLstObjInvoices); } catch (Exception e) { LogUtility.WriteError(string.Format("[DocumentDAO - GetClientInvoices] Error al obtener las facturas del cliente {0}: {1}", pCardCode, e.Message)); throw new Exception(string.Format("Error al obtener las facturas del cliente {0}: {1}", pCardCode, e.Message)); } finally { MemoryUtility.ReleaseComObject(lObjResults); } }
public List <InvoiceDTO> GetInvoices(string pStrCardCode, string pStrOcrCode, char pStrType) { SAPbobsCOM.Recordset lObjRecordset = null; List <InvoiceDTO> lLstCardCodeDTO = new List <InvoiceDTO>(); try { Dictionary <string, string> lLstStrParameters = new Dictionary <string, string>(); lLstStrParameters.Add("CardCode", pStrCardCode); lLstStrParameters.Add("OcrCode", pStrOcrCode); lLstStrParameters.Add("CYC", pStrType.ToString()); string lStrQuery = this.GetSQL("GetInvoices").Inject(lLstStrParameters); //this.UIAPIRawForm.DataSources.DataTables.Item("RESULT").ExecuteQuery(lStrQuery); lObjRecordset = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); lObjRecordset.DoQuery(lStrQuery); if (lObjRecordset.RecordCount > 0) { for (int i = 0; i < lObjRecordset.RecordCount; i++) { InvoiceDTO lObjInvoiceDTO = new InvoiceDTO(); lObjInvoiceDTO.DocEntry = lObjRecordset.Fields.Item("DocEntry").Value.ToString(); lObjInvoiceDTO.DocNum = lObjRecordset.Fields.Item("DocNum").Value.ToString(); lObjInvoiceDTO.Date = Convert.ToDateTime(lObjRecordset.Fields.Item("DocDate").Value.ToString()); lObjInvoiceDTO.Days = Convert.ToInt32(lObjRecordset.Fields.Item("Days").Value.ToString()); lObjInvoiceDTO.Area = lObjRecordset.Fields.Item("OcrCode").Value.ToString(); lObjInvoiceDTO.Balance = Convert.ToDecimal(lObjRecordset.Fields.Item("Balance").Value.ToString()); lObjInvoiceDTO.Amount = 0; lLstCardCodeDTO.Add(lObjInvoiceDTO); lObjRecordset.MoveNext(); } } } catch (Exception ex) { UIApplication.ShowError(string.Format("GetPayments: {0}", ex.Message)); LogService.WriteError("PaymentDAO (GetPayments): " + ex.Message); LogService.WriteError(ex); } finally { MemoryUtility.ReleaseComObject(lObjRecordset); } return(lLstCardCodeDTO); }
public List <AuctionDTO> GetAuctionDTO(string pStrFolio, string pStrCostingCode, char pCharCYC) { SAPbobsCOM.Recordset lObjRecordset = null; List <AuctionDTO> lLstAuctionDTO = new List <AuctionDTO>(); try { Dictionary <string, string> lLstStrParameters = new Dictionary <string, string>(); lLstStrParameters.Add("Folio", pStrFolio); lLstStrParameters.Add("OcrCode", pStrCostingCode); lLstStrParameters.Add("CYC", pCharCYC.ToString()); string lStrQuery = this.GetSQL("GetPayments").Inject(lLstStrParameters); //this.UIAPIRawForm.DataSources.DataTables.Item("RESULT").ExecuteQuery(lStrQuery); lObjRecordset = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); lObjRecordset.DoQuery(lStrQuery); if (lObjRecordset.RecordCount > 0) { for (int i = 0; i < lObjRecordset.RecordCount; i++) { AuctionDTO lObjAuctionDTO = new AuctionDTO(); lObjAuctionDTO.CardCode = lObjRecordset.Fields.Item("CardCode").Value.ToString(); lObjAuctionDTO.CardName = lObjRecordset.Fields.Item("CardName").Value.ToString(); lObjAuctionDTO.TotalSell = lObjRecordset.Fields.Item("Venta").Value.ToString(); lObjAuctionDTO.TotalBuy = lObjRecordset.Fields.Item("Invoice").Value.ToString(); lObjAuctionDTO.AccountD = lObjRecordset.Fields.Item("AccountD").Value.ToString(); lLstAuctionDTO.Add(lObjAuctionDTO); lObjRecordset.MoveNext(); } } } catch (Exception ex) { UIApplication.ShowError(string.Format("GetPayments: {0}", ex.Message)); LogService.WriteError("PaymentDAO (GetPayments): " + ex.Message); LogService.WriteError(ex); } finally { MemoryUtility.ReleaseComObject(lObjRecordset); } return(lLstAuctionDTO); }
public List <CommissionDTO> GetComission(string pStrDriverId, string pStrDateStart, string pStrDateEnd) { List <CommissionDTO> lLstComissionDTO = new List <CommissionDTO>(); SAPbobsCOM.Recordset lObjResults = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); try { Dictionary <string, string> lLstParams = new Dictionary <string, string>(); lLstParams.Add("DateStart", pStrDateStart); lLstParams.Add("DateEnd", pStrDateEnd); lLstParams.Add("DriverId", pStrDriverId); string lStrQuery = this.GetSQL("GetCommissionsInv").Inject(lLstParams); lObjResults.DoQuery(lStrQuery); if (lObjResults.RecordCount > 0) { for (int i = 0; i < lObjResults.RecordCount; i++) { lLstComissionDTO.Add(new CommissionDTO() { DocEntry = lObjResults.Fields.Item("DocEntry").Value.ToString(), Date = Convert.ToDateTime(lObjResults.Fields.Item("DocDate").Value.ToString()), InvFol = lObjResults.Fields.Item("DocNum").Value.ToString(), OpType = lObjResults.Fields.Item("OpType").Value.ToString(), Route = lObjResults.Fields.Item("U_TR_Paths").Value.ToString(), Vcle = lObjResults.Fields.Item("U_TR_VehicleType").Value.ToString(), PyId = lObjResults.Fields.Item("U_TR_LoadType").Value.ToString(), Amnt = Convert.ToDouble(lObjResults.Fields.Item("LineTotal").Value.ToString()), Ins = Convert.ToDouble(lObjResults.Fields.Item("U_Seguro").Value.ToString()), Cmsn = Convert.ToDouble(lObjResults.Fields.Item("U_Commission").Value.ToString()), }); lObjResults.MoveNext(); } } } catch (Exception ex) { LogService.WriteError("CommissionDAO (GetComission): " + ex.Message); LogService.WriteError(ex); UIApplication.ShowError(string.Format("GetComission: {0}", ex.Message)); } finally { MemoryUtility.ReleaseComObject(lObjResults); } return(lLstComissionDTO); }
/* Acomodar * public List<string> GetDocumentByBP(string pStrTableO, string pStrTableL, string pStrBP) * { * SAPbobsCOM.Recordset lObjRecordSet = null; * List<string> lLstDoc = new List<string>(); * * try * { * lObjRecordSet = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); * string lStrQuery = string.Format(@" * select T0.DocEntry from {0} T0 * inner join {1} T1 on T1.DocEntry=T0.DocEntry * where CardCode ='{2}' and DocStatus !='C' and t1.WhsCode ='PLHE' and DocNum not in(select A0.U_Number from [@UG_PL_TCKT] A0 where A0.U_Status != '0') * ", pStrTableO, pStrTableL, pStrBP); * * lObjRecordSet.DoQuery(lStrQuery); * * if (lObjRecordSet.RecordCount > 0) * { * for (int i = 0; i < lObjRecordSet.RecordCount; i++) * { * lLstDoc.Add(lObjRecordSet.Fields.Item(0).Value.ToString()); * lObjRecordSet.MoveNext(); * } * } * } * catch(Exception lObjException) * { * UIApplication.ShowMessageBox(string.Format("Error de consulta", lObjException.Message)); * } * finally * { * MemoryUtility.ReleaseComObject(lObjRecordSet); * } * * return lLstDoc; * } * * public List<string> GetDocumentByFiller(string pStrFiller) * { * SAPbobsCOM.Recordset lObjRecordSet = null; * List<string> lLstDoc = new List<string>(); * * try * { * lObjRecordSet = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); * string lStrQuery = string.Format(@" * select DocEntry from OWTQ where DocStatus !='C' and Filler = '{0}' and CardCode is null and DocNum not in(select U_Number from [@UG_PL_TCKT] where U_Status != '0' and U_BPCode = '') * ", pStrFiller); * lObjRecordSet.DoQuery(lStrQuery); * * if (lObjRecordSet.RecordCount > 0) * { * for (int i = 0; i < lObjRecordSet.RecordCount; i++) * { * lLstDoc.Add(lObjRecordSet.Fields.Item(0).Value.ToString()); * lObjRecordSet.MoveNext(); * } * } * } * catch (Exception lObjException) * { * UIApplication.ShowMessageBox(string.Format("Error de consulta", lObjException.Message)); * } * finally * { * MemoryUtility.ReleaseComObject(lObjRecordSet); * } * * return lLstDoc; * } * * public List<string> GetDocumentByInvoice(string pStrCardCode, string pStrTable, string pStrUpdivnt) * { * SAPbobsCOM.Recordset lObjRecordSet = null; * List<string> lLstDoc = new List<string>(); * * try * { * lObjRecordSet = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); * string lStrQuery = string.Format(@" * * select DocEntry from {0} where UPdinvnt = '{1}' and CardCode = '{2}' and DocStatus != 'C' and CANCELED = 'N' and DocNum not in (select U_Number from [@UG_PL_TCKT] where U_Status != '0') * ", pStrTable, pStrUpdivnt, pStrCardCode); * lObjRecordSet.DoQuery(lStrQuery); * * if (lObjRecordSet.RecordCount > 0) * { * for (int i = 0; i < lObjRecordSet.RecordCount; i++) * { * lLstDoc.Add(lObjRecordSet.Fields.Item(0).Value.ToString()); * lObjRecordSet.MoveNext(); * } * } * } * catch (Exception lObjException) * { * UIApplication.ShowMessageBox(string.Format("Error de consulta", lObjException.Message)); * } * finally * { * MemoryUtility.ReleaseComObject(lObjRecordSet); * } * * return lLstDoc; * } */ public List <string> GetDocumentByWhs(string pStrWhsCode, string pStrTable, string pStrCardCode) { List <string> lLstDoc = new List <string>(); string lStrQuery = "select DocEntry from {Table} where WhsCode='{WhereFieldValue}'";// and CardCode = '{CardCode}'"; SAPbobsCOM.Recordset lObjRecordSet = null; Dictionary <string, string> lLstStrParameters = null; try { lObjRecordSet = (SAPbobsCOM.Recordset)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); lLstStrParameters = new Dictionary <string, string>(); lLstStrParameters.Add("WhereFieldValue", pStrWhsCode); lLstStrParameters.Add("Table", pStrTable); //lLstStrParameters.Add("CardCode", pStrCardCode); lStrQuery = lStrQuery.Inject(lLstStrParameters); lObjRecordSet.DoQuery(lStrQuery); if (lObjRecordSet.RecordCount > 0) { for (int i = 0; i < lObjRecordSet.RecordCount; i++) { lLstDoc.Add(lObjRecordSet.Fields.Item(0).Value.ToString()); lObjRecordSet.MoveNext(); } return(lLstDoc); } return(null); } catch (Exception ex) { LogService.WriteError("[GetDocumentByWhs]: " + ex.Message); LogService.WriteError(ex); UIApplication.ShowMessageBox(string.Format("Error de consulta", ex.Message)); } finally { MemoryUtility.ReleaseComObject(lObjRecordSet); } return(lLstDoc); }
public static List <EquipoBean> listar() { var res = new List <EquipoBean>(); SAPbobsCOM.Recordset mRS = null; try { mRS = Conexion.company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); mRS.DoQuery("SELECT * from \"@" + Movil.getTabla().nombre + "\" order by \"DocEntry\""); if (mRS.RecordCount > 0) { while (!mRS.EoF) { res.Add(new EquipoBean() { docEntry = mRS.Fields.Item("DocEntry").Value, codigo = mRS.Fields.Item("Code").Value.ToString().Trim(), descripcion = mRS.Fields.Item("Name").Value.ToString().Trim(), modelo = mRS.Fields.Item("U_MSSM_MOD").Value.ToString().Trim(), serie = mRS.Fields.Item("U_MSSM_SER").Value.ToString().Trim(), color = mRS.Fields.Item("U_MSSM_COL").Value.ToString().Trim(), codigoUnico = mRS.Fields.Item("U_MSSM_IDU").Value.ToString().Trim(), verificarId = mRS.Fields.Item("U_MSSM_VAL").Value.ToString().Trim() }); mRS.MoveNext(); } } } catch (Exception ex) { StatusMessageError("EquipoDAO > listar() > " + ex.Message); } finally { if (mRS != null) { LiberarObjetoGenerico(mRS); } } return(res); }
private void LoadComboProjetistaCadastradoOOPR(SAPbouiCOM.ComboBox oComboEntrevista, SAPbouiCOM.ComboBox oComboMedicao, SAPbouiCOM.ComboBox oComboApresentacao, string idOOPR) { RecSet = projetista.trazerProjetistasOportunidade(idOOPR); RecSet.MoveFirst(); int RecCount = RecSet.RecordCount; if (RecCount == 0) { oComboEntrevista.Select("", SAPbouiCOM.BoSearchKey.psk_ByValue); oComboApresentacao.Select("", SAPbouiCOM.BoSearchKey.psk_ByValue); } for (int RecIndex = 0; RecIndex <= RecCount - 1; RecIndex++) { string valorComboEntrevista = RecSet.Fields.Item(0).Value.ToString(); string valorComboApresentacao = RecSet.Fields.Item(1).Value.ToString(); string valorComboMedicao = RecSet.Fields.Item(2).Value.ToString(); oComboEntrevista.Select(valorComboEntrevista, SAPbouiCOM.BoSearchKey.psk_ByValue); oComboApresentacao.Select(valorComboApresentacao, SAPbouiCOM.BoSearchKey.psk_ByValue); oComboMedicao.Select(valorComboMedicao, SAPbouiCOM.BoSearchKey.psk_ByValue); RecSet.MoveNext(); } RecSet = null; System.GC.Collect(); }