/// <summary> /// Initialize components. Called by framework after form created. /// </summary> public override void OnInitializeComponent() { this.fileSelector = ((SAPbouiCOM.Button)(this.GetItem("btArq").Specific)); this.fileSelector.ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.FileButton_ClickBefore); this.modulePath = ((SAPbouiCOM.EditText)(this.GetItem("edArquivo").Specific)); this.installUpdateModule = ((SAPbouiCOM.Button)(this.GetItem("btInst").Specific)); this.installUpdateModule.ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.InstallUpdateModule_ClickBefore); this.moduleGrid = ((SAPbouiCOM.Grid)(this.GetItem("gridArq").Specific)); this.removeButton = ((SAPbouiCOM.Button)(this.GetItem("btModu").Specific)); this.removeButton.ClickAfter += new SAPbouiCOM._IButtonEvents_ClickAfterEventHandler(this.RemoveButtom_ClickAfter); this.startButton = ((SAPbouiCOM.Button)(this.GetItem("btStart").Specific)); this.startButton.ClickAfter += new _IButtonEvents_ClickAfterEventHandler(startButton_ClickAfter); this.shutdownButton = ((SAPbouiCOM.Button)(this.GetItem("btStop").Specific)); this.shutdownButton.ClickAfter += new _IButtonEvents_ClickAfterEventHandler(shutdownButton_ClickAfter); this.installButton = ((SAPbouiCOM.Button)(this.GetItem("btInstall").Specific)); this.installButton.ClickAfter += new _IButtonEvents_ClickAfterEventHandler(installButton_ClickAfter); this.configTemp = this.UIAPIRawForm.DataSources.DataTables.Item("configTemp"); this.moduleGrid.ClickAfter += new _IGridEvents_ClickAfterEventHandler(moduleGrid_ClickAfter); ((ComboBoxColumn)moduleGrid.Columns.Item("Installed")).ValidValues.Add("Y", Messages.Yes); ((ComboBoxColumn)moduleGrid.Columns.Item("Installed")).ValidValues.Add("N", Messages.No); ((ComboBoxColumn)moduleGrid.Columns.Item("Installed")).DisplayType = BoComboDisplayType.cdt_Description; ((ComboBoxColumn)moduleGrid.Columns.Item("Status")).ValidValues.Add("R", Messages.AdminRunning); ((ComboBoxColumn)moduleGrid.Columns.Item("Status")).ValidValues.Add("S", Messages.AdminStopped); ((ComboBoxColumn)moduleGrid.Columns.Item("Status")).DisplayType = BoComboDisplayType.cdt_Description; moduleDT = moduleGrid.DataTable; // click on first tab. this.UIAPIRawForm.DataSources.UserDataSources.Item("Folders").Value = "1"; }
}//fin InitForm public new void FormEvent(String FormUID, ref SAPbouiCOM.ItemEvent pVal, ref Boolean BubbleEvent) { Int32 nErr; String sErr; base.FormEvent(FormUID, ref pVal, ref BubbleEvent); IvkFormInterface oFormB; String oUid; try { if ((pVal.EventType == BoEventTypes.et_ITEM_PRESSED) && (!pVal.BeforeAction)) { if (pVal.ItemUID == "btn1") { oFormB = (IvkFormInterface)(new TLibros()); TLibros.TipoLibro = "C"; oEditText = (EditText)(oForm.Items.Item("Desde").Specific); TLibros.Desde = oEditText.Value; oEditText = (EditText)(oForm.Items.Item("Hasta").Specific); TLibros.Hasta = oEditText.Value; oUid = FSBOf.generateFormId(FGlobalSettings.SBOSpaceName, FGlobalSettings); oFormB.InitForm(oUid, "forms\\", ref FSBOApp, ref FCmpny, ref FSBOf, ref FGlobalSettings); FoForms.Add(oFormB); } } } catch (Exception e) { FCmpny.GetLastError(out nErr, out sErr); FSBOApp.StatusBar.SetText("FormEvent: " + e.Message + " ** Trace: " + e.StackTrace, BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error); OutLog("FormEvent: " + e.Message + " ** Trace: " + e.StackTrace); } }//fin FormEvent
/// <summary> /// Inicializa los componentes de la forma activa /// </summary> public void inicializarComponentes() { try { _oForma = _Application.Forms.Item(formID); _oForma.Mode = SAPbouiCOM.BoFormMode.fm_OK_MODE; _oForma.Freeze(true); //Tipo de dato fecha inicial _oForma.DataSources.UserDataSources.Add(TXT_FECHA_INICIAL, BoDataType.dt_DATE); _oTxtFechaInicial = (SAPbouiCOM.EditText)_oForma.Items.Item(TXT_FECHA_INICIAL).Specific; _oTxtFechaInicial.DataBind.SetBound(true, "", TXT_FECHA_INICIAL); //Tipo de dato fecha final _oForma.DataSources.UserDataSources.Add(TXT_FECHA_FINAL, BoDataType.dt_DATE); _oTxtFechaFinal = (SAPbouiCOM.EditText)_oForma.Items.Item(TXT_FECHA_FINAL).Specific; _oTxtFechaFinal.DataBind.SetBound(true, "", TXT_FECHA_FINAL); _oCmbOficinaVentas = (SAPbouiCOM.ComboBox)_oForma.Items.Item(CMB_OFICINA_VENTAS).Specific; _oCmbOficinaVentas.LlenarCargarOficinas(_Company, _oForma); } catch (Exception ex) { _Application.MessageBox("Error al inicializar: " + ex.Message); } finally { _oForma.Freeze(false); } }
private void InitiallizeForm() { Program.objHrmsUI.loadSettings(); oForm.Freeze(true); dtHead = oForm.DataSources.DataTables.Item("dtHead"); dtSetting = oForm.DataSources.DataTables.Item("dtSetting"); dtSetting.Rows.Add(1); mtAddon = (SAPbouiCOM.Matrix)oForm.Items.Item("mtAddon").Specific; txDfltExp = (SAPbouiCOM.EditText)oForm.Items.Item("txDfltExp").Specific; txUID = (SAPbouiCOM.EditText)oForm.Items.Item("txUID").Specific; txPWD = (SAPbouiCOM.EditText)oForm.Items.Item("txPWD").Specific; txINCCode = (SAPbouiCOM.EditText)oForm.Items.Item("txINCCode").Specific; txLTDCode = (SAPbouiCOM.EditText)oForm.Items.Item("txLTDCode").Specific; txINCDB = (SAPbouiCOM.EditText)oForm.Items.Item("txINCDB").Specific; txLTDDB = (SAPbouiCOM.EditText)oForm.Items.Item("txLTDDB").Specific; txTax = (SAPbouiCOM.EditText)oForm.Items.Item("txTax").Specific; cflDE = oForm.ChooseFromLists.Item("cflDE"); fillAddons(); fillSettings(); filtertocfl(); oForm.Freeze(false); }
public override void etAfterClick(ref SAPbouiCOM.ItemEvent pVal, ref bool BubbleEvent) { base.etAfterClick(ref pVal, ref BubbleEvent); if (pVal.ItemUID == "1") { } if (pVal.ItemUID == "btPost") { postJe(); } if (pVal.ItemUID == "mtJE") { if (pVal.Row <= mtJE.RowCount && pVal.Row > 0) { SAPbouiCOM.EditText InvNum = mtJE.Columns.Item("#").Cells.Item(pVal.Row).Specific; fillJeDetailHead(InvNum.Value.ToString(), pVal.Row); } } if (pVal.ItemUID == "lnkBG") { oApplication.OpenForm(BoFormObjectEnum.fo_UserDefinedObject, "ABGP", txDN.Value.ToString()); } if (pVal.ItemUID == "optPP" || pVal.ItemUID == "optPC" || pVal.ItemUID == "optC") { fillJeGrid(); fillJeDetailHead("0", 0); } }
private void InitiallizeForm() { oForm.Freeze(true); initiallizing = true; dtDoc = oForm.DataSources.DataTables.Item("dtDoc"); dtRow = oForm.DataSources.DataTables.Item("dtRow"); dtRpt = oForm.DataSources.DataTables.Item("dtRpt"); dtHead = oForm.DataSources.DataTables.Item("dtHead"); dtSB = oForm.DataSources.DataTables.Item("dtSB"); dtHead.Rows.Add(1); mtDocs = (SAPbouiCOM.Matrix)oForm.Items.Item("mtDocs").Specific; mtDocRows = (SAPbouiCOM.Matrix)oForm.Items.Item("mtDocRows").Specific; mtRpt = (SAPbouiCOM.Matrix)oForm.Items.Item("mtRpt").Specific; mtSB = (SAPbouiCOM.Matrix)oForm.Items.Item("mtSB").Specific; btAtt = (SAPbouiCOM.Button)oForm.Items.Item("btAtt").Specific; txAtt = (SAPbouiCOM.EditText)oForm.Items.Item("txAtt").Specific; txAtt.Item.Enabled = false; getUserWHSAndOT(); // oForm.Items.Item("btUpd").Enabled = false; oForm.Freeze(false); getDocs(); initiallizing = false; }
private void InitiallizeForm() { Program.objHrmsUI.loadSettings(); oForm.Freeze(true); initiallizing = true; mtWO = (SAPbouiCOM.Matrix)oForm.Items.Item("mtWO").Specific; mtOD = (SAPbouiCOM.Matrix)oForm.Items.Item("mtOD").Specific; lblStatus = (SAPbouiCOM.StaticText)oForm.Items.Item("lblStatus").Specific; dtRDR1 = oForm.DataSources.DataTables.Item("dtRDR1"); dtORDR = oForm.DataSources.DataTables.Item("dtORDR"); dtHead = oForm.DataSources.DataTables.Item("dtHead"); dtCard = oForm.DataSources.DataTables.Item("dtCard"); dtWebO = oForm.DataSources.DataTables.Item("dtWebO"); cbOS = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbOS").Specific; cbOS.ValidValues.Add("01", "All"); cbOS.ValidValues.Add("02", "Not Posted"); cbOS.ValidValues.Add("03", "Posted"); cbOS.Item.DisplayDesc = true; cbOS.Select("01", BoSearchKey.psk_ByValue); txCEmail = (SAPbouiCOM.EditText)oForm.Items.Item("txCEmail").Specific; txCNCode = (SAPbouiCOM.EditText)oForm.Items.Item("txCNCode").Specific; txCNTel = (SAPbouiCOM.EditText)oForm.Items.Item("txCNTel").Specific; txCNEmail = (SAPbouiCOM.EditText)oForm.Items.Item("txCNEmail").Specific; txSName = (SAPbouiCOM.EditText)oForm.Items.Item("txSName").Specific; txSSPO = (SAPbouiCOM.EditText)oForm.Items.Item("txSSPO").Specific; txSCity = (SAPbouiCOM.EditText)oForm.Items.Item("txSCity").Specific; txSState = (SAPbouiCOM.EditText)oForm.Items.Item("txSState").Specific; txSZip = (SAPbouiCOM.EditText)oForm.Items.Item("txSZip").Specific; txSPhone = (SAPbouiCOM.EditText)oForm.Items.Item("txSPhone").Specific; txSEmail = (SAPbouiCOM.EditText)oForm.Items.Item("txSEmail").Specific; txFrom = (SAPbouiCOM.EditText)oForm.Items.Item("txFrom").Specific; txTo = (SAPbouiCOM.EditText)oForm.Items.Item("txTo").Specific; txCTel = (SAPbouiCOM.EditText)oForm.Items.Item("txCTel").Specific; txCCode = (SAPbouiCOM.EditText)oForm.Items.Item("txCCode").Specific; cbOS = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbOS").Specific; btPost = (SAPbouiCOM.Button)oForm.Items.Item("btPost").Specific; btGet = (SAPbouiCOM.Button)oForm.Items.Item("btGet").Specific; // ini_controls(); dtHead.Rows.Add(1); string INCCard = Program.objHrmsUI.getSetting("LTDCODE").ToString(); dtHead.SetValue("CardCode", 0, INCCard); oForm.PaneLevel = 1; oForm.Freeze(false); initiallizing = false; }
/// <summary> /// Valida que los planes que cancelados tengan la inversión inicial en ceros /// </summary> /// <param name="_oForm">Forma activa</param> /// <returns>Mensaje de error</returns> private string ValidarStatusSolicitudGrid(Form _oForm) { try { string msgError = null; _oMatrixArticulos = _oForm.Items.Item(GRID_ARTICULOS).Specific; SAPbouiCOM.ComboBox _oCmbStatusSolicitud = null; SAPbouiCOM.EditText _oInversionIni = null; SAPbouiCOM.EditText _oSolicitud = null; for (int noLinea = 1; noLinea <= _oMatrixArticulos.RowCount; noLinea++) { _oCmbStatusSolicitud = (SAPbouiCOM.ComboBox)_oMatrixArticulos.Columns.Item(COLUMNA_STATUS_DE_SOLICITUD).Cells.Item(noLinea).Specific; _oInversionIni = (SAPbouiCOM.EditText)_oMatrixArticulos.Columns.Item(COLUMNA_IVERSION_INICIAL).Cells.Item(noLinea).Specific; _oSolicitud = (SAPbouiCOM.EditText)_oMatrixArticulos.Columns.Item(COLUMNA_SERIE).Cells.Item(noLinea).Specific; if (_oCmbStatusSolicitud.Selected.Value.Contains('N')) { if (Convert.ToDouble(_oInversionIni.Value) != 0) { return(msgError = "Monto de la inversión inicial debe estar en ceros " + Environment.NewLine + "Solicitud: " + _oSolicitud.Value.ToString() + Environment.NewLine + " Estatus: ERRONEO"); } } if (_oCmbStatusSolicitud.Selected.Value.Contains('C')) { if (Convert.ToDouble(_oInversionIni.Value) != 0) { return(msgError = "Monto de la inversión inicial deber estar en ceros " + Environment.NewLine + "Solicitud: " + _oSolicitud.Value.ToString() + Environment.NewLine + " Estatus: CANCELADO"); } } if (_oCmbStatusSolicitud.Selected.Value.Contains('A')) { if (Convert.ToDouble(_oInversionIni.Value) != 0) { return(msgError = "Monto de la inversión inicial deber estar en ceros " + Environment.NewLine + "Solicitud: " + _oSolicitud.Value.ToString() + Environment.NewLine + " Estatus: ATRACO"); } } if (_oCmbStatusSolicitud.Selected.Value.Contains('E')) { if (Convert.ToDouble(_oInversionIni.Value) != 0) { return(msgError = "Monto de la inversión inicial deber estar en ceros " + Environment.NewLine + "Solicitud: " + _oSolicitud.Value.ToString() + Environment.NewLine + " Estatus: EXTRAVIO"); } } } return(msgError); } catch (Exception ex) { throw new Exception("Error al validar estatus de solicitudes del grid *ValidarStatusSolicitudGrid* : " + ex.Message); } }
/// <summary> /// Ejecución de eventos de la forma activa /// </summary> /// <param name="FormUID">Nombre o ID de la forma</param> /// <param name="pVal">Propiedades de la forma</param> /// <param name="bubbleEvent">Evento</param> public override void eventos(string FormUID, ref ItemEvent pVal, out bool bubbleEvent) { bubbleEvent = true; try { if (pVal.FormUID == formID && pVal.BeforeAction == false) { if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_CLOSE) { _Application.ItemEvent -= new SAPbouiCOM._IApplicationEvents_ItemEventEventHandler(SBO_Application_ItemEvent); _Application.MenuEvent -= new SAPbouiCOM._IApplicationEvents_MenuEventEventHandler(SBO_Application_MenuEvent); Dispose(); application = null; company = null; _oRptCorteSolicitudes = false; Addon.typeList.RemoveAll(p => p._forma == formID); return; } if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED) { if (pVal.ItemUID == BTN_CANCELAR) { _oForma.Close(); } if (pVal.ItemUID == BTN_IMPRIMIR) { _oTxtFechaInicial = _oForma.Items.Item(TXT_FECHA_INICIAL).Specific; _oTxtFechaFinal = _oForma.Items.Item(TXT_FECHA_FINAL).Specific; _oCmbOficinaVentas = _oForma.Items.Item(CMB_OFICINA_VENTAS).Specific; //_oTxtUsuario = _oForma.Items.Item(TXT_USUARIO).Specific; if (ValidarCampos()) { if (Extensor.ValidarImpresionCorteSolicitudes(_Company, _oCmbOficinaVentas.Selected.Value.ToString())) { if (_Application.MessageBox("¿Desea generar el corte de solicitudes?", 2, "Si", "No") == 1) { if (ImprimirReporteCorteSolicitudes()) { _Application.StatusBar.SetText("Generar reporte terminado correctamente...", BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Success); } } } else { _Application.MessageBox("El reporte ya fue impreso"); } } } } } } catch (Exception ex) { throw new Exception("Error en evento *clsReporteOficinasContratos* : " + ex.Message); } }
public string postDocument(double amount) { string outStr = ""; try { SAPbobsCOM.Documents Doc = (SAPbobsCOM.Documents)Program.objHrmsUI.oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oPurchaseInvoices); SAPbobsCOM.BusinessPartners bp = (SAPbobsCOM.BusinessPartners)Program.objHrmsUI.oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oBusinessPartners); SAPbouiCOM.EditText OWORDocNum = (SAPbouiCOM.EditText)oForm.Items.Item("18").Specific; string oworNum = OWORDocNum.Value.ToString(); oworEntry = Convert.ToString(Program.objHrmsUI.getScallerValue("Select DocEntry from owor where docnum='" + oworNum + "'")); Doc.CardCode = txSupplier.Value.ToString(); Doc.DocDate = DateTime.ParseExact(txPostingDate.Value.ToString(), "yyyyMMdd", System.Globalization.CultureInfo.InvariantCulture); // Doc.DocDueDate = Convert.ToDateTime(dtORDR.GetValue("CCDate", 0)); Doc.NumAtCard = txRef.Value.ToString(); Doc.DocType = BoDocumentTypes.dDocument_Service; Doc.Lines.AccountCode = txEA.Value.ToString(); Doc.Lines.LineTotal = amount; Doc.Lines.Add(); try { if (Doc.Add() != 0) { int erroCode = 0; string errDescr = ""; Program.objHrmsUI.oCompany.GetLastError(out erroCode, out errDescr); outStr = "Error:" + errDescr + outStr; oApplication.StatusBar.SetText("Failed to post Order : " + errDescr); } else { outStr = Convert.ToString(Program.objHrmsUI.oCompany.GetNewObjectKey()); string strUpdate = "Update OWOR set U_CostAP = '" + outStr + "' WHERE DocEntry = '" + oworEntry + "'"; Program.objHrmsUI.ExecQuery(strUpdate, "Marking AP"); oApplication.StatusBar.SetText("Sales AP Posted Successfully for ", BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Success); oApplication.Menus.Item("1304").Activate(); } } catch (Exception ex) { oApplication.StatusBar.SetText("Failed in Exec Query on Posting Document. : " + ex.Message); } finally { } } catch (Exception ex) { oApplication.SetStatusBarMessage("Error in posting document : " + ex.Message); } return(outStr); }
/// <summary> /// Evento que se ejecuta cuando se encuentra un mensaje de status /// </summary> /// <param name="Text">Texto que se esta mostrando</param> /// <param name="messageType">Tipo de mensaje</param> private void SBO_Application_StatusBarEvent(string Text, BoStatusBarMessageType messageType) { try { if (Text.Contains("No se puede añadir fila") && messageType == BoStatusBarMessageType.smt_Warning) { if (_Application.Forms.ActiveForm.TypeEx == FRM_TRANSFERENCIA_DE_STOCK.ToString()) { if (_oForm.Mode == BoFormMode.fm_ADD_MODE) { lDatos.Clear(); _oMatrixArticulos = _oForm.Items.Item(GRID_ARTICULOS).Specific; int x = 1; for (int noLinea = 1; noLinea < _oMatrixArticulos.RowCount; noLinea++) { oItemCode = (SAPbouiCOM.EditText)_oMatrixArticulos.Columns.Item(COLUMNA_CLAVE_ARTICULO).Cells.Item(noLinea).Specific; if (oItemCode.Value.Substring(0, 2).ToString() == "PL") { oSerieInicio = (SAPbouiCOM.EditText)_oMatrixArticulos.Columns.Item(COLUMNA_SERIE_INICIO).Cells.Item(noLinea).Specific; oSerieFin = (SAPbouiCOM.EditText)_oMatrixArticulos.Columns.Item(COLUMNA_SERIE_FIN).Cells.Item(noLinea).Specific; oSerie = (SAPbouiCOM.EditText)_oMatrixArticulos.Columns.Item(COLUMNA_SERIE).Cells.Item(noLinea).Specific; if (!string.IsNullOrEmpty(oSerieInicio.Value.ToString()) && !string.IsNullOrEmpty(oSerieFin.Value.ToString())) { itemDatos = new Datos(); itemDatos.itemCode = oItemCode.Value.ToString(); itemDatos.serieInial = oSerieInicio.Value.ToString(); itemDatos.serieFinal = oSerieFin.Value.ToString(); itemDatos.noLinea = x; lDatos.Add(itemDatos); x += 1; } else if (!string.IsNullOrEmpty(oSerie.Value.ToString())) { itemDatos = new Datos(); itemDatos.itemCode = oItemCode.Value.ToString(); itemDatos.serieInial = oSerie.Value.ToString(); itemDatos.serieFinal = oSerie.Value.ToString(); itemDatos.noLinea = x; lDatos.Add(itemDatos); x += 1; } } } if (lDatos.Count != 0) { Addon.Instance.Ejecutaclase("25", lDatos); } } } } } catch (Exception ex) { _Application.MessageBox("Error en StatusBarEvent *clsTransferenciaDeStock* : " + ex.Message); } }
private void CriarFormularioComMatrix() { SAPbouiCOM.Button oButton = null; SAPbouiCOM.StaticText oStaticText = null; SAPbouiCOM.EditText oEditText = null; SAPbouiCOM.FormCreationParams oCreationParams = null; oCreationParams = ((SAPbouiCOM.FormCreationParams)(oApplication.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_FormCreationParams))); //oCreationParams.BorderStyle = SAPbouiCOM.BoFormBorderStyle.fbs_Fixed; oCreationParams.UniqueID = "frmMtx"; oCreationParams.FormType = "frmMtx"; oForm = oApplication.Forms.AddEx(oCreationParams); oForm.Title = "Matrix, DataSources and Linked Buttons"; oForm.Left = 336; oForm.ClientWidth = 520; oForm.Top = 44; oForm.ClientHeight = 200; oItem = oForm.Items.Add("1 ", BoFormItemTypes.it_BUTTON); oItem.Left = 5; oItem.Width = 65; oItem.Top = 170; oItem.Height = 19; oButton = ((SAPbouiCOM.Button)(oItem.Specific)); oButton.Caption = "OK"; oItem = oForm.Items.Add("2 ", BoFormItemTypes.it_BUTTON); oItem.Left = 75; oItem.Width = 65; oItem.Top = 170; oItem.Height = 19; oButton = ((SAPbouiCOM.Button)(oItem.Specific)); oButton.Caption = "Cancel"; oItem = oForm.Items.Add("txtPhone", SAPbouiCOM.BoFormItemTypes.it_EDIT); oItem.Left = 265; oItem.Width = 163; oItem.Top = 172; oItem.Height = 14; oItem = oForm.Items.Add("btnPhone ", BoFormItemTypes.it_BUTTON); oItem.Left = 160; oItem.Width = 100; oItem.Top = 170; oItem.Height = 19; oButton = ((SAPbouiCOM.Button)(oItem.Specific)); oButton.Caption = "Add Phone Prefix"; this.oForm.Visible = true; AddMatrixNoForm(); }
private void InitiallizeForm() { Program.objHrmsUI.loadSettings(); Program.isDemo = Program.objHrmsUI.settings["IsDemo"].ToString() == "Y" ? true : false; oForm.Freeze(true); initiallizing = true; lblStatus = (SAPbouiCOM.StaticText)oForm.Items.Item("lblStatus").Specific; dtORDR = oForm.DataSources.DataTables.Item("dtORDR"); dtHead = oForm.DataSources.DataTables.Item("dtHead"); dtCard = oForm.DataSources.DataTables.Item("dtCard"); txWON = (SAPbouiCOM.EditText)oForm.Items.Item("txWON").Specific; txSName = (SAPbouiCOM.EditText)oForm.Items.Item("txSName").Specific; txSSPO = (SAPbouiCOM.EditText)oForm.Items.Item("txSSPO").Specific; txSCity = (SAPbouiCOM.EditText)oForm.Items.Item("txSCity").Specific; txSState = (SAPbouiCOM.EditText)oForm.Items.Item("txSState").Specific; txSZip = (SAPbouiCOM.EditText)oForm.Items.Item("txSZip").Specific; txSPhone = (SAPbouiCOM.EditText)oForm.Items.Item("txSPhone").Specific; txSEmail = (SAPbouiCOM.EditText)oForm.Items.Item("txSEmail").Specific; SCompany = (SAPbouiCOM.EditText)oForm.Items.Item("txSComp").Specific; SAdd2 = (SAPbouiCOM.EditText)oForm.Items.Item("txSAdd2").Specific; SAdd1 = (SAPbouiCOM.EditText)oForm.Items.Item("txSAdd1").Specific; BCompany = (SAPbouiCOM.EditText)oForm.Items.Item("txBComp").Specific; BAdd2 = (SAPbouiCOM.EditText)oForm.Items.Item("txBAdd2").Specific; BAdd1 = (SAPbouiCOM.EditText)oForm.Items.Item("txBAdd1").Specific; txDD = (SAPbouiCOM.EditText)oForm.Items.Item("txDD").Specific; txShipD = (SAPbouiCOM.EditText)oForm.Items.Item("txShipD").Specific; txShipA = (SAPbouiCOM.EditText)oForm.Items.Item("txShipA").Specific; txCustFN = (SAPbouiCOM.EditText)oForm.Items.Item("txCustFN").Specific; txCustLN = (SAPbouiCOM.EditText)oForm.Items.Item("txCustLN").Specific; txCustE = (SAPbouiCOM.EditText)oForm.Items.Item("txCustE").Specific; txCustG = (SAPbouiCOM.EditText)oForm.Items.Item("txCustG").Specific; txCustCG = (SAPbouiCOM.EditText)oForm.Items.Item("txCustCG").Specific; txStore = (SAPbouiCOM.EditText)oForm.Items.Item("txStore").Specific; txCD = (SAPbouiCOM.EditText)oForm.Items.Item("txCD").Specific; txSD = (SAPbouiCOM.EditText)oForm.Items.Item("txSD").Specific; btGet = (SAPbouiCOM.Button)oForm.Items.Item("btGet").Specific; ini_controls(); oForm.Freeze(false); initiallizing = false; }
private void FillSalesOrder() { mSalesOrderForm.Freeze(true); for (int i = 1; i <= mLstSalesOrderLines.Count; i++) { mObjCboPyloadType = (SAPbouiCOM.ComboBox)mObjSOMtx.Columns.Item("U_TR_LoadType").Cells.Item(i).Specific; mObjCboPyloadType.Select(mLstSalesOrderLines[i - 1].PayloadType, SAPbouiCOM.BoSearchKey.psk_ByValue); mObjCboVehicleType = (SAPbouiCOM.ComboBox)mObjSOMtx.Columns.Item("U_TR_VehicleType").Cells.Item(i).Specific; mObjCboVehicleType.Select(mLstSalesOrderLines[i - 1].VehicleType, SAPbouiCOM.BoSearchKey.psk_ByValue); mObjCboRoute = (SAPbouiCOM.ComboBox)mObjSOMtx.Columns.Item("U_TR_Paths").Cells.Item(i).Specific; mObjCboRoute.Select(mLstSalesOrderLines[i - 1].Route, SAPbouiCOM.BoSearchKey.psk_ByValue); mObjTxtTotKm = (SAPbouiCOM.EditText)mObjSOMtx.Columns.Item("U_TR_TotKm").Cells.Item(i).Specific; mObjTxtTotKm.Value = mLstSalesOrderLines[i - 1].TotKm; mObjTxtKmA = (SAPbouiCOM.EditText)mObjSOMtx.Columns.Item("U_TR_TypeA").Cells.Item(i).Specific; mObjTxtKmA.Value = mLstSalesOrderLines[i - 1].KmA; mObjTxtKmB = (SAPbouiCOM.EditText)mObjSOMtx.Columns.Item("U_TR_TypeB").Cells.Item(i).Specific; mObjTxtKmB.Value = mLstSalesOrderLines[i - 1].KmB; mObjTxtKmC = (SAPbouiCOM.EditText)mObjSOMtx.Columns.Item("U_TR_TypeC").Cells.Item(i).Specific; mObjTxtKmC.Value = mLstSalesOrderLines[i - 1].KmC; mObjTxtKmD = (SAPbouiCOM.EditText)mObjSOMtx.Columns.Item("U_TR_TypeD").Cells.Item(i).Specific; mObjTxtKmD.Value = mLstSalesOrderLines[i - 1].KmD; mObjTxtKmE = (SAPbouiCOM.EditText)mObjSOMtx.Columns.Item("U_TR_TypeE").Cells.Item(i).Specific; mObjTxtKmE.Value = mLstSalesOrderLines[i - 1].KmE; mObjTxtKmF = (SAPbouiCOM.EditText)mObjSOMtx.Columns.Item("U_TR_TypeF").Cells.Item(i).Specific; mObjTxtKmF.Value = mLstSalesOrderLines[i - 1].KmF; mObjTxtTotKG = (SAPbouiCOM.EditText)mObjSOMtx.Columns.Item("U_TR_TotKilos").Cells.Item(i).Specific; mObjTxtTotKG.Value = mLstSalesOrderLines[i - 1].TotKg; mObjTxtExtra = (SAPbouiCOM.EditText)mObjSOMtx.Columns.Item("U_TR_AdditionalExpen").Cells.Item(i).Specific; mObjTxtExtra.Value = mLstSalesOrderLines[i - 1].Extra; mObjTxtAnthPyld = (SAPbouiCOM.EditText)mObjSOMtx.Columns.Item("U_TR_OtherLoad").Cells.Item(i).Specific; mObjTxtAnthPyld.Value = mLstSalesOrderLines[i - 1].AnotherPyld; mObjTxtDestination = (SAPbouiCOM.EditText)mObjSOMtx.Columns.Item("U_TR_Destination").Cells.Item(i).Specific; mObjTxtDestination.Value = mLstSalesOrderLines[i - 1].Destination; } mSalesOrderForm.Freeze(false); }
private void addItem() { string itemCode = txItCode.Value.ToString(); int cntExist = Convert.ToInt32(Program.objHrmsUI.getScallerValue("Select count(*) from oitm where ItemCode = '" + itemCode + "'")); if (cntExist == 0) { SAPbobsCOM.Items newRetItem; newRetItem = (SAPbobsCOM.Items)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oItems); newRetItem.ItemCode = itemCode; newRetItem.ItemName = txName.Value.ToString(); newRetItem.ItemsGroupCode = Convert.ToInt16(cbIG.Selected.Value.ToString()); newRetItem.SalesUnitLength = txL.Value != "" ? Convert.ToDouble(txL.Value) : 0.00; newRetItem.SalesUnitWidth = txW.Value != "" ? Convert.ToDouble(txW.Value) : 0.00; newRetItem.SalesUnitHeight = txH.Value != "" ? Convert.ToDouble(txH.Value) : 0.00; newRetItem.UserFields.Fields.Item("U_PARAM1").Value = cbPM1.Value.ToString(); newRetItem.UserFields.Fields.Item("U_PARAM2").Value = cbPM2.Value.ToString(); newRetItem.UserFields.Fields.Item("U_PARAM3").Value = cbPM3.Checked == true ? "Y" : "N"; newRetItem.UserFields.Fields.Item("U_PARAM4").Value = cbPM4.Checked == true ? "Y":"N"; newRetItem.UserFields.Fields.Item("U_PARAM5").Value = cbPM5.Checked == true?"Y":"N"; newRetItem.UserFields.Fields.Item("U_PARAM6").Value = cbPM6.Checked == true ? "Y" : "N"; newRetItem.UserFields.Fields.Item("U_PARAM7").Value = cbPM7.Value.ToString(); newRetItem.UserFields.Fields.Item("U_PARAM8").Value = cbPM8.Checked == true ? "Y" : "N"; int result = newRetItem.Add(); if (result == 0) { oApplication.SetStatusBarMessage("Item " + itemCode + " Added Successfully", BoMessageTime.bmt_Short, false); txName.Value = ""; SAPbouiCOM.EditText newItemCode = (SAPbouiCOM.EditText)mtItems.Columns.Item("1").Cells.Item(mtItems.RowCount).Specific; SAPbouiCOM.Folder general = (SAPbouiCOM.Folder)oForm.Items.Item("112").Specific; general.Select(); oForm.PaneLevel = 1; newItemCode.Value = itemCode; // txName.Active = true; } else { int erroCode = 0; string errDescr = ""; string Errmsg = ""; oCompany.GetLastError(out erroCode, out errDescr); oApplication.SetStatusBarMessage("Item " + itemCode + " Failed to import: " + errDescr, BoMessageTime.bmt_Short, true); } } }
public static SAPbouiCOM.EditText AddEditTextAoFormulario( SAPbouiCOM.Form pForm , string pUID , int pLeft , int pWidth , int pTop , int pHeight , string pLinkTo , bool AffectsFormMode = false , int pFromPane = 0 , int pToPane = 0 ) { Item oItem = pForm.Items.Add(pUID, BoFormItemTypes.it_EDIT); SAPbouiCOM.EditText oEditText = null; if (pLeft > 0) { oItem.Left = pLeft; } if (pWidth > 0) { oItem.Width = pWidth; } if (pTop > 0) { oItem.Top = pTop; } if (pHeight > 0) { oItem.Height = pHeight; } oItem.AffectsFormMode = AffectsFormMode; if (pFromPane > 0) { oItem.FromPane = pFromPane; } if (pToPane > 0) { oItem.ToPane = pToPane; } if (string.IsNullOrEmpty(pLinkTo)) { oItem.LinkTo = pLinkTo; } oItem.LinkTo = pLinkTo; oEditText = ((SAPbouiCOM.EditText)(oItem.Specific)); return(oEditText); }
/// <summary> /// Inicializa los componentes de la forma activa /// </summary> public void inicializarComponentes() { try { _oForma = _Application.Forms.Item(formID); _oForma.Mode = SAPbouiCOM.BoFormMode.fm_OK_MODE; _oForma.Freeze(true); //Código del asociado _oForma.DataSources.UserDataSources.Add(TXT_CODIGO_ASOCIADO, BoDataType.dt_SHORT_TEXT, 10); _oTxtCodigoAsociado = (SAPbouiCOM.EditText)_oForma.Items.Item(TXT_CODIGO_ASOCIADO).Specific; _oTxtCodigoAsociado.DataBind.SetBound(true, "", TXT_CODIGO_ASOCIADO); //Nombre del asociado _oForma.DataSources.UserDataSources.Add(TXT_NOMBRE_ASOCIADO, BoDataType.dt_SHORT_TEXT, 150); _oTxtNombreAsociado = (SAPbouiCOM.EditText)_oForma.Items.Item(TXT_NOMBRE_ASOCIADO).Specific; _oTxtNombreAsociado.DataBind.SetBound(true, "", TXT_NOMBRE_ASOCIADO); //Código de oficina _oForma.DataSources.UserDataSources.Add(TXT_CODIGO_OFICINA, BoDataType.dt_SHORT_TEXT, 10); _oTxtCodigoOficina = (SAPbouiCOM.EditText)_oForma.Items.Item(TXT_CODIGO_OFICINA).Specific; _oTxtCodigoOficina.DataBind.SetBound(true, "", TXT_CODIGO_OFICINA); //Nombre de oficina _oForma.DataSources.UserDataSources.Add(TXT_NOMBRE_OFICINA, BoDataType.dt_SHORT_TEXT, 150); _oTxtNombreOficina = (SAPbouiCOM.EditText)_oForma.Items.Item(TXT_NOMBRE_OFICINA).Specific; _oTxtNombreOficina.DataBind.SetBound(true, "", TXT_NOMBRE_OFICINA); //Código de solicitud _oForma.DataSources.UserDataSources.Add(TXT_CODIGO_SOLICITUD, BoDataType.dt_SHORT_TEXT, 20); _oTxtCodigoSolicitud = (SAPbouiCOM.EditText)_oForma.Items.Item(TXT_CODIGO_SOLICITUD).Specific; _oTxtCodigoSolicitud.DataBind.SetBound(true, "", TXT_CODIGO_SOLICITUD); _oBtnImprimirArqueo = _oForma.Items.Item(BTN_IMPRIMIR_ARQUEO).Specific; _oBtnImprimirArqueo.Item.Visible = false; _oTxtCodigoAsociado.Active = true; //Declarar DataTable _oForma.DataSources.DataTables.Add(DT_ARQUEOS); } catch (Exception ex) { _Application.MessageBox("Error al inicializar : " + ex.Message); } finally { _oForma.Freeze(false); } }
/// <summary> /// Crea el campo de RFC en la ventana de Datos maestros empleado /// </summary> /// <param name="_oForm"></param> private void CrearCampoRFC(Form _oForm) { SAPbouiCOM.Item newItem = null; try { try { string s = _oForm.Items.Item(TXT_RFC).UniqueID; } catch (Exception) { _oForm.Freeze(true); //LABEL RFC SAPbouiCOM.Item _oLblTelOficina = null; _oLblTelOficina = _oForm.Items.Item(LBL_TELEFONO_OFICINA); newItem = _oForm.Items.Add(LBL_RFC, BoFormItemTypes.it_STATIC); newItem.Left = _oLblTelOficina.Left; newItem.Top = _oLblTelOficina.Top - 16; newItem.Width = 50; newItem.ToPane = 0; newItem.FromPane = 0; _oLblRfc = newItem.Specific; _oLblRfc.Caption = "RFC"; //EDITTEXT RFC SAPbouiCOM.Item _oLabelRFC = null; _oLabelRFC = _oForm.Items.Item(LBL_RFC); newItem = _oForm.Items.Add(TXT_RFC, BoFormItemTypes.it_EDIT); newItem.Left = _oLabelRFC.Left + 102; newItem.Top = _oLabelRFC.Top; newItem.Width = 90; newItem.ToPane = 0; newItem.FromPane = 0; _oTxtRfc = (SAPbouiCOM.EditText)newItem.Specific; _oTxtRfc.DataBind.SetBound(true, "OHEM", "U_RFC"); _oLabelRFC.LinkTo = newItem.UniqueID; } } catch (Exception ex) { throw new Exception("Error al crear campos de usuario *CrearCampoRFC* : " + ex.Message); } finally { _oForm.Freeze(false); } }
private void InitiallizeForm() { oForm.Freeze(true); initiallizing = true; dtHead = oForm.DataSources.DataTables.Item("dtHead"); dtList = oForm.DataSources.DataTables.Item("dtList"); dtA = oForm.DataSources.DataTables.Item("dtA"); dtS = oForm.DataSources.DataTables.Item("dtS"); dtAW = oForm.DataSources.DataTables.Item("dtAW"); dtSW = oForm.DataSources.DataTables.Item("dtSW"); mtA = (SAPbouiCOM.Matrix)oForm.Items.Item("mtA").Specific; mtS = (SAPbouiCOM.Matrix)oForm.Items.Item("mtS").Specific; mtAW = (SAPbouiCOM.Matrix)oForm.Items.Item("mtAW").Specific; mtSW = (SAPbouiCOM.Matrix)oForm.Items.Item("mtSW").Specific; mtList = (SAPbouiCOM.Matrix)oForm.Items.Item("mtList").Specific; dtHead.Rows.Add(1); txCode = (SAPbouiCOM.EditText)oForm.Items.Item("txCode").Specific; txName = (SAPbouiCOM.EditText)oForm.Items.Item("txName").Specific; btAdd = (SAPbouiCOM.Button)oForm.Items.Item("btAdd").Specific; btAddA = (SAPbouiCOM.Button)oForm.Items.Item("btAddA").Specific; btDelA = (SAPbouiCOM.Button)oForm.Items.Item("btDelA").Specific; btAddW = (SAPbouiCOM.Button)oForm.Items.Item("btAddW").Specific; btDelW = (SAPbouiCOM.Button)oForm.Items.Item("btDelW").Specific; cbPWHS = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbPWHS").Specific; cflCode = (SAPbouiCOM.ChooseFromList)oForm.ChooseFromLists.Item("cflCode"); // oForm.Items.Item("btUpd").Enabled = false; oForm.Freeze(false); initiallizing = false; getCodes(); }
private void SetFormSettings(Form pFrmActive) { try { mObjSOForm = pFrmActive;//SAPbouiCOM.Framework.Application.SBO_Application.Forms.GetFormByTypeAndCount(pFrmActive.Type, pFrmActive.TypeCount); mIntFormType = pFrmActive.Type; mObjTxtCardCode = (SAPbouiCOM.EditText)mObjSOForm.Items.Item("4").Specific; mObjMtxSO = (SAPbouiCOM.Matrix)mObjSOForm.Items.Item("38").Specific; mObjCboDoc = (SAPbouiCOM.ComboBox)mObjSOForm.Items.Item("81").Specific; } catch (Exception) { //ignore } }
/// <summary> ///Se producen cuando la aplicación realiza las acciones siguientes en formularios conectados a objetos de negocio: ///- Añadir ///- Actualizar ///- Borrar /// </summary> /// <param name="BusinessObjectInfo"> /// Información del objeto aplicado /// </param> /// <param name="BubbleEvent"> /// true/false /// </param> private void SBO_Application_FormEvent(ref BusinessObjectInfo BusinessObjectInfo, out bool BubbleEvent) { BubbleEvent = true; try { if (BusinessObjectInfo.BeforeAction == true && BusinessObjectInfo.FormTypeEx == FRM_ENTRADA_DE_MERCANCIA.ToString()) { if (BusinessObjectInfo.EventType == SAPbouiCOM.BoEventTypes.et_FORM_DATA_ADD && BusinessObjectInfo.Type == OBJETO_ENTRADA_MERCANCIA && BusinessObjectInfo.ActionSuccess == false) { lDatos.Clear(); SAPbouiCOM.Form _oNuevaForm = _Application.Forms.GetForm(BusinessObjectInfo.FormTypeEx, _Application.Forms.ActiveForm.TypeCount); if (BusinessObjectInfo.FormTypeEx == FRM_ENTRADA_DE_MERCANCIA.ToString()) { _oMatrixArticulos = _oNuevaForm.Items.Item(GRID_ARTICULOS).Specific; for (int noLinea = 1; noLinea < _oMatrixArticulos.RowCount; noLinea++) { oItemCode = (SAPbouiCOM.EditText)_oMatrixArticulos.Columns.Item(COLUMNA_CLAVE_ARTICULO).Cells.Item(noLinea).Specific; if (oItemCode.Value.Substring(0, 2).ToString() == "PL") { oSerieInicio = (SAPbouiCOM.EditText)_oMatrixArticulos.Columns.Item(COLUMNA_SERIE_INICIO).Cells.Item(noLinea).Specific; oSerieFin = (SAPbouiCOM.EditText)_oMatrixArticulos.Columns.Item(COLUMNA_SERIE_FIN).Cells.Item(noLinea).Specific; if (!string.IsNullOrEmpty(oSerieInicio.Value.ToString()) && !string.IsNullOrEmpty(oSerieFin.Value.ToString())) { itemDatos = new Datos(); itemDatos.itemCode = oItemCode.Value.ToString(); itemDatos.serieInial = oSerieInicio.Value.ToString(); itemDatos.serieFinal = oSerieFin.Value.ToString(); lDatos.Add(itemDatos); } } } if (lDatos.Count != 0) { Addon.Instance.Ejecutaclase("21", lDatos); } } } } } catch (Exception ex) { _Application.MessageBox("Error en FormEvent *clsEntradaDeMercancia* : " + ex.Message); } }
public override void etAfterClick(ref ItemEvent pVal, ref bool BubbleEvent) { base.etAfterClick(ref pVal, ref BubbleEvent); if (pVal.ItemUID == "fldNI") { oForm.PaneLevel = 101; } if (pVal.ItemUID == "38" && pVal.ColUID == "0" && pVal.Row < mtItems.RowCount) { // mtItems.FlushToDataSource(); string itemCode = ((SAPbouiCOM.EditText)mtItems.Columns.Item("1").Cells.Item(pVal.Row).Specific).Value.ToString(); //Convert.ToString(dbQUT1.GetValue("ItemCode", pVal.Row-1 )); if (itemCode != null && itemCode != "") { string pictureCode = Program.objHrmsUI.getScallerValue("Select U_Picture from oitm where itemcode='" + itemCode + "'").ToString(); if (pictureCode != null) { ItemImage.Picture = oCompany.BitMapPath + "\\" + pictureCode; } } } if (checkboxes.Contains(pVal.ItemUID)) { updateItemDetail(); } if (pVal.ItemUID == btNI.Item.UniqueID) { if (txItCode.Value != "" && txName.Value.ToString() != "") { SAPbouiCOM.EditText cardCode = (SAPbouiCOM.EditText)oForm.Items.Item("4").Specific; if (cardCode.Value != "") { addItem(); } else { oApplication.MessageBox("Please confirm if BP Selected "); } } else { oApplication.MessageBox("Please confirm if BP Selected and required info provided!"); } } }
private void InitiallizeForm() { oForm.Freeze(true); initiallizing = true; dtA = oForm.DataSources.DataTables.Item("dtA"); dtHead = oForm.DataSources.DataTables.Item("dtHead"); dtS = oForm.DataSources.DataTables.Item("dtS"); dtList = oForm.DataSources.DataTables.Item("dtList"); mtA = (SAPbouiCOM.Matrix)oForm.Items.Item("mtA").Specific; mtS = (SAPbouiCOM.Matrix)oForm.Items.Item("mtS").Specific; mtList = (SAPbouiCOM.Matrix)oForm.Items.Item("mtList").Specific; dtHead.Rows.Add(1); txCode = (SAPbouiCOM.EditText)oForm.Items.Item("txCode").Specific; txName = (SAPbouiCOM.EditText)oForm.Items.Item("txName").Specific; btAdd = (SAPbouiCOM.Button)oForm.Items.Item("btAdd").Specific; btAddA = (SAPbouiCOM.Button)oForm.Items.Item("btAddA").Specific; btDelA = (SAPbouiCOM.Button)oForm.Items.Item("btDelA").Specific; opI = (SAPbouiCOM.OptionBtn)oForm.Items.Item("opI").Specific; opG = (SAPbouiCOM.OptionBtn)oForm.Items.Item("opG").Specific; cflCode = (SAPbouiCOM.ChooseFromList)oForm.ChooseFromLists.Item("cflCode"); cflGroup = (SAPbouiCOM.ChooseFromList)oForm.ChooseFromLists.Item("cflGroup"); opG.GroupWith("opI"); opG.Selected = true; // oForm.Items.Item("btUpd").Enabled = false; oForm.Freeze(false); initiallizing = false; getCodes(); }
private void lObjTxt_LostFocusAfter(object sboObject, SBOItemEventArg pVal) { try { SAPbouiCOM.EditText lObjTxt = sboObject as SAPbouiCOM.EditText; if (string.IsNullOrEmpty(lObjTxt.Value)) { lObjTxt.Value = "0"; } SetAmounts(); } catch (Exception ex) { LogService.WriteError("JournalService (CreateAction): " + ex.Message); LogService.WriteError(ex); UIApplication.ShowMessageBox(string.Format("CreateAction: {0}", ex.Message)); } }
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); }
public override void OnInitializeComponent() { this.StaticText0 = ((SAPbouiCOM.StaticText)(this.GetItem("lb_pcode").Specific)); this.EditText0 = ((SAPbouiCOM.EditText)(this.GetItem("txt_pcode").Specific)); this.Button0 = ((SAPbouiCOM.Button)(this.GetItem("bt_info").Specific)); this.Button0.PressedAfter += new SAPbouiCOM._IButtonEvents_PressedAfterEventHandler(this.Button0_PressedAfter); this.StaticText1 = ((SAPbouiCOM.StaticText)(this.GetItem("lb_ptype").Specific)); this.EditText1 = ((SAPbouiCOM.EditText)(this.GetItem("txt_ptype").Specific)); this.StaticText2 = ((SAPbouiCOM.StaticText)(this.GetItem("lb_pname").Specific)); this.EditText2 = ((SAPbouiCOM.EditText)(this.GetItem("txt_pname").Specific)); this.Button1 = ((SAPbouiCOM.Button)(this.GetItem("bt_clone").Specific)); this.Button1.PressedAfter += new SAPbouiCOM._IButtonEvents_PressedAfterEventHandler(this.Button1_PressedAfter); this.StaticText3 = ((SAPbouiCOM.StaticText)(this.GetItem("lb_bpname").Specific)); this.EditText3 = ((SAPbouiCOM.EditText)(this.GetItem("txt_bpname").Specific)); this.StaticText4 = ((SAPbouiCOM.StaticText)(this.GetItem("lb_pgrp").Specific)); this.EditText4 = ((SAPbouiCOM.EditText)(this.GetItem("txt_pgroup").Specific)); this.EditText5 = ((SAPbouiCOM.EditText)(this.GetItem("t_absentry").Specific)); this.OnCustomInitialize(); }
public void SubFormInit(string KeyValue) { this.LoadForm(); oForm = B1Connections.theAppl.Forms.Item(formuid); oForm.Freeze(true); this.Act1_FormInit(); oForm.Freeze(false); oForm.Visible = true; oForm.Mode = BoFormMode.fm_FIND_MODE; oEditText = (SAPbouiCOM.EditText)oForm.Items.Item("edtCODE").Specific; oEditText.Value = KeyValue; SAPbouiCOM.Item oItem = oForm.Items.Item("1"); oItem.Click(); oItem = null; }
public static SAPbouiCOM.EditText AddEditTextAoFormulario( SAPbouiCOM.Form pForm , string pUID , int pLeft , int pWidth , int pTop , int pHeight ) { Item oItem = pForm.Items.Add(pUID, BoFormItemTypes.it_EDIT); SAPbouiCOM.EditText oEditText = null; oItem.Left = pLeft; oItem.Width = pWidth; oItem.Top = pTop; oItem.Height = pHeight; oItem.AffectsFormMode = false; oEditText = ((SAPbouiCOM.EditText)(oItem.Specific)); return(oEditText); }
public new bool InitForm(string uid, string xmlPath, ref Application application, ref SAPbobsCOM.Company company, ref CSBOFunctions SBOFunctions, ref TGlobalVid _GlobalSettings) { //SAPbouiCOM.ComboBox oComboBox; SAPbouiCOM.Column oColumn; bool Result = base.InitForm(uid, xmlPath, ref application, ref company, ref SBOFunctions, ref _GlobalSettings); try { oRecordSet = (SAPbobsCOM.Recordset)(FCmpny.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset)); //Lista := New list<string>; FSBOf.LoadForm(xmlPath, "VID_LibroCompra.srf", uid); //EnableCrystal := true; oForm = FSBOApp.Forms.Item(uid); oForm.Freeze(true); oForm.AutoManaged = false; oForm.SupportedModes = -1; // afm_All oForm.EnableMenu("1281", false); //Actualizar oForm.EnableMenu("1282", false); //Crear oForm.DataSources.UserDataSources.Add("Desde", BoDataType.dt_DATE, 10); oEditText = (EditText)(oForm.Items.Item("Desde").Specific); oEditText.DataBind.SetBound(true, "", "Desde"); oEditText.Value = DateTime.Now.ToString("yyyyMM") + "01"; oForm.DataSources.UserDataSources.Add("Hasta", BoDataType.dt_DATE, 10); oEditText = (EditText)(oForm.Items.Item("Hasta").Specific); oEditText.DataBind.SetBound(true, "", "Hasta"); oEditText.Value = DateTime.Now.ToString("yyyyMMdd"); } catch (Exception e) { OutLog("InitForm: " + e.Message + " ** Trace: " + e.StackTrace); FSBOApp.MessageBox(e.Message + " ** Trace: " + e.StackTrace, 1, "Ok", "", ""); } oForm.Freeze(false); return(Result); }//fin InitForm
/// <summary> /// Obtiene el reporte agregado en SAP /// </summary> private void CargarReporteArqueo() { try { _oRec = null; _oRec = _Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); SAPbouiCOM.Form _formaRpt = null; SAPbouiCOM.EditText asistente = null; _oRec.DoQuery(@"SELECT MenuUID FROM dbo.OCMN WHERE Name = 'Arqueos' AND Type = 'C'"); _Application.ActivateMenuItem(_oRec.Fields.Item("MenuUID").Value); _formaRpt = _Application.Forms.ActiveForm; asistente = _formaRpt.Items.Item("1000003").Specific; asistente.Value = _oTxtCodigoAsociado.Value; _formaRpt.Items.Item(0).Click(); _Application.Menus.Item("520").Activate(); } catch (Exception ex) { throw new Exception("Error al cargar el reporte de Arqueo *CargarReporteArqueo* : " + ex.Message); } finally { try { if (_oRec != null) { System.Runtime.InteropServices.Marshal.ReleaseComObject(_oRec); } } catch (Exception) { } } }
public override void etAfterClick(ref SAPbouiCOM.ItemEvent pVal, ref bool BubbleEvent) { base.etAfterClick(ref pVal, ref BubbleEvent); if (pVal.ItemUID == "1") { } if (pVal.ItemUID == "btPost") { postJe(); } if (pVal.ItemUID == "mtJE") { if (pVal.Row <= mtJE.RowCount && pVal.Row > 0) { SAPbouiCOM.EditText InvNum = mtJE.Columns.Item("cDN").Cells.Item(pVal.Row).Specific; fillJeDetailHead(InvNum.Value.ToString()); } } if (pVal.ItemUID == "lnkBG") { Hashtable hp = new Hashtable(); hp.Add("~p1", txDN.Value.ToString()); string strSelect = Program.objHrmsUI.getQryString("JE_GET_DE", hp); string strEntry = "0"; System.Data.DataTable dtUsr = Program.objHrmsUI.getDataTable(strSelect, "Opening Linked Branch JE"); if (dtUsr != null && dtUsr.Rows.Count > 0) { foreach (DataRow dr in dtUsr.Rows) { strEntry = dr["docentry"].ToString(); } } oApplication.OpenForm(BoFormObjectEnum.fo_UserDefinedObject, "ABGP", strEntry); } }
public virtual void ET_edtRECVID_AFChooseFromList(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtRECVID").Specific)); // ADD YOUR ACTION CODE HERE ... string pItemUID = pVal.ItemUID.ToString(); string colid = "Code"; string cItemUID = ""; SetChooseFromList(pVal, pItemUID, colid, cItemUID); }
public virtual void ET_edtDISACCD_AFValidate(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtDISACCD").Specific)); // ADD YOUR ACTION CODE HERE .... if (pVal.ItemChanged == true) { if (oEditText.Value == "") { oDB_M.SetValue("U_DISACCD", 0, ""); oDB_M.SetValue("U_DISACCT", 0, ""); //oForm.DataSources.UserDataSources.Item("edtDISACCD").Value = ""; //oForm.DataSources.UserDataSources.Item("edtDISACCT").Value = ""; } } }
public virtual bool ET_edtACCTCD_BFValidate(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtACCTCD").Specific)); // ADD YOUR ACTION CODE HERE ... try { if (oEditText.Value == "" && pVal.ItemChanged == true) { oForm.DataSources.UserDataSources.Item("edtACCOUNT").Value = ""; oForm.DataSources.UserDataSources.Item("edtACCTCD").Value = ""; oForm.DataSources.UserDataSources.Item("edtACCTNM").Value = ""; } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText(ex.Message, BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error); } return true; }
private void ClearUnManagedObject() { if ( oEditText != null ) { Marshal.ReleaseComObject(oEditText); } oEditText = null; if ( oButtonCombo != null ) { Marshal.ReleaseComObject(oButtonCombo); } oButtonCombo = null; if ( oButton != null ) { Marshal.ReleaseComObject(oButton); } oButton = null; if ( oMatrix != null ) { Marshal.ReleaseComObject(oMatrix); } oMatrix = null; if ((oForm != null)) { Marshal.ReleaseComObject(oForm); } oForm = null; // ADD YOUR ACTION CODE HERE ... System.GC.Collect(); System.GC.WaitForPendingFinalizers(); }
public virtual bool ET_edtORDERNM_BFValidate(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtORDERNM").Specific)); // ADD YOUR ACTION CODE HERE ... SAPbouiCOM.DBDataSource oKIS_SD0030T_HRD = oForm.DataSources.DBDataSources.Item("@KIS_SD0030T_HRD"); try { if (pVal.ItemChanged) { if (string.IsNullOrEmpty(oEditText.Value)) { oKIS_SD0030T_HRD.SetValue("U_ORDERCD", 0, ""); oKIS_SD0030T_HRD.SetValue("U_ORDERNM", 0, ""); oKIS_SD0030T_HRD.SetValue("U_ORDERRAT", 0, "0"); this.SetMatrixRateColumn("U_ORDERRAT", "0"); } } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oKIS_SD0030T_HRD = null; } return true; }
public virtual void ET_edtBPNM_AFChooseFromList(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtBPNM").Specific)); // ADD YOUR ACTION CODE HERE ... SAPbouiCOM.DataTable oDataTable = null; oDataTable = FN.GetCFLSelectedObjects(pVal); SAPbouiCOM.DBDataSource oKIS_SD0030T_HRD = oForm.DataSources.DBDataSources.Item("@KIS_SD0030T_HRD"); try { if (oDataTable != null) { oKIS_SD0030T_HRD.SetValue("U_BPCD", 0, oDataTable.GetValue("CardCode", 0).ToString()); oKIS_SD0030T_HRD.SetValue("U_BPNM", 0, oDataTable.GetValue("CardName", 0).ToString()); oKIS_SD0030T_HRD.SetValue("U_BPRATE", 0, _BPRATE.ToString()); gl_U_VATCDBP = oDataTable.GetValue("ECVatGroup", 0).ToString(); SetMatrixColumnVATGRP(gl_U_VATCD, gl_U_VATCDBP); this.SetMatrixRateColumn("U_BPRATE", _BPRATE.ToString()); if (oForm.Mode == BoFormMode.fm_OK_MODE) oForm.Mode = BoFormMode.fm_UPDATE_MODE; } else { if (string.IsNullOrEmpty(oEditText.Value) == false) { gl_U_VATCDBP = FN.GetRecordsetValue(string.Format("SELECT ECVatGroup FROM OCRD WHERE CardCode = '{0}'", oEditText.Value)); } else { gl_U_VATCDBP = string.Empty; } } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oKIS_SD0030T_HRD = null; oDataTable = null; } }
public virtual bool ET_edtBNKCD_BFValidate(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtBNKCD").Specific)); // ADD YOUR ACTION CODE HERE ... try { if (pVal.ItemChanged) { oForm.Freeze(true); System.Data.DataTable Dt = null; switch (pVal.ItemUID) { case "edtBNKCD": #region 주거래은행 정보를 가져온다. string U_HBNKCD = oForm.Items.Item("edtBNKCD").Specific.value; System.Text.StringBuilder sb = new System.Text.StringBuilder(); sb.Append(" SELECT A.AbsEntry "); sb.Append(" , A.GLAccount "); sb.Append(" , B.AcctName "); sb.Append(" FROM DSC1 A "); sb.Append(" LEFT JOIN OACT B ON A.GLAccount = B.AcctCode "); sb.AppendFormat(" WHERE A.AbsEntry = {0}", U_HBNKCD); if (U_HBNKCD != "") { Dt = FN.GetRecordsetToDataTable(sb.ToString()); if (Dt.Rows.Count == 1) { oForm.Items.Item("edtBNKACCT").Specific.value = Dt.Rows[0]["GLAccount"].ToString(); oForm.Items.Item("edtBNKATNM").Specific.value = Dt.Rows[0]["AcctName"].ToString(); } else { oForm.Items.Item("edtBNKACCT").Specific.value = ""; oForm.Items.Item("edtBNKATNM").Specific.value = ""; //FN.Trace("주거래은행을 확인해 주세요", BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error); } } else { oForm.Items.Item("edtBNKACCT").Specific.value = ""; oForm.Items.Item("edtBNKATNM").Specific.value = ""; } #endregion break; default: break; } } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); oForm.Freeze(false); } finally { oForm.Freeze(false); } return true; }
public virtual void ET_edtCARDNO_AFValidate(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtCARDNO").Specific)); // ADD YOUR ACTION CODE HERE ... if (pVal.ItemChanged == true) { if (oEditText.Value == "") { oForm.DataSources.UserDataSources.Item("edtCARDNO").Value = ""; oForm.DataSources.UserDataSources.Item("edtCARDNM").Value = ""; } } }
public virtual void ET_edtDATE_AFKeyDown(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtDATE").Specific)); // ADD YOUR ACTION CODE HERE ... if (oForm.Items.Item("edtDATE").Specific.value.Length > 4) { oForm.DataSources.UserDataSources.Item("edtDATE").ValueEx = oForm.Items.Item("edtDATE").Specific.value; oForm.DataSources.UserDataSources.Item("edtDATE").ValueEx = FN.Left(oForm.DataSources.UserDataSources.Item("edtDATE").Value, 4); B1Connections.theAppl.StatusBar.SetText("4자 이상 입력할수없습니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } }
private void ClearUnManagedObject() { if (oDB_M != null) { Marshal.ReleaseComObject(oDB_M); } oDB_M = null; if (oDB_1 != null) { Marshal.ReleaseComObject(oDB_1); } oDB_1 = null; if (oUDS != null) { Marshal.ReleaseComObject(oUDS); } oUDS = null; if (oButton != null) { Marshal.ReleaseComObject(oButton); } oButton = null; if (oMatrix != null) { Marshal.ReleaseComObject(oMatrix); } oMatrix = null; if (oRS != null) { Marshal.ReleaseComObject(oRS); } oRS = null; if (oEditText != null) { Marshal.ReleaseComObject(oEditText); } oEditText = null; if ((pForm != null)) { Marshal.ReleaseComObject(pForm); } pForm = null; if ((oForm != null)) { Marshal.ReleaseComObject(oForm); } oForm = null; // ADD YOUR ACTION CODE HERE ... System.GC.Collect(); System.GC.WaitForPendingFinalizers(); }
public virtual void ET_edtCOAMCD_AFValidate(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtCOAMCD").Specific)); // ADD YOUR ACTION CODE HERE .... if (oEditText.Value == "") { oDB_M.SetValue("U_COAMCD", 0, ""); oDB_M.SetValue("U_COMAMT", 0, ""); oForm.Items.Item("edtCOMAMCD").Enabled = false; oDB_M.SetValue("U_COMAMCD", 0, ""); oDB_M.SetValue("U_COMAMNM", 0, ""); } else oForm.Items.Item("edtCOMAMCD").Enabled = true; }
private void ClearUnManagedObject() { if ( oFolder != null ) { Marshal.ReleaseComObject(oFolder); } oFolder = null; if (oEditText != null) { Marshal.ReleaseComObject(oEditText); } oEditText = null; if (oButton != null) { Marshal.ReleaseComObject(oButton); } oButton = null; if (oComboBox != null) { Marshal.ReleaseComObject(oComboBox); } oComboBox = null; if ((oForm != null)) { Marshal.ReleaseComObject(oForm); } oForm = null; if ((oGrid1 != null)) { Marshal.ReleaseComObject(oGrid1); } oForm = null; if ((oGrid2 != null)) { Marshal.ReleaseComObject(oGrid2); } oForm = null; if ((oGrid3 != null)) { Marshal.ReleaseComObject(oGrid3); } oForm = null; if ((oGrid4 != null)) { Marshal.ReleaseComObject(oGrid4); } oForm = null; if ((oRS != null)) { Marshal.ReleaseComObject(oRS); } oForm = null; // ADD YOUR ACTION CODE HERE ... System.GC.Collect(); System.GC.WaitForPendingFinalizers(); GRIDCODE = ""; }
public virtual void ET_edtEMPNO_OnLostFocus(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtEMPNO").Specific)); // ADD YOUR ACTION CODE HERE ... if (oForm.Items.Item("edtEMPNO").Specific.Value == "") { oForm.Items.Item("edtEMPNM").Specific.Value = ""; } }
public virtual bool ET_edtDATE_BFKeyDown(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtDATE").Specific)); // ADD YOUR ACTION CODE HERE ... if ((pVal.CharPressed != 8) && (pVal.CharPressed != 9) && (pVal.CharPressed != 13)) { if (!((pVal.CharPressed >= 48) && (pVal.CharPressed <= 57))) { B1Connections.theAppl.StatusBar.SetText("숫자만 입력해야합니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); return false; } } return true; }
public virtual void ET_edtPRCCD_AFChooseFromList(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtPRCCD").Specific)); // ADD YOUR ACTION CODE HERE ... SAPbouiCOM.DataTable oDataTable = null; oDataTable = FN.GetCFLSelectedObjects(pVal); try { if (oDataTable != null) { oForm.DataSources.UserDataSources.Item("edtPRCCD").Value = oDataTable.GetValue("PrcCode", 0).ToString(); oForm.DataSources.UserDataSources.Item("edtPRCNM").Value = oDataTable.GetValue("PrcName", 0).ToString(); //oEditText.Value = oDataTable.GetValue("PrcCode", 0).ToString(); //((SAPbouiCOM.EditText)oForm.Items.Item("edtPRCNM").Specific).Value = oDataTable.GetValue("PrcName", 0).ToString(); //SetGridColumn_U_PRCCD(); edtPRCCD_Changed = true; } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oDataTable = null; } }
public virtual void ET_edtORDERNM_AFChooseFromList(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtORDERNM").Specific)); // ADD YOUR ACTION CODE HERE ... SAPbouiCOM.DataTable oDataTable = null; oDataTable = FN.GetCFLSelectedObjects(pVal); SAPbouiCOM.DBDataSource oKIS_SD0030T_HRD = oForm.DataSources.DBDataSources.Item("@KIS_SD0030T_HRD"); try { if (oDataTable != null) { oKIS_SD0030T_HRD.SetValue("U_ORDERCD", 0, oDataTable.GetValue("Code", 0).ToString()); oKIS_SD0030T_HRD.SetValue("U_ORDERNM", 0, oDataTable.GetValue("Name", 0).ToString()); oKIS_SD0030T_HRD.SetValue("U_ORDERRA", 0, _ORDERRATE.ToString()); this.SetMatrixRateColumn("U_ORDERRAT", _ORDERRATE.ToString()); if (oForm.Mode == BoFormMode.fm_OK_MODE) oForm.Mode = BoFormMode.fm_UPDATE_MODE; } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oKIS_SD0030T_HRD = null; oDataTable = null; } }
private void ClearUnManagedObject() { if (oUDS != null) { Marshal.ReleaseComObject(oUDS); } oUDS = null; if (oComboBox != null) { Marshal.ReleaseComObject(oComboBox); } oComboBox = null; if (oEditText != null) { Marshal.ReleaseComObject(oEditText); } oEditText = null; if (oGrid != null) { Marshal.ReleaseComObject(oGrid); } oGrid = null; if (oButton != null) { Marshal.ReleaseComObject(oButton); } oButton = null; if ((oForm != null)) { Marshal.ReleaseComObject(oForm); } oForm = null; // ADD YOUR ACTION CODE HERE ... System.GC.Collect(); System.GC.WaitForPendingFinalizers(); }
public virtual bool ET_edtBPRATE_BFValidate(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtBPRATE").Specific)); // ADD YOUR ACTION CODE HERE ... try { oMatrix = oForm.Items.Item("mtx1").Specific; if (pVal.ItemChanged) { this.SetMatrixRateColumn("U_BPRATE", oEditText.Value); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } return true; }
public virtual void ET_edtCALLPER_AFValidate(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtCALLPER").Specific)); // ADD YOUR ACTION CODE HERE .... if (pVal.ItemChanged == true) { if (oEditText.Value == "") { oDB_M = oForm.DataSources.DBDataSources.Item("@KIS_SO0030M_HRD"); oDB_M.SetValue("U_CALLNM", 0, ""); } } }
public virtual void ET_edtACCTCD_AFChooseFromList(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtACCTCD").Specific)); // ADD YOUR ACTION CODE HERE ... SAPbouiCOM.DataTable oDataTable = null; oDataTable = FN.GetCFLSelectedObjects(pVal); try { if (oDataTable != null) { oForm.DataSources.UserDataSources.Item("edtACCOUNT").Value = oDataTable.GetValue("Account", 0).ToString(); oForm.DataSources.UserDataSources.Item("edtACCTCD").Value = oDataTable.GetValue("GLAccount", 0).ToString(); oForm.DataSources.UserDataSources.Item("edtACCTNM").Value = FN.GetRecordsetValue(string.Format("SELECT AcctName FROM [OACT] WHERE AcctCode = '{0}'", oDataTable.GetValue("GLAccount", 0).ToString())); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oDataTable = null; } }
public virtual bool ET_edtAC09_BFValidate(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtAC09").Specific)); // ADD YOUR ACTION CODE HERE ... try { if (oEditText.Value == "" && pVal.ItemChanged == true) { SAPbouiCOM.StaticText oStatic = (SAPbouiCOM.StaticText)oForm.Items.Item("sttAC09_1").Specific; oStatic.Caption = ""; } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText(ex.Message, BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error); } return true; }
public virtual void ET_edtCENTCD2_AFChooseFromList(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtCENTCD2").Specific)); // ADD YOUR ACTION CODE HERE ... //데이터를 가져오기 위해 데이터테이블 추가 SAPbouiCOM.DataTable oDataTable = FN.GetCFLSelectedObjects(pVal); try { if (oDataTable != null) { oForm.DataSources.UserDataSources.Item("edtCENTCD2").Value = oDataTable.GetValue("Code", 0).ToString(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("ET_edtCENTCD2_AFChooseFromList " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oDataTable = null; } }
private void ClearUnManagedObject() { if (oComboBox != null) { Marshal.ReleaseComObject(oComboBox); } oComboBox = null; if (oGrid != null) { Marshal.ReleaseComObject(oGrid); } oGrid = null; if (oUDS != null) { Marshal.ReleaseComObject(oUDS); } oUDS = null; //if (gDs.Tables[oForm.UniqueID + "_Deliver"] != null) gDs.Tables[oForm.UniqueID + "_Deliver"] = null; //if (gDs.Tables[oForm.UniqueID + "_Call"] != null) gDs.Tables[oForm.UniqueID + "_Call"] = null; if (gDs != null) { if(gDs.Tables.Contains(oForm.UniqueID + "_Deliver")) { gDs.Tables.Remove(oForm.UniqueID + "_Deliver"); } if (gDs.Tables.Contains(oForm.UniqueID + "_Call")) { gDs.Tables.Remove(oForm.UniqueID + "_Call"); } } if (oDB_M != null) { Marshal.ReleaseComObject(oDB_M); } oDB_M = null; if (oMatrix != null) { Marshal.ReleaseComObject(oMatrix); } oMatrix = null; if (oDB1_O != null) { Marshal.ReleaseComObject(oDB1_O); } oDB1_O = null; if (oDB1_Z != null) { Marshal.ReleaseComObject(oDB1_Z); } oDB1_Z = null; if (oDB2_O != null) { Marshal.ReleaseComObject(oDB2_O); } oDB2_O = null; if (oDB2_Z != null) { Marshal.ReleaseComObject(oDB2_Z); } oDB2_Z = null; if (oRS != null) { Marshal.ReleaseComObject(oRS); } oRS = null; if (oEditText != null) { Marshal.ReleaseComObject(oEditText); } oEditText = null; if ((oForm != null)) { Marshal.ReleaseComObject(oForm); } oForm = null; // ADD YOUR ACTION CODE HERE ... System.GC.Collect(); System.GC.WaitForPendingFinalizers(); }
public virtual void ET_edtCALLPER_AFChooseFromList(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtCALLPER").Specific)); // ADD YOUR ACTION CODE HERE ... //데이터를 가져오기 위해 데이터테이블 추가 SAPbouiCOM.DataTable oDataTable = FN.GetCFLSelectedObjects(pVal); try { if (oForm.Mode != BoFormMode.fm_FIND_MODE) { if (oDataTable != null) { oDB_M = oForm.DataSources.DBDataSources.Item("@KIS_SO0030M_HRD"); oDB_M.SetValue("U_CALLPER", 0, oDataTable.GetValue("USER_CODE", 0).ToString()); oDB_M.SetValue("U_CALLNM", 0, oDataTable.GetValue("U_NAME", 0).ToString()); if (oForm.Mode == BoFormMode.fm_OK_MODE) oForm.Mode = BoFormMode.fm_UPDATE_MODE; } } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("ET_edtCALLPER_AFChooseFromList " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oDataTable = null; } }
public virtual bool ET_edtTODELCD_BFChooseFromList(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtTORECDT").Specific)); // ADD YOUR ACTION CODE HERE ... try { string pCol = "edtTODELCD"; string ColName = ((SAPbouiCOM.StaticText)oForm.Items.Item("sttFRDELCD").Specific).Caption; string Col = "U_DELVCD"; string FRCol = oForm.Items.Item("edtFRRDCD").Specific.value; string TOCol = oForm.Items.Item("edtTORDCD").Specific.value; this.LoadSubForm(oForm, "KIS_SO0081F_HRD", pCol, ColName, Col, FRCol, TOCol); return false; } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText(ex.Message, BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error); } return false; }
public virtual void ET_edtADDR2_AFKeyDown(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtADDR2").Specific)); // ADD YOUR ACTION CODE HERE ... if (pVal.CharPressed == 9 && oEditText.Value == "") OpenPopup_Address(oForm, "MST_거리주소", SO.SO_COMMON_HRD.ZipCodeTypes.Road); }
public virtual void ET_edtAC09_AFChooseFromList(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtAC09").Specific)); // ADD YOUR ACTION CODE HERE ... SetChooseFromList_AfterAction(pVal, "AC09"); }
public virtual void ET_edtR_FRDT_AFValidate(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtR_FRDT").Specific)); // ADD YOUR ACTION CODE HERE ... ItemValidate(oForm, pVal.ItemUID); }
public virtual void ET_edtCENT_T_AFChooseFromList(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); oEditText = ((SAPbouiCOM.EditText)(oForm.Items.Item("edtCENT_T").Specific)); // ADD YOUR ACTION CODE HERE ... SetChooseFromListValue(oForm, pVal); }