private void Button0_PressedAfter(object sboObject, SAPbouiCOM.SBOItemEventArg pVal) { //Approve if (Fr_Authorise) { SAPbobsCOM.Recordset oR_RecordSet = (SAPbobsCOM.Recordset)oCom.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); oR_RecordSet.DoQuery("Select * from [@ADDONCFG]"); string uid = oR_RecordSet.Fields.Item("Code").Value.ToString(); string pwd = oR_RecordSet.Fields.Item("Name").Value.ToString(); SqlConnection conn = new SqlConnection(string.Format("Data Source={0}; Initial Catalog={1}; User id={2}; Password={3};", oCom.Server, oCom.CompanyDB, uid, pwd)); SqlCommand cmd = null; try { cmd = new SqlCommand("Update_Blanket_Post_Level", conn); cmd.CommandType = CommandType.StoredProcedure; cmd.Parameters.AddWithValue("@AbsID", AbsID); cmd.Parameters.AddWithValue("@Blanket_Type", Blanket_Type); cmd.Parameters.AddWithValue("@Blanket_Level", LVL_Posting); cmd.Parameters.AddWithValue("@Usr", oCom.UserName); cmd.Parameters.AddWithValue("@Approve", 1); cmd.Parameters.AddWithValue("@Usr_Comment", this.EditText3.Value.Trim()); conn.Open(); int row_count = cmd.ExecuteNonQuery(); if (row_count == 0) { Application.SBO_Application.StatusBar.SetText("Approve Failed !"); } else { //Approve after level 5 if (LVL_Posting == 5) { SAPbobsCOM.CompanyService oCompSer = oCom.GetCompanyService(); SAPbobsCOM.BlanketAgreementsService oBAService = (SAPbobsCOM.BlanketAgreementsService)oCompSer.GetBusinessService(SAPbobsCOM.ServiceTypes.BlanketAgreementsService); SAPbobsCOM.BlanketAgreementParams oParams = (SAPbobsCOM.BlanketAgreementParams)oBAService.GetDataInterface(SAPbobsCOM.BlanketAgreementsServiceDataInterfaces.basBlanketAgreementParams); oParams.AgreementNo = int.Parse(AbsID); SAPbobsCOM.BlanketAgreement oBA = oBAService.GetBlanketAgreement(oParams); oBA.Status = SAPbobsCOM.BlanketAgreementStatusEnum.asApproved; oBAService.UpdateBlanketAgreement(oBA); } } } catch (Exception ex) { Application.SBO_Application.MessageBox("Can't approve - Error: " + ex.Message); } finally { conn.Close(); cmd.Dispose(); if (!Check_Parent_Form_Closed(Parent_Form.UniqueID)) { Parent_Form.Select(); Application.SBO_Application.ActivateMenuItem("1304"); } this.UIAPIRawForm.Close(); } } }
public static void LinkedObjectForm(string FormUniqueID, string ActivateMenuItem, string FindItemUID, string FindItemUIDValue) { try { SAPbouiCOM.Form oForm = null; SAPbouiCOM.IEditText oEditText = null; bool Bool = false; //For frm As Integer = 0 To Application.SBO_Application.Forms.Count - 1 // Dim sCad As String = Application.SBO_Application.Forms.Item(frm).UniqueID // If Application.SBO_Application.Forms.Item(frm). = FormUniqueID Then // 'Application.SBO_Application.Forms.Item(pVal.FormUID) // oForm = Application.SBO_Application.Forms.Item(FormUniqueID) // oForm.Close() // Exit For // End If //Next if (Bool == false) { Application.SBO_Application.ActivateMenuItem(ActivateMenuItem); Application.SBO_Application.Forms.ActiveForm.Freeze(true); oForm = Application.SBO_Application.Forms.ActiveForm; oForm.Select(); oForm.Mode = SAPbouiCOM.BoFormMode.fm_FIND_MODE; oForm.Items.Item(FindItemUID).Enabled = true; oEditText = (SAPbouiCOM.IEditText)oForm.Items.Item(FindItemUID).Specific; oEditText.Value = FindItemUIDValue.Trim(); oForm.Items.Item("1").Click(); oForm.Freeze(false); } } catch (Exception) { Application.SBO_Application.MessageBox(oCompany.GetLastErrorDescription()); } finally { } }
private void OApplication_ItemEvent(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; if (bModal & FormUID != "Modal1") { oForm.Select(); // Select the modal form BubbleEvent = false; } else if (FormUID == "Modal1" & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_CLOSE) & bModal) { bModal = false; } }
private void OnCustomInitialize() { // Ready Matrix to populate data Matrix0.Clear(); Matrix0.Columns.Item("Col_0").Visible = false; Matrix0.Columns.Item("Col_1").Visible = false; // Querying the DB Data source oForm = Application.SBO_Application.Forms.Item(this.UIAPIRawForm.UniqueID); oForm.Select(); LoadDataMatrix(); oForm.EnableMenu("1281", false); oForm.EnableMenu("1282", false); }
public void ChooseFromListOneValue(object sboObject, SAPbouiCOM.SBOItemEventArg pVal) { SAPbouiCOM.EditText uktzedEditText = ((SAPbouiCOM.EditText)sboObject); if (pVal.ActionSuccess) { SAPbouiCOM.SBOChooseFromListEventArg cfl = ((SAPbouiCOM.SBOChooseFromListEventArg)(pVal)); if (cfl.SelectedObjects == null) { return; } else { var iChoose = ((SAPbouiCOM.SBOChooseFromListEventArg)(pVal)); SAPbouiCOM.DataTable dataTable = iChoose.SelectedObjects; if (dataTable == null || dataTable.Rows.Count == 0) { return; } string itemCode = dataTable.GetValue(uktzedEditText.ChooseFromListAlias, 0).ToString(); SAPbouiCOM.Form activeForm = Application.SBO_Application.Forms.ActiveForm; this._Form.Select(); uktzedEditText.Active = true; try { uktzedEditText.String = itemCode; } catch { } activeForm.Select(); } } if (CFLtoEditTextAlias[uktzedEditText.Item.UniqueID] != null) { SetChooseFromList CFLEditText = (SetChooseFromList)CFLtoEditTextAlias[uktzedEditText.Item.UniqueID]; CFLEditText(); } }
/// <summary> /// Metodo LoadFromXml /// Metodo para cargar un Form a partir de un archivo XML /// <remarks>@author RCordova-2017/08/15</remarks> /// </summary> /// <param name="FileName"></param> /// <param name="FormName"></param> private void LoadFromXml(string FileName, string FormName) { System.Xml.XmlDocument oXmlDoc = new System.Xml.XmlDocument(); //string sPath = System.IO.Path.GetDirectoryName(Environment.GetCommandLineArgs()[0]).ToString(); string sPath = PathUtilities.GetCurrent("XmlForms"); oXmlDoc.Load(sPath + "\\" + FileName); SAPbouiCOM.FormCreationParams creationPackage = (SAPbouiCOM.FormCreationParams)Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_FormCreationParams); creationPackage.XmlData = oXmlDoc.InnerXml; if (FormName.Equals("frmInspDet")) { if (!Utils.FormExists(FormName)) { creationPackage.UniqueID = FormName; creationPackage.BorderStyle = SAPbouiCOM.BoFormBorderStyle.fbs_Fixed; creationPackage.Modality = SAPbouiCOM.BoFormModality.fm_Modal; creationPackage.FormType = "frmInspDet"; //creationPackage. mObjModalForm = Application.SBO_Application.Forms.AddEx(creationPackage); mObjModalForm.Title = "Detalles de Inspección"; mObjModalForm.Left = 400; mObjModalForm.Top = 100; mObjModalForm.Mode = SAPbouiCOM.BoFormMode.fm_OK_MODE; mObjModalForm.Visible = true; InitFormXml(); } else { mObjModalForm.Select(); } } }
private void LoadXmlForm(string pStrFrmName) { System.Xml.XmlDocument lObjXmlDoc = new System.Xml.XmlDocument(); string lStrPath = PathUtilities.GetCurrent("ModalForms") + "\\" + pStrFrmName + ".xml"; lObjXmlDoc.Load(lStrPath); SAPbouiCOM.FormCreationParams lObjCreationPackage = (SAPbouiCOM.FormCreationParams)Application.SBO_Application.CreateObject (SAPbouiCOM.BoCreatableObjectType.cot_FormCreationParams); lObjCreationPackage.XmlData = lObjXmlDoc.InnerXml; if (pStrFrmName.Equals(pStrFrmName)) { if (!lObjUtility.FormExists(pStrFrmName)) { lObjCreationPackage.UniqueID = pStrFrmName; lObjCreationPackage.BorderStyle = SAPbouiCOM.BoFormBorderStyle.fbs_Fixed; lObjCreationPackage.Modality = SAPbouiCOM.BoFormModality.fm_Modal; lObjCreationPackage.FormType = pStrFrmName; lObjModalForm = Application.SBO_Application.Forms.AddEx(lObjCreationPackage); lObjModalForm.Title = "Busqueda de rutas"; lObjModalForm.Left = 400; lObjModalForm.Top = 100; lObjModalForm.Mode = SAPbouiCOM.BoFormMode.fm_OK_MODE; lObjModalForm.Visible = true; InitializeXmlForm(); } } else { lObjModalForm.Select(); } }
static void SBO_Application_ItemEvent(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; SAPbouiCOM.Form oForm = null; SAPbouiCOM.EditText oEdit = null; SAPbouiCOM.DataTable oDataTable = null; try { // ------------------------------------------------------------------------------------------------------------------------------------------------ // ESTOS EVENTO MANEJA LA CONDICION MODAL DE LAS PANTALLAS DONDE ReportType = "Modal" // ------------------------------------------------------------------------------------------------------------------------------------------------ if (((pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_VISIBLE) && (pVal.BeforeAction == false))) { try { oForm = Application.SBO_Application.Forms.Item(pVal.FormUID); if ((oForm.ReportType == "Modal")) { NModal.esPantallaModal = true; NModal.IDPantallaModal = pVal.FormUID; } } catch (Exception) { } } if (NModal.esPantallaModal && pVal.FormUID != NModal.IDPantallaModal && NModal.IDPantallaModal.Trim().Length > 0 && (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_ACTIVATE || pVal.EventType == SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED || pVal.EventType == SAPbouiCOM.BoEventTypes.et_MATRIX_LINK_PRESSED || pVal.EventType == SAPbouiCOM.BoEventTypes.et_GOT_FOCUS || pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_RESIZE || pVal.EventType == SAPbouiCOM.BoEventTypes.et_VALIDATE || pVal.EventType == SAPbouiCOM.BoEventTypes.et_CLICK)) { try { // Selecciona la pantalla modal BubbleEvent = false; oForm = Application.SBO_Application.Forms.Item(NModal.IDPantallaModal); oForm.Select(); } catch (Exception) { } } // If the modal from is closed... if (((FormUID == NModal.IDPantallaModal) && ((pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_CLOSE) && NModal.esPantallaModal))) { NModal.esPantallaModal = false; NModal.IDPantallaModal = ""; } // ------------------------------------------------------------------------------------------------------------------------------------------------ //Ordenes de Compra if (pVal.FormTypeEx == "142") { OrdenCompra.OrdenCompra_ItemEvent(FormUID, ref pVal, out BubbleEvent); } //Enviar Solicitud de Compra Interna a Salida de Mercancias (Exportar Lineas y datos del Documento Base) if (pVal.FormTypeEx == "1470000200" && (pVal.EventType == SAPbouiCOM.BoEventTypes.et_COMBO_SELECT) && (pVal.ItemUID == "10000329")) { SolicitudCompra.SolicitudCompra_ItemEvent(FormUID, ref pVal, out BubbleEvent); } int ObjN = Math.Abs(Convert.ToInt32(pVal.FormTypeEx)); //Bloquear o Habilitar Campos de Fechas en la ventanas de UDF en los documentos de Marketing if ((pVal.FormTypeEx.Substring(0, 1) == "-") && (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_LOAD) && pVal.BeforeAction == false) { string[] U_Campos = { "U_MIN_FechaVenta", "U_MIN_FinMontaje", "U_MIN_FinDesarr", "U_MIN_FinProduccion", "U_MIN_IniDespacho", "U_MIN_IniMontaje", "U_MIN_FinMontaje", "U_MIN_FechaMulta" }; try { oForm = Application.SBO_Application.Forms.Item(pVal.FormUID); if (Funciones.ConsultaUsuario == false) { oDataTable = null; try { oDataTable = oForm.DataSources.DataTables.Item("DT_SQL"); } catch { oDataTable = oForm.DataSources.DataTables.Add("DT_SQL"); } Funciones.IdentificarAccesoUsuario(oDataTable); } foreach (string element in U_Campos) { if (Funciones.ItemExists(oForm, element)) { oEdit = (SAPbouiCOM.EditText)oForm.Items.Item(element).Specific; oEdit.Item.Enabled = Funciones.Habilitado; } } } catch (Exception) { // throw; } } } catch (Exception) { } }
static void SBO_Application_ItemEvent(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; try { if ((pVal.FormTypeEx != null) && (pVal.FormTypeEx == "ComisionesVentas.Parametros") && (pVal.EventType == SAPbouiCOM.BoEventTypes.et_CLICK || pVal.EventType == SAPbouiCOM.BoEventTypes.et_RIGHT_CLICK || pVal.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST)) { Parametros.Parametros_ItemEvent(FormUID, ref pVal, oCompany, Application.SBO_Application, out BubbleEvent); } if ((pVal.FormTypeEx != null) && (pVal.FormTypeEx == "ComisionesVentas.Comisiones") && (pVal.EventType == SAPbouiCOM.BoEventTypes.et_MATRIX_LINK_PRESSED || pVal.EventType == SAPbouiCOM.BoEventTypes.et_CLICK || pVal.EventType == SAPbouiCOM.BoEventTypes.et_RIGHT_CLICK || pVal.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST || pVal.EventType == SAPbouiCOM.BoEventTypes.et_VALIDATE)) { Comisiones.Comisiones_ItemEvent(FormUID, ref pVal, oCompany, Application.SBO_Application, out BubbleEvent); } } catch (Exception) { } //'------------------------------------------------------------------------------------------------------------------------------------------------ //' ESTOS EVENTOS MANEJAN LA CONDICION MODAL DE LAS PANTALLAS DONDE ReportType = "Modal" //'------------------------------------------------------------------------------------------------------------------------------------------------ if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_VISIBLE && pVal.BeforeAction == false) { try { oForm = Application.SBO_Application.Forms.Item(pVal.FormUID); if (oForm.ReportType == "Modal") { esPantallaModal = true; IDPantallaModal = pVal.FormUID; } } catch (Exception) { } } if (esPantallaModal && FormUID != IDPantallaModal && IDPantallaModal.Trim().Length > 0 && (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_ACTIVATE || pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_DEACTIVATE || pVal.EventType == SAPbouiCOM.BoEventTypes.et_CLICK)) { oForm = Application.SBO_Application.Forms.Item(IDPantallaModal); oForm.Select(); // Selecciona la pantalla modal BubbleEvent = false; } //' If the modal from is closed... if (FormUID == IDPantallaModal && pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_CLOSE && esPantallaModal) { esPantallaModal = false; IDPantallaModal = ""; } //'------------------------------------------------------------------------------------------------------------------------------------------------ //if (pVal.FormTypeEx == "139" && pVal.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST && pVal.BeforeAction == false) //{ // SAPbouiCOM.IChooseFromListEvent oCFLEvento = (SAPbouiCOM.IChooseFromListEvent)pVal; // string sCFL_ID = oCFLEvento.ChooseFromListUID; // oForm = Application.SBO_Application.Forms.Item(pVal.FormUID); // SAPbouiCOM.ChooseFromList oCFL = (SAPbouiCOM.ChooseFromList)oForm.ChooseFromLists.Item(sCFL_ID); // SAPbouiCOM.DataTable oDataTable = oCFLEvento.SelectedObjects; // string val = ""; // try // { // val = oDataTable.GetValue(0, 0).ToString(); // oForm.DataSources.UserDataSources.Item("UDS_CFLPRO").ValueEx = val; // } // catch (Exception) // { // } // //string XX= ((SAPbouiCOM.IChooseFromListEvent)pVal).ChooseFromListUID; //} }