private void LinkBtn_BeforeBtnPressed(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; try { if (pVal.ColUID == "DocEntry") { int Index = oGrid.GetDataTableRowIndex(pVal.Row); string Value = oGrid.DataTable.GetValue("TransType", Index); SAPbouiCOM.EditTextColumn oColumns = (SAPbouiCOM.EditTextColumn)oGrid.Columns.Item("DocEntry"); oColumns.LinkedObjectType = Value; } } catch (SqlException e) { __app.MessageBox(e.Message, 1, "Ok", "", ""); BubbleEvent = false; } catch (COMException e) { __app.MessageBox(e.Message, 1, "Ok", "", ""); BubbleEvent = false; } catch (Exception e) { __app.MessageBox(e.Message, 1, "Ok", "", ""); BubbleEvent = false; } }
private void Generate() { try { this.CurrentForm.Freeze(true); SBOApp.StatusBar.SetText("正在处理,请稍后...", SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); SAPbouiCOM.Grid grid_list = this.CurrentForm.Items.Item(GRID_LIST).Specific; if (grid_list.Rows.Count > 0) { SAPbouiCOM.EditTextColumn col_voucher_code = (SAPbouiCOM.EditTextColumn)grid_list.Columns.Item("VoucherCode"); if (col_voucher_code.PickerType != SAPbouiCOM.BoPickerType.pt_Search) { throw new Exception("请在[凭单编码]列上绑定运算逻辑格式化搜索!"); } for (int i = 0; i < grid_list.Rows.Count; i++) { grid_list.SetCellFocus(i, 2); col_voucher_code.ClickPicker(i + 1); SBOApp.StatusBar.SetText(string.Format("处理完成{0}/{1}!", i, grid_list.Rows.Count), SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); } } SBOApp.StatusBar.SetText("处理完成!", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); } catch (Exception ex) { throw ex; } finally { this.CurrentForm.Freeze(false); } }
private void OnCustomInitialize() { //conexion oApp = (SAPbouiCOM.Application)Application.SBO_Application; oCompany = (SAPbobsCOM.Company)oApp.Company.GetDICompany(); //combobox de paises CleanComboBox(ComboBox2); string SqlCad = "select code,name from ocry"; LoadComboQueryRecordset(SqlCad, ComboBox2, "code", "name", oCompany); //Folder0.Item.Click(); //combobox de f_pagos CleanComboBox(ComboBox0); string SqlCad2 = "select GroupNum,PymntGroup from octg"; LoadComboQueryRecordset(SqlCad2, ComboBox0, "GroupNum", "PymntGroup", oCompany); //combobox de pais de los bancos CleanComboBox(ComboBox4); string SqlCad5 = "select DISTINCT ocry.code,ocry.name from ocry inner join odsc on ocry.code=odsc.CountryCod "; LoadComboQueryRecordset(SqlCad5, ComboBox4, "code", "name", oCompany); oForm = oApp.Forms.Item("formpri"); // Muestra el formulario oForm.Visible = true; //para que funcionen las flechas y e refresh (databrowser) oForm.DataBrowser.BrowseBy = "TxtCod"; //busca la grilla con el UID oitem = oForm.Items.Item("grdpy"); oGrid = ((SAPbouiCOM.Grid)(oitem.Specific)); //crear el datasources y despues dentro de esto se ejecuta la query oForm.DataSources.DataTables.Add("grPagdt"); oForm.DataSources.DataTables.Item(0).ExecuteQuery("SELECT distinct t0.PayMethCod AS Código,t0.Descript as Descripción,t0.Active as Activo from OPYM as t0 left join ocrd as t1 on t0.PayMethCod= t1.pymcode where t0.type='O' "); oGrid.DataTable = oForm.DataSources.DataTables.Item("grPagdt"); //cheackbox en el campo activo oGrid.Columns.Item("Activo").Type = SAPbouiCOM.BoGridColumnType.gct_CheckBox; //para agregar el link buton a la grilla oGrid.Columns.Item("Código").Type = SAPbouiCOM.BoGridColumnType.gct_EditText; SAPbouiCOM.EditTextColumn oEdit = (SAPbouiCOM.EditTextColumn)oGrid.Columns.Item("Código"); oEdit.LinkedObjectType = "147"; // oGrid.Rows.SelectedRows.Add(pVal.Row); //string sMetodoPago = (string)oGrid.Columns.Item("Activo"); //int nRow = oGrid.Rows.SelectedRows.Item(0, SAPbouiCOM.BoOrderType.ot_RowOrder); //string sMetodoPago = (string)oGrid.DataTable.GetValue("Código", nRow); RowNumberGrid(oGrid); }
private void PopulateDocumentsGrid(SAPbouiCOM.Grid control) { control.SetGridHeaderIndex(); SAPbouiCOM.EditTextColumn gColumn = control.Columns.Item("ItemCode") as SAPbouiCOM.EditTextColumn; gColumn.LinkedObjectType = "4"; gColumn = control.Columns.Item("WhsCode") as SAPbouiCOM.EditTextColumn; gColumn.LinkedObjectType = "64"; }
private void AtualizarTiposColunas() { SAPbouiCOM.EditTextColumn oEditCol = ((SAPbouiCOM.EditTextColumn)(oGrid.Columns.Item("CardCode"))); oEditCol.LinkedObjectType = "2"; oEditCol = ((SAPbouiCOM.EditTextColumn)(oGrid.Columns.Item("DocNum"))); oEditCol.LinkedObjectType = "13"; oGrid.Columns.Item("DocStatus").Type = SAPbouiCOM.BoGridColumnType.gct_ComboBox; SAPbouiCOM.ComboBoxColumn oComboBoxCol; oComboBoxCol = ((SAPbouiCOM.ComboBoxColumn)(oGrid.Columns.Item("DocStatus"))); oComboBoxCol.ValidValues.Add("C", "Fechado"); oComboBoxCol.ValidValues.Add("O", "Aberto"); oComboBoxCol.DisplayType = SAPbouiCOM.BoComboDisplayType.cdt_Description; }
public void grBusVlr() { SAPbobsCOM.Recordset oRecordset1 = ((SAPbobsCOM.Recordset)(oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset))); oitem = oForm.Items.Item("grdpy"); oGrid = ((SAPbouiCOM.Grid)(oitem.Specific)); string vlGrilla = null; string Sql10 = "select t0.PayMethCod as 'grcode',t1.Cardcode as 'cod' from OPYM as t0 left join ocrd as t1 on t0.PayMethCod= t1.pymcode where t1.cardcode='" + EditText0.Value.ToString() + "'"; oRecordset1.DoQuery(Sql10); string Extraerdequery10 = oRecordset1.Fields.Item("grcode").Value.ToString(); vlGrilla = Extraerdequery10; oForm.DataSources.DataTables.Item("grPagdt"); oForm.DataSources.DataTables.Item(0).ExecuteQuery("SELECT distinct t0.PayMethCod AS 'Código',t0.Descript as' Descripción',t0.Active as 'Activo' from OPYM as t0 left join ocrd as t1 on t0.PayMethCod= t1.pymcode where t0.type='O' "); //oGrid.DataTable = oForm.DataSources.DataTables.Item("grPagdt2"); oGrid.Columns.Item("Activo").Type = SAPbouiCOM.BoGridColumnType.gct_CheckBox; //para agregar el link buton a la grilla oGrid.Columns.Item("Código").Type = SAPbouiCOM.BoGridColumnType.gct_EditText; SAPbouiCOM.EditTextColumn oEdit = (SAPbouiCOM.EditTextColumn)oGrid.Columns.Item("Código"); oEdit.LinkedObjectType = "147"; //oCBC.ValidValues.Add(oRec.Fields.Item(0).Value.ToString(), oRec.Fields.Item(1).Value.ToString()); //algo parecido a lo que hace el boto de fijar metodo, lo hago aca para que el viejaSel no sea -1 y pueda sacar la linea en negrita //string valor = (string)oGrid.DataTable.GetValue("Código", 2); esto es para saber lo que lleva una linea en especifico for (int iRows = 0; iRows <= oGrid.Rows.Count - 1; iRows++) { if ((string)oGrid.DataTable.GetValue("Código", iRows) == vlGrilla) { if (viejaSel != -1) { oGrid.CommonSetting.SetRowFontStyle(viejaSel, SAPbouiCOM.BoFontStyle.fs_Plain); } oGrid.CommonSetting.SetRowFontStyle(iRows + 1, SAPbouiCOM.BoFontStyle.fs_Bold); viejaSel = iRows + 1; } } // Extraerdequery1 = Convert.ToString(Grid2.Columns.Item("Descripción")); //} }
private void PopulateBatchesGrid(int rowIndex) { string itemCode = dtDocuments.GetValue("ItemCode", rowIndex).ToString(); string whsCode = dtDocuments.GetValue("WhsCode", rowIndex).ToString(); var query = string.Format(Query, itemCode, whsCode); dtBatches.ExecuteQuery(query); gvBatches.SetGridHeaderIndex(); SAPbouiCOM.EditTextColumn gColumn = gvBatches.Columns.Item("ItemCode") as SAPbouiCOM.EditTextColumn; gColumn.LinkedObjectType = "4"; gColumn = gvBatches.Columns.Item("WhsCode") as SAPbouiCOM.EditTextColumn; gColumn.LinkedObjectType = "64"; }
public void grillametpag() { oitem = oForm.Items.Item("grdpy"); oGrid = ((SAPbouiCOM.Grid)(oitem.Specific)); //crear el datasources y despues dentro de esto se ejecuta la query // oForm.DataSources.DataTables.item("grPagdt"); oGrid.DataTable = oForm.DataSources.DataTables.Item("grPagdt"); oForm.DataSources.DataTables.Item(0).ExecuteQuery("SELECT distinct t0.PayMethCod AS Código,t0.Descript as Descripción,t0.Active as Activo from OPYM as t0 left join ocrd as t1 on t0.PayMethCod= t1.pymcode where t0.type='O' "); //cheackbox en el campo activo oGrid.Columns.Item("Activo").Type = SAPbouiCOM.BoGridColumnType.gct_CheckBox; //para agregar el link buton a la grilla oGrid.Columns.Item("Código").Type = SAPbouiCOM.BoGridColumnType.gct_EditText; SAPbouiCOM.EditTextColumn oEdit = (SAPbouiCOM.EditTextColumn)oGrid.Columns.Item("Código"); oEdit.LinkedObjectType = "147"; RowNumberGrid(oGrid); }
private void InsertDate_AfterAddBtnPressed(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; try { __Form = __app.Forms.GetForm(pVal.FormTypeEx, pVal.FormTypeCount); oRs = (SAPbobsCOM.Recordset)____bobCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); oRs1 = (SAPbobsCOM.Recordset)____bobCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); oGrid = __Form.Items.Item("grid").Specific; int Progress = 0; SAPbouiCOM.ProgressBar oProgressBar = null; oProgressBar = __app.StatusBar.CreateProgressBar("Updating History ", Htable.Rows.Count, true); #region UpdateHistoryTable for (int i = 0; i < Htable.Rows.Count; i++) { try { int DocEntry = int.Parse(Htable.Rows[i][0].ToString()); //oGrid.DataTable.GetValue("DocEntry", i); string CollectionNotes = Htable.Rows[i][1].ToString(); //oGrid.DataTable.GetValue("As Collection Notes", i); oProgressBar.Text = "Updating History " + i + " rows..."; Progress += 1; oProgressBar.Value = Progress; if (!string.IsNullOrEmpty(CollectionNotes)) { SAPbobsCOM.GeneralService oGeneralService; SAPbobsCOM.GeneralData oGeneralData; SAPbobsCOM.CompanyService sCmp = null; SAPbobsCOM.GeneralData oChild; SAPbobsCOM.GeneralDataCollection oChildren; SAPbobsCOM.GeneralDataParams oGeneralParams; sCmp = ____bobCompany.GetCompanyService(); oGeneralService = sCmp.GetGeneralService("UDOB1CZHDR"); oGeneralData = (SAPbobsCOM.GeneralData)oGeneralService.GetDataInterface(GeneralServiceDataInterfaces.gsGeneralData); string SqlQry = ""; SqlQry = "SELECT \"Code\" FROM \"@AW_B1CZHDR\" Where \"U_DocEntry\"=" + DocEntry; oRs.DoQuery(SqlQry); if (oRs.RecordCount > 0) { ____bobCompany.StartTransaction(); string SqlCode = ""; SqlCode = "SELECT T0.\"Code\",T1.\"U_AsColNotes\",T1.\"U_UpdateDate\" FROM \"@AW_B1CZHDR\" T0 INNER JOIN \"@AW_B1CZDTL\" T1 ON T1.\"U_DocEntry\"=T0.\"U_DocEntry\" and T0.\"Code\"=T1.\"Code\" " + " Where T0.\"U_DocEntry\"=" + DocEntry; oRs1.DoQuery(SqlCode); oGeneralData.SetProperty("Code", Convert.ToString(oRs1.Fields.Item("Code").Value)); oGeneralData.SetProperty("Name", Convert.ToString(oRs.Fields.Item("Code").Value)); oGeneralData.SetProperty("U_DocEntry", DocEntry); oChildren = oGeneralData.Child("AW_B1CZDTL"); for (int j = 0; j < oRs1.RecordCount; j++) { oChild = oChildren.Add(); oChild.SetProperty("U_DocEntry", DocEntry); oChild.SetProperty("U_AsColNotes", oRs1.Fields.Item("U_AsColNotes").Value); oChild.SetProperty("U_UpdateDate", oRs1.Fields.Item("U_UpdateDate").Value); oRs1.MoveNext(); } oChild = oChildren.Add(); oChild.SetProperty("U_DocEntry", DocEntry); oChild.SetProperty("U_AsColNotes", CollectionNotes); oChild.SetProperty("U_UpdateDate", DateTime.Now); oGeneralService.Update(oGeneralData); if (____bobCompany.InTransaction) { ____bobCompany.EndTransaction(SAPbobsCOM.BoWfTransOpt.wf_Commit); } } else { ____bobCompany.StartTransaction(); string SqlCode = ""; SqlCode = "SELECT IFNULL(MAX((CAST(\"Code\" AS int))),0)+1 \"MaxCode\",IFNULL(MAX((CAST(\"DocEntry\" AS int))),0)+1 \"MaxDocEntry\" FROM \"@AW_B1CZHDR\""; oRs.DoQuery(SqlCode); oGeneralData.SetProperty("Code", Convert.ToString(oRs.Fields.Item("MaxCode").Value)); oGeneralData.SetProperty("Name", Convert.ToString(oRs.Fields.Item("MaxCode").Value)); oGeneralData.SetProperty("U_DocEntry", DocEntry); oChildren = oGeneralData.Child("AW_B1CZDTL"); oChild = oChildren.Add(); oChild.SetProperty("U_DocEntry", DocEntry); oChild.SetProperty("U_AsColNotes", CollectionNotes); oChild.SetProperty("U_UpdateDate", DateTime.Now.Date); oGeneralService.Add(oGeneralData); if (____bobCompany.InTransaction) { ____bobCompany.EndTransaction(SAPbobsCOM.BoWfTransOpt.wf_Commit); } } } } catch (Exception) { } } oProgressBar.Stop(); Htable.Clear(); DT.Clear(); DT = null; #endregion string CardCode = __Form.Items.Item("Item_0").Specific.Value; string SqlDoc = ""; if (!string.IsNullOrEmpty(CardCode)) { SqlDoc = "CALL AGING_REPORT ('" + CardCode + "')"; } else { SqlDoc = "CALL AGING_REPORT (NULL)"; } oRs.DoQuery(SqlDoc); if (oRs.RecordCount > 0) { if (DT == null) { DT = __Form.DataSources.DataTables.Add("DT1" + DateTime.Now.Second); } DT.ExecuteQuery(SqlDoc); oGrid.DataTable = DT; oGrid.AutoResizeColumns(); oGrid.Columns.Item("Customer Code").Editable = false; oGrid.Columns.Item("Customer Name").Editable = false; oGrid.Columns.Item("Customer Name").Editable = false; oGrid.Columns.Item("Type").Editable = false; SAPbouiCOM.EditTextColumn Typcol = (SAPbouiCOM.EditTextColumn)oGrid.Columns.Item("DocEntry"); Typcol.LinkedObjectType = "13"; oGrid.Columns.Item("TransType").Visible = false; oGrid.Columns.Item("DocEntry").Editable = false; oGrid.Columns.Item("Document No.").Editable = false; oGrid.Columns.Item("Customer Ref. No.").Editable = false; oGrid.Columns.Item("Posting Date").Editable = false; oGrid.Columns.Item("Due Date").Editable = false; oGrid.Columns.Item("Future").Editable = false; oGrid.Columns.Item("0-30 Days").Editable = false; oGrid.Columns.Item("31-60 Days").Editable = false; oGrid.Columns.Item("61-90 Days").Editable = false; oGrid.Columns.Item("91-120 Days").Editable = false; oGrid.Columns.Item("121+ Days").Editable = false; SAPbouiCOM.EditTextColumn col = (SAPbouiCOM.EditTextColumn)oGrid.Columns.Item("AWDocEntry"); col.LinkedObjectType = "UDOB1CZHDR"; col.Width = 15; oGrid.Columns.Item("DocEntry").Editable = false; oGrid.Columns.Item("Balance Due").Editable = false; oGrid.Columns.Item("Previous Collection Notes").Editable = false; oGrid.CollapseLevel = 1; } } catch (SqlException e) { __app.MessageBox(e.Message, 1, "Ok", "", ""); BubbleEvent = false; } catch (COMException e) { __app.MessageBox(e.Message, 1, "Ok", "", ""); BubbleEvent = false; } catch (Exception e) { __app.MessageBox(e.Message, 1, "Ok", "", ""); BubbleEvent = false; } }
private void Search_AfterAddBtnPressed(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; __Form = __app.Forms.GetForm(pVal.FormTypeEx, pVal.FormTypeCount); oRs = (SAPbobsCOM.Recordset)____bobCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); oGrid = __Form.Items.Item("grid").Specific; //DT.Clear(); //DT = null; string CardCode = __Form.Items.Item("Item_0").Specific.Value; string SqlDoc = ""; if (!string.IsNullOrEmpty(CardCode)) { SqlDoc = "CALL AGING_REPORT ('" + CardCode + "')"; } else { SqlDoc = "CALL AGING_REPORT (NULL)"; } oRs.DoQuery(SqlDoc); if (oRs.RecordCount > 0) { if (DT == null) { DT = __Form.DataSources.DataTables.Add("DT1" + DateTime.Now.Second); } DT.ExecuteQuery(SqlDoc); oGrid.DataTable = DT; oGrid.AutoResizeColumns(); oGrid.Columns.Item("Customer Code").Editable = false; oGrid.Columns.Item("Customer Name").Editable = false; oGrid.Columns.Item("Customer Name").Editable = false; oGrid.Columns.Item("Type").Editable = false; SAPbouiCOM.EditTextColumn Typcol = (SAPbouiCOM.EditTextColumn)oGrid.Columns.Item("DocEntry"); Typcol.LinkedObjectType = "13"; oGrid.Columns.Item("TransType").Visible = false; oGrid.Columns.Item("DocEntry").Editable = false; oGrid.Columns.Item("Document No.").Editable = false; oGrid.Columns.Item("Customer Ref. No.").Editable = false; oGrid.Columns.Item("Posting Date").Editable = false; oGrid.Columns.Item("Due Date").Editable = false; oGrid.Columns.Item("Future").Editable = false; oGrid.Columns.Item("0-30 Days").Editable = false; oGrid.Columns.Item("31-60 Days").Editable = false; oGrid.Columns.Item("61-90 Days").Editable = false; oGrid.Columns.Item("91-120 Days").Editable = false; oGrid.Columns.Item("121+ Days").Editable = false; SAPbouiCOM.EditTextColumn col = (SAPbouiCOM.EditTextColumn)oGrid.Columns.Item("AWDocEntry"); col.LinkedObjectType = "UDOB1CZHDR"; col.Width = 15; oGrid.Columns.Item("DocEntry").Editable = false; oGrid.Columns.Item("Balance Due").Editable = false; oGrid.Columns.Item("Previous Collection Notes").Editable = false; oGrid.CollapseLevel = 1; } }
void __app_MenuEvent(ref SAPbouiCOM.MenuEvent pVal, out bool BubbleEvent) { BubbleEvent = true; #region "Main Menu" if (pVal.BeforeAction == false) { if (pVal.MenuUID == "MDC_MNU_GRP") { XmlDocument oXMLDoc = new XmlDocument(); string MenuPath = Application.StartupPath + "\\SrfFiles\\AGR.srf"; oXMLDoc.Load(MenuPath); __app.LoadBatchActions(oXMLDoc.InnerXml); string UName = __app.Company.UserName.ToString(); oRs1 = (SAPbobsCOM.Recordset)____bobCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); oRs2 = (SAPbobsCOM.Recordset)____bobCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); oRs3 = (SAPbobsCOM.Recordset)____bobCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); try { Manual = false; __Form = __app.Forms.GetForm("AGR", 0); oGrid = __Form.Items.Item("grid").Specific; __Form = __app.Forms.ActiveForm; __Form.EnableMenu("4870", true); __Form.Mode = SAPbouiCOM.BoFormMode.fm_ADD_MODE; __Form.State = SAPbouiCOM.BoFormStateEnum.fs_Maximized; string SqlDoc = ""; SqlDoc = "CALL AGING_REPORT (NULL)"; oRs2.DoQuery(SqlDoc); DT = null; if (oRs2.RecordCount > 0) { if (DT == null) { DT = __Form.DataSources.DataTables.Add("DT1" + DateTime.Now.Second); } DT.ExecuteQuery(SqlDoc); oGrid.DataTable = DT; oGrid.AutoResizeColumns(); oGrid.Columns.Item("Customer Code").Editable = false; oGrid.Columns.Item("Customer Name").Editable = false; oGrid.Columns.Item("Customer Name").Editable = false; oGrid.Columns.Item("Type").Editable = false; SAPbouiCOM.EditTextColumn Typcol = (SAPbouiCOM.EditTextColumn)oGrid.Columns.Item("DocEntry"); Typcol.LinkedObjectType = "13"; oGrid.Columns.Item("TransType").Visible = false; oGrid.Columns.Item("DocEntry").Editable = false; oGrid.Columns.Item("Document No.").Editable = false; oGrid.Columns.Item("Customer Ref. No.").Editable = false; oGrid.Columns.Item("Posting Date").Editable = false; oGrid.Columns.Item("Due Date").Editable = false; oGrid.Columns.Item("Future").Editable = false; oGrid.Columns.Item("0-30 Days").Editable = false; oGrid.Columns.Item("31-60 Days").Editable = false; oGrid.Columns.Item("61-90 Days").Editable = false; oGrid.Columns.Item("91-120 Days").Editable = false; oGrid.Columns.Item("121+ Days").Editable = false; oGrid.Columns.Item("Balance Due").Editable = false; SAPbouiCOM.EditTextColumn col = (SAPbouiCOM.EditTextColumn)oGrid.Columns.Item("AWDocEntry"); col.LinkedObjectType = "UDOB1CZHDR"; col.Width = 15; oGrid.Columns.Item("DocEntry").Editable = false; oGrid.Columns.Item("Previous Collection Notes").Editable = false; oGrid.CollapseLevel = 1; DataColumn column; // Create new DataColumn, set DataType, ColumnName and add to DataTable. column = new DataColumn(); if (Htable.Columns.Contains("DocEntry")) { Htable.Columns.Remove("DocEntry"); } column.DataType = System.Type.GetType("System.Int32"); column.ColumnName = "DocEntry"; Htable.Columns.Add(column); // Create second column. column = new DataColumn(); if (Htable.Columns.Contains("Collection Notes")) { Htable.Columns.Remove("Collection Notes"); } column.DataType = Type.GetType("System.String"); column.ColumnName = "Collection Notes"; Htable.Columns.Add(column); } } catch (Exception e) { MessageBox.Show(e.Message.ToString()); BubbleEvent = false; } } } #endregion //#region "Navigate Menu" //if (pVal.BeforeAction == true) //{ // if (pVal.MenuUID == "1281") // { // //__XForm = __app.Forms.ActiveForm; // //__XForm.Items.Item("Item_1").Enabled = true; // } //} //#endregion }
private void Search() { try { this.CurrentForm.Freeze(true); SBOApp.StatusBar.SetText("正在查找,请稍后...", SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); var date_from = this.CurrentForm.DataSources.UserDataSources.Item(UDS_DATE_FROM).Value; var date_to = this.CurrentForm.DataSources.UserDataSources.Item(UDS_DATE_TO).Value; SAPbouiCOM.Grid grid_list = this.CurrentForm.Items.Item(GRID_LIST).Specific; var sql_get_journal_entry = @"select row_number() over(order by ""TransId"" asc) ""RowIndex"",* from ""AVA_FM_FN_GET_JOURNAL_ENTRY_DATAS""() where 1 = 1 "; if (!string.IsNullOrEmpty(date_from)) { sql_get_journal_entry += string.Format(@" and ""TaxDate"" >= N'{0}' ", date_from); } if (!string.IsNullOrEmpty(date_to)) { sql_get_journal_entry += string.Format(@" and ""TaxDate"" <= N'{0}' ", date_to); } grid_list.DataTable.ExecuteQuery(sql_get_journal_entry); if (grid_list.DataTable.Rows.Count == 1) { var docentry = Convert.ToString( grid_list.DataTable.GetValue("TransId", grid_list.DataTable.Rows.Offset)); if (string.IsNullOrWhiteSpace(docentry) | int.Parse(docentry) <= 0) { grid_list.DataTable.Rows.Remove(grid_list.DataTable.Rows.Offset); } } #region Grid Layout grid_list.Columns.Item("RowIndex").TitleObject.Caption = "#"; SAPbouiCOM.EditTextColumn col_docentry = (SAPbouiCOM.EditTextColumn)grid_list.Columns.Item("TransId"); col_docentry.Type = SAPbouiCOM.BoGridColumnType.gct_EditText; col_docentry.LinkedObjectType = "30"; grid_list.Columns.Item("TransId").TitleObject.Caption = "交易号"; grid_list.Columns.Item("TransType").TitleObject.Caption = "原始单据类型"; grid_list.Columns.Item("BaseRef").TitleObject.Caption = "原始编号"; grid_list.Columns.Item("TaxDate").TitleObject.Caption = "单据日期"; grid_list.Columns.Item("BPLId").TitleObject.Caption = "分支"; grid_list.Columns.Item("BPLName").TitleObject.Caption = "分支名称"; grid_list.Columns.Item("Ref1").TitleObject.Caption = "参考 1"; grid_list.Columns.Item("Ref2").TitleObject.Caption = "参考 2"; grid_list.Columns.Item("Memo").TitleObject.Caption = "备注"; grid_list.Columns.Item("Project").TitleObject.Caption = "项目"; grid_list.Columns.Item("LocTotal").TitleObject.Caption = "交易总计"; grid_list.Columns.Item("VoucherCode").TitleObject.Caption = "凭单编码"; foreach (SAPbouiCOM.GridColumn item in grid_list.Columns) { if (item.UniqueID.Equals("VoucherCode")) { item.Editable = true; continue; } item.Editable = false; } #endregion SBOApp.StatusBar.SetText("查找完成!", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); } catch (Exception ex) { throw ex; } finally { this.CurrentForm.Freeze(false); } }