private void Button1_ClickAfter(object sboObject, SAPbouiCOM.SBOItemEventArg pVal) { try { if (CheckBox0.Checked) { oUDS = oForm.DataSources.UserDataSources.Item("UD_0X"); SAPbouiCOM.Form oFormP = Application.SBO_Application.Forms.Item(oUDS.ValueEx); oForm.Close(); ((SAPbouiCOM.EditText)oFormP.Items.Item("Item_2").Specific).String = "AJUSTE"; ((SAPbouiCOM.EditText)oFormP.Items.Item("Item_10").Specific).String = "AJUSTE"; } else if (Grid0.Rows.SelectedRows.Count > 0) { oUDS = oForm.DataSources.UserDataSources.Item("UD_0X"); string sRut = Convert.ToString(Grid0.DataTable.GetValue(0, Grid0.Rows.SelectedRows.Item(0, SAPbouiCOM.BoOrderType.ot_RowOrder))); string sNombre = Convert.ToString(Grid0.DataTable.GetValue(1, Grid0.Rows.SelectedRows.Item(0, SAPbouiCOM.BoOrderType.ot_RowOrder))); SAPbouiCOM.Form oFormP = Application.SBO_Application.Forms.Item(oUDS.ValueEx); oForm.Close(); ((SAPbouiCOM.EditText)oFormP.Items.Item("Item_2").Specific).String = sRut; ((SAPbouiCOM.EditText)oFormP.Items.Item("Item_10").Specific).String = sNombre; } } catch (Exception) { } }
/// <summary> /// Controla los eventos de items del formularios /// </summary> public static void m_SBO_Appl_ItemEvent(String FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; SAPbouiCOM.Form oForm = null; oForm = Conexion_SBO.m_SBO_Appl.Forms.Item(FormUID); ResultMessage result = new ResultMessage(); try { if (pVal.BeforeAction && pVal.EventType.Equals(SAPbouiCOM.BoEventTypes.et_CLICK) && pVal.ItemUID.Equals("btnCanc")) { ListaFilas.ListFilas.Clear(); oForm.Close(); } if (pVal.BeforeAction && pVal.EventType.Equals(SAPbouiCOM.BoEventTypes.et_CLICK) && pVal.ItemUID.Equals("btnAcep")) { result = ValidarDatos(oForm.Items.Item("Item_0").Specific); if (!result.Success) { BubbleEvent = false; Conexion_SBO.m_SBO_Appl.StatusBar.SetText(result.Mensaje, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); } } if (!pVal.BeforeAction && pVal.EventType.Equals(SAPbouiCOM.BoEventTypes.et_CLICK) && pVal.ItemUID.Equals("btnAcep")) { AsignarDatos(oForm.Items.Item("Item_0").Specific); oForm.Close(); } } catch (Exception ex) { Conexion_SBO.m_SBO_Appl.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } }
/// <summary> /// Interviene los eventos de los item del form. /// </summary> public static void m_SBO_Appl_ItemEvent(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; SAPbouiCOM.Form oForm = Conexion_SBO.m_SBO_Appl.Forms.Item(FormUID); ResultMessage rslt = new ResultMessage(); try { if (pVal.BeforeAction && pVal.EventType.Equals(SAPbouiCOM.BoEventTypes.et_CLICK) && pVal.ItemUID.Equals("bt_chk")) { EjecutarChecking(oForm); } if (pVal.BeforeAction && pVal.EventType.Equals(SAPbouiCOM.BoEventTypes.et_CLICK) && pVal.ItemUID.Equals("bt_SLR")) { //AsignadosHec.ListaAsignacionHec.Clear(); oForm.Close(); } if (pVal.BeforeAction && pVal.EventType.Equals(SAPbouiCOM.BoEventTypes.et_CLICK) && pVal.ItemUID.Equals("bt_ASG")) { rslt = ValidarDatosAsignados(oForm); if (rslt.Success) { //rslt = AsignarDatos(oForm); if (rslt.Success) { oForm.Close(); Conexion_SBO.m_SBO_Appl.StatusBar.SetText(rslt.Mensaje, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); } else { BubbleEvent = false; Conexion_SBO.m_SBO_Appl.StatusBar.SetText(rslt.Mensaje, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); } } else { BubbleEvent = false; Conexion_SBO.m_SBO_Appl.StatusBar.SetText(rslt.Mensaje, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); } } if (pVal.BeforeAction && pVal.EventType.Equals(SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED) && pVal.ItemUID.Equals("matrixVar") && pVal.ColUID.Equals("co_Chk")) { DataBindCuarteles(oForm); } if (pVal.BeforeAction && pVal.EventType.Equals(SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED) && pVal.ItemUID.Equals("matrixCrt") && pVal.ColUID.Equals("co_Chk")) { SetButtonCheckCuarteles(oForm); } } catch (Exception ex) { Msj_Appl.Errores(14, "m_SBO_Appl_ItemEvent() > SEI_FormINGMH.cs " + ex.Message); Conexion_SBO.m_SBO_Appl.StatusBar.SetText("m_SBO_Appl_ItemEvent() > SEI_FormINGMH.cs " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } }
public static void m_SBO_Appl_ItemEvent(String FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; SAPbouiCOM.Form oForm = null; try { if (!pVal.BeforeAction) { switch (pVal.EventType) { case SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST: oForm = Conexion_SBO.m_SBO_Appl.Forms.Item(FormUID); GestionarSeleccionCFL(oForm, pVal); break; case SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED: oForm = Conexion_SBO.m_SBO_Appl.Forms.Item(FormUID); if (pVal.ItemUID.Equals("Item_15")) { Descripcion = oForm.Items.Item("Item_1").Specific.Value.ToString(); Cuenta = oForm.Items.Item("Item_3").Specific.Value.ToString(); Dim1 = oForm.Items.Item("Item_6").Specific.Value.ToString(); Dim2 = oForm.Items.Item("Item_8").Specific.Value.ToString(); Dim3 = oForm.Items.Item("Item_10").Specific.Value.ToString(); Dim4 = oForm.Items.Item("Item_12").Specific.Value.ToString(); Dim5 = oForm.Items.Item("Item_14").Specific.Value.ToString(); IntegracionServicio(); oForm.Close(); } if (pVal.ItemUID.Equals("Item_16")) { oForm.Close(); } break; default: break; } } } catch (Exception ex) { Conexion_SBO.m_SBO_Appl.StatusBar.SetText("Error: " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Long, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { FuncionesComunes.LiberarObjetoGenerico(oForm); } }
private void Button0_ClickBefore(object sboObject, SAPbouiCOM.SBOItemEventArg pVal, out bool BubbleEvent) { BubbleEvent = true; oUserTable = oCompany.UserTables.Item("SECCIONESCOL"); oUserTable.Code = EditText0.Value.ToString(); oUserTable.Name = EditText0.Value.ToString(); oUserTable.UserFields.Fields.Item("U_CodigoSEC").Value = EditText0.Value.ToString(); oUserTable.UserFields.Fields.Item("U_NombreSEC").Value = EditText1.Value.ToString(); oUserTable.UserFields.Fields.Item("U_SupraSeccionSEC").Value = EditText3.Value.ToString(); oUserTable.UserFields.Fields.Item("U_PrecioSEC").Value = EditText2.Value.ToString(); oUserTable.UserFields.Fields.Item("U_ProyectoSEC").Value = ""; //oUserTable.Add(); int i = oUserTable.Add(); if (i != 0) { oApp.SetStatusBarMessage("Error" + oCompany.GetLastErrorDescription(), SAPbouiCOM.BoMessageTime.bmt_Medium, false); } else { oApp.SetStatusBarMessage("Exito en la inserción", SAPbouiCOM.BoMessageTime.bmt_Medium, false); oForm = oApp.Forms.Item("creasecc"); oForm.Close(); } }
private void Button2_ClickBefore(object sboObject, SAPbouiCOM.SBOItemEventArg pVal, out bool BubbleEvent) { BubbleEvent = true; //oApp = (SAPbouiCOM.Application)Application.SBO_Application; //oCompany = (SAPbobsCOM.Company)oApp.Company.GetDICompany(); oUserTable = oCompany.UserTables.Item("EDICIONESCOL"); oUserTable.Code = EditText4.Value.ToString(); oUserTable.Name = EditText4.Value.ToString(); oUserTable.UserFields.Fields.Item("U_CodigoEDC").Value = EditText4.Value.ToString(); oUserTable.UserFields.Fields.Item("U_NombreEDC").Value = EditText7.Value.ToString(); oUserTable.UserFields.Fields.Item("U_ProyectoEDC").Value = EditText5.Value.ToString(); //oUserTable.Add(); int i = oUserTable.Add(); if (i != 0) { oApp.SetStatusBarMessage("Error" + oCompany.GetLastErrorDescription(), SAPbouiCOM.BoMessageTime.bmt_Medium, false); } else { oApp.SetStatusBarMessage("Exito en la inserción", SAPbouiCOM.BoMessageTime.bmt_Medium, false); oForm = oApp.Forms.Item("fmcred"); oForm.Close(); } }
private void HandleJobPress(SAPbouiCOM.Form form, SAPbouiCOM.ItemEvent pVal) { try { switch (pVal.ItemUID) { case btnUpdate: if (!ValidateJob(form)) { return; } HandleUpdate(form); break; case btnClose: if (JobID != "" && getFormItemVal(oJobForm, stCancel) != LB_CANCELLED) { if (SBO_Application.MessageBox("Cancel this job?", 1, "Yes", "No") == 1) { CancelJob(JobID); } } form.Close(); break; } } catch (Exception ex) { errorLog(ex); } }
private void Button1_ClickAfter(object sboObject, SAPbouiCOM.SBOItemEventArg pVal) { try { if (Grid0.Rows.SelectedRows.Count > 0) { //oUDS = oForm.DataSources.UserDataSources.Item("UD_1"); string sPago = Convert.ToString(Grid0.DataTable.GetValue(0, Grid0.Rows.SelectedRows.Item(0, SAPbouiCOM.BoOrderType.ot_RowOrder))); Comisiones.Agregar_Documento_Grid_Pagos(sPago); oForm.Close(); } } catch (Exception) { } }
public void Dispose() { if (oTimer != null) { oTimer.Dispose(); } _oForm.Close(); }
private void Button1_ClickAfter(object sboObject, SAPbouiCOM.SBOItemEventArg pVal) { try { if (CheckBox0.Checked) { oForm.Close(); Comisiones.Agregar_Proyecto_Grid_Pagos(""); } if (Grid0.Rows.SelectedRows.Count > 0 && CheckBox0.Checked == false) { oUDS = oForm.DataSources.UserDataSources.Item("UD_1"); string sOrig = oUDS.ValueEx; oUDS = oForm.DataSources.UserDataSources.Item("UD_0"); string sProyecto = Convert.ToString(Grid0.DataTable.GetValue(0, Grid0.Rows.SelectedRows.Item(0, SAPbouiCOM.BoOrderType.ot_RowOrder))); SAPbouiCOM.Form oFormP = Application.SBO_Application.Forms.Item(oUDS.ValueEx); oForm.Close(); switch (sOrigf) { case "Consultas": ((SAPbouiCOM.EditText)oFormP.Items.Item("Item_23").Specific).String = sProyecto; break; case "Pagos": Comisiones.Agregar_Proyecto_Grid_Pagos(sProyecto); break; case "Premios": Comisiones.Agregar_Proyecto_Grid_Premios(sProyecto); break; } } } catch (Exception) { } }
public void llenarMatrixDesdePersonalizada(int docNum, int lineId) { string query; SAPbobsCOM.Recordset rs; SAPbouiCOM.Matrix oMatrix; try { oMatrix = (SAPbouiCOM.Matrix)oForm.Items.Item("38").Specific; rs = (SAPbobsCOM.Recordset)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); query = "SELECT T1.[U_ItemCode], T1.[U_Dscript], T1.[U_OpenQty], T1.[U_PrcBfDi], T1.[U_DiscItem], T1.[U_TaxCode], T1.[DocEntry], T1.[LineId] FROM [dbo].[@ZTV] T0 , [dbo].[@ZTV_LINES] T1 WHERE T0.[DocEntry] = T1.[DocEntry] and T0.[DocNum] = " + docNum + " and T1.[LineId] = " + lineId; rs.DoQuery(query); int i = oMatrix.RowCount; if ("" != rs.Fields.Item("U_ItemCode").Value.ToString()) { ((SAPbouiCOM.EditText)oMatrix.Columns.Item("1").Cells.Item(i).Specific).Value = rs.Fields.Item("U_ItemCode").Value.ToString(); ((SAPbouiCOM.EditText)oMatrix.Columns.Item("3").Cells.Item(i).Specific).Value = rs.Fields.Item("U_Dscript").Value.ToString(); ((SAPbouiCOM.EditText)oMatrix.Columns.Item("11").Cells.Item(i).Specific).Value = rs.Fields.Item("U_OpenQty").Value.ToString(); ((SAPbouiCOM.EditText)oMatrix.Columns.Item("14").Cells.Item(i).Specific).Value = rs.Fields.Item("U_PrcBfDi").Value.ToString(); ((SAPbouiCOM.EditText)oMatrix.Columns.Item("15").Cells.Item(i).Specific).Value = rs.Fields.Item("U_DiscItem").Value.ToString(); ((SAPbouiCOM.EditText)oMatrix.Columns.Item("160").Cells.Item(i).Specific).Value = rs.Fields.Item("U_TaxCode").Value.ToString(); ((SAPbouiCOM.EditText)oMatrix.Columns.Item("U_BsEntry").Cells.Item(i).Specific).Value = rs.Fields.Item("DocEntry").Value.ToString(); ((SAPbouiCOM.EditText)oMatrix.Columns.Item("U_BsLine").Cells.Item(i).Specific).Value = rs.Fields.Item("LineId").Value.ToString(); } forma.Close(); } catch (Exception e) { app.StatusBar.SetText("listaSolicitud_method_llenarMatrixDesdePersonalizada -> " + e.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); } }
private void mBtnAdd_ClickBefore(object sboObject, SAPbouiCOM.SBOItemEventArg pVal, out bool BubbleEvent) { BubbleEvent = true; string lStrItemCode = mCmbType.Value.ToString(); string lStrPrice = mObjModal.DataSources.UserDataSources.Item("UD_Cost").ValueEx; mObjModal.Close(); int lIntRow = mMtxLines.RowCount; SetValueColumnEditText("1", lIntRow, lStrItemCode); SetValueColumnEditText("11", lIntRow, "1"); SetValueColumnEditText("14", lIntRow, lStrPrice); }
/// <summary> /// funcion controla los eventos del formulario /// </summary> /// <param name="FormUID">identificador unico del formulario</param> /// <param name="pVal">Item even</param> /// <param name="BubbleEvent">BobbleEvent</param> public static void m_SBO_Appl_ItemEvent(String FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; SAPbouiCOM.Form oForm = null; try { if (!pVal.BeforeAction) { switch (pVal.EventType) { case SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST: oForm = Conexion_SBO.m_SBO_Appl.Forms.Item(FormUID); GestionarSeleccionCFL(oForm, pVal); break; case SAPbouiCOM.BoEventTypes.et_CLICK: oForm = Conexion_SBO.m_SBO_Appl.Forms.Item(FormUID); switch (pVal.ItemUID) { case "btnInt": IntegracionServicio(oForm); oForm.Close(); break; case "btnCompl": CopyInfo(oForm); break; } break; default: break; } } } catch (Exception ex) { Conexion_SBO.m_SBO_Appl.StatusBar.SetText("Error: " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Long, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { FuncionesComunes.LiberarObjetoGenerico(oForm); } }
private void ButtonCancelar_ClickAfter(object sboObject, SAPbouiCOM.SBOItemEventArg pVal) { try { SAPbouiCOM.Form oForm = Application.SBO_Application.Forms.ActiveForm; oForm.Close(); } catch (Exception e) { Application.SBO_Application.StatusBar.SetText(e.Message + " ** Trace: " + e.StackTrace, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); log.AddLog(e.Message + " ** Trace: "); } finally { } }
public void VoidCloseFormProc() { try { formIncomingPayment.Close(); formPaymentList.Close(); SBO_Application.Menus.Item("1289").Activate(); SBO_Application.Menus.Item("1288").Activate(); } catch (Exception) { //errorLog(ex); }finally { voidCCTRANS(confirmNum); } }
private void mBtnAdd_ClickBefore(object sboObject, SAPbouiCOM.SBOItemEventArg pVal, out bool BubbleEvent) { BubbleEvent = true; if (!(sboObject as SAPbouiCOM.Button).Item.Enabled) { return; } try { string lStrItemCode = mCmbType.Value.ToString(); string lStrPrice = mEdtAmnt.Value; if (mFrmInvoice.Mode != SAPbouiCOM.BoFormMode.fm_ADD_MODE && mFrmInvoice.Mode != SAPbouiCOM.BoFormMode.fm_UPDATE_MODE) { UIApplication.ShowMessageBox("El documento actual no es editable."); return; } if (mFrmInvoice.Mode != SAPbouiCOM.BoFormMode.fm_ADD_MODE && mFrmInvoice.Mode != SAPbouiCOM.BoFormMode.fm_UPDATE_MODE) { UIApplication.ShowMessageBox("El documento actual no es editable."); return; } if (Convert.ToDouble(lStrPrice) <= 0) { UIApplication.ShowMessageBox("La comisión debe ser mayor a cero."); return; } mFrmDialog.Close(); int lIntRow = mMtxLines.RowCount; if ((mMtxLines.Columns.Item("1").Cells.Item(lIntRow).Specific as SAPbouiCOM.EditText).Value != "") { mMtxLines.AddRow(); lIntRow++; } mMtxLines.SetCellFocus(lIntRow, 1); SetValueColumnEditText("1", lIntRow, lStrItemCode); SetValueColumnEditText("14", lIntRow, lStrPrice); } catch (Exception lObjException) { LogUtility.WriteError(string.Format("[ComissionModal - mBtnAdd_ClickBefore] Error al agregar el item con la comisión: {0}", lObjException.Message)); UIApplication.ShowMessageBox(string.Format("Error al agregar el item con la comisión: {0}", lObjException.Message)); } }
private void SetupFormHandler(SAPbouiCOM.Form form, SAPbouiCOM.ItemEvent pVal) { try { if (pVal.BeforeAction) { } else { switch (pVal.EventType) { case SAPbouiCOM.BoEventTypes.et_COMBO_SELECT: { switch (pVal.ItemUID) { } } break; case SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED: { switch (pVal.ItemUID) { case btnClose: oSetupForm.Close(); break; case btnProcess: HandleSetupUpdate(form); break; } } break; } } } catch (Exception ex) { errorLog(ex); } }
/// <summary> /// Controla los eventos de items del formularios /// </summary> public static void m_SBO_Appl_ItemEvent(String FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; SAPbouiCOM.Form oForm = null; oForm = Conexion_SBO.m_SBO_Appl.Forms.Item(FormUID); ResultMessage result = new ResultMessage(); SAPbouiCOM.Matrix oMatrix = null; Int32 Row = -1; try { if (pVal.BeforeAction && pVal.EventType.Equals(SAPbouiCOM.BoEventTypes.et_CLICK) && pVal.ItemUID.Equals("bt_Salir")) { oForm.Close(); } if (pVal.BeforeAction && pVal.EventType.Equals(SAPbouiCOM.BoEventTypes.et_CLICK) && pVal.ItemUID.Equals("bt_Ver")) { oMatrix = oForm.Items.Item("Item_0").Specific; Row = oMatrix.GetNextSelectedRow(0, SAPbouiCOM.BoOrderType.ot_SelectionOrder); if (Row != -1) { Conexion_SBO.m_SBO_Appl.StatusBar.SetText("Visualizando 1 documento. Espere un momento.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); result = GestionarVisualizar(oForm, Row); if (!result.Success) { Conexion_SBO.m_SBO_Appl.StatusBar.SetText(result.Mensaje, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } } else { BubbleEvent = false; Conexion_SBO.m_SBO_Appl.StatusBar.SetText("Seleccione un documento para visualizar", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); } } } catch (Exception ex) { Conexion_SBO.m_SBO_Appl.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } }
private void HandleCFPress(SAPbouiCOM.Form form, SAPbouiCOM.ItemEvent pVal) { try { switch (pVal.ItemUID) { case btnTerminal: TermAmount = getFormItemVal(form, editCAmount); TermFunc = "Charge"; if (getFormItemVal(form, btnProcess) == "Credit") { TermFunc = "Credit"; } TermGroup = getGroupName(getCustomerID()); TermInvoice = getInvoiceNum(); TermCustomer = getCustomerID(); oTerminalLaunchForm = form; CreateTerminalForm(); break; case btnProcess: formCM = form; if (!ValidateChargeForm(form)) { return; } tProcess = new Thread(ProcessCardCM); tProcess.Start(); break; case btnClose: oCreditForm.Close(); break; } } catch (Exception ex) { errorLog(ex); } }
private void HandleSetupUpdate(SAPbouiCOM.Form form) { //errorLog("Handle select"); try { string dbPassword = B1Info.DBPassWD; string appPassword = B1Info.AppPassWD; FormFreeze(form, true); if (getFormItemVal(form, editDBPasswd) != passwdMask) { dbPassword = getFormItemVal(form, editDBPasswd); } if (getFormItemVal(form, editAppPasswd) != passwdMask) { appPassword = getFormItemVal(form, editAppPasswd); } upsertSetupInfo(getFormItemVal(form, editDBUser), dbPassword, getFormItemVal(form, editAppUser), appPassword); tProcess = new Thread(appInit); tProcess.Start(); } catch (Exception ex) { showMessage(ex.Message); errorLog(ex); } finally { try { FormFreeze(form, false); form.Close(); } catch (Exception) { } } }
/// <summary> /// Maneja los eventos de los item del formulario /// </summary> /// <param name="FormUID"></param> /// <param name="pVal"></param> /// <param name="BubbleEvent"></param> public static void m_SBO_Appl_ItemEvent(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; SAPbouiCOM.Form oForm = null; string Pago = string.Empty; string Fecha = string.Empty; try { oForm = Conexion_SBO.m_SBO_Appl.Forms.Item(FormUID); if (pVal.BeforeAction == false) { if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_LOST_FOCUS) { if (pVal.ItemUID.Equals("6")) { // Obtener Fecha Fecha = ((SAPbouiCOM.EditText)oForm.Items.Item("6").Specific).String; int Index = 0; // Asociar Pagos List <string> ListaPagos = PagosMasivos.ObtenerPagosExistentes(Fecha); if (ListaPagos.Count > 0) { SAPbouiCOM.Item oItem = oForm.Items.Item("4"); SAPbouiCOM.ComboBox oComboBox = ((SAPbouiCOM.ComboBox)(oItem.Specific)); oComboBox.Item.DisplayDesc = true; // Limpiar Combobox si tiene datos y eliminar userdatasource if (oComboBox.ValidValues.Count > 0) { FuncionesComunes.BorrarCombo(FormUID, "4"); oComboBox.DataBind.UnBind(); } foreach (string pago in ListaPagos) { oComboBox.ValidValues.Add(Index.ToString(), pago); Index++; } oComboBox.DataBind.SetBound(true, "", "udsPagos"); } else { FuncionesComunes.BorrarCombo(FormUID, "4"); Conexion_SBO.m_SBO_Appl.StatusBar.SetText(string.Format("No se encontraron pagos en fecha: {0}", Fecha), SAPbouiCOM.BoMessageTime.bmt_Long, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); } } } if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED) { // boton Generar if (pVal.ItemUID.Equals("1")) { // Obtener Fecha Fecha = ((SAPbouiCOM.EditText)oForm.Items.Item("6").Specific).String; // Obtener pago Pago = ((SAPbouiCOM.ComboBox)oForm.Items.Item("4").Specific).Value; // Validar ingreso de pago result = ValidarCampos(Fecha, Pago); if (result.Success) { Pago = ((SAPbouiCOM.ComboBox)oForm.Items.Item("4").Specific).Selected.Description; result = PagosMasivos.GestionarPagoMasivo(Pago); if (result.Success) { Conexion_SBO.m_SBO_Appl.StatusBar.SetText(result.Mensaje, SAPbouiCOM.BoMessageTime.bmt_Long, SAPbouiCOM.BoStatusBarMessageType.smt_Success); } else { Conexion_SBO.m_SBO_Appl.StatusBar.SetText(result.Mensaje, SAPbouiCOM.BoMessageTime.bmt_Long, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } } else { Conexion_SBO.m_SBO_Appl.StatusBar.SetText(result.Mensaje, SAPbouiCOM.BoMessageTime.bmt_Long, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); } } // boton cancelar else if (pVal.ItemUID.Equals("2")) { oForm.Close(); } } } } catch { } }
private void ePaymentFormFormHandler(SAPbouiCOM.Form form, SAPbouiCOM.ItemEvent pVal) { try { if (pVal.BeforeAction) { } else { switch (pVal.EventType) { case SAPbouiCOM.BoEventTypes.et_COMBO_SELECT: { switch (pVal.ItemUID) { case cbEMTemplate: string t = getFormItemVal(form, cbEMTemplate); updateDefaultEmailTemplate(t); break; case cbCustomerID: string id = getFormItemVal(form, cbCustomerID); if (id != "") { setFormEditVal(form, editCustomerID, id); checkePayPaidStatus(id); setComboValue(form, cbGroup, ""); populateePaymentFormMatrix(); } break; case cbGroup: string grp = getFormItemVal(form, cbGroup); if (grp != "") { setFormEditVal(form, editCustomerID, ""); setComboValue(form, cbCustomerID, ""); string s = getCardCodeByGroup(grp); string[] c = s.Split(','); foreach (string i in c) { checkePayPaidStatus(i.Replace("'", "").Trim()); } populateePaymentFormMatrix(); } break; } } break; case SAPbouiCOM.BoEventTypes.et_CLICK: if (pVal.ItemUID == matrixePaymentForm) { if (!ePayHandleInvSelect()) { switch (pVal.ColUID) { case "PaidDT": populateePaymentFormMatrix(" \"U_PaidDate\" DESC,"); break; case "UploadDT": populateePaymentFormMatrix(" \"U_UploadDate\" DESC,"); break; case "Balance": populateePaymentFormMatrix("balance,"); break; case "UpBal": populateePaymentFormMatrix(" \"U_UploadedBalance\","); break; case "Status": populateePaymentFormMatrix(" \"U_Status\" DESC,"); break; case "CustID": case "CName": populateePaymentFormMatrix(" a.\"CardCode\" DESC,"); break; } } } break; case SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED: { switch (pVal.ItemUID) { case btnClose: oePaymentFormForm.Close(); oePaymentFormForm = null; break; case btnAdd: string str = string.Format("Send all invoices?"); if (SBO_Application.MessageBox(str + "?", 1, "Yes", "No") == 1) { tProcess = new Thread(SendAll); tProcess.Start(); } break; case btnRefresh: try { string cid = getFormItemVal(oePaymentFormForm, editCustomerID); if (cid != "") { checkePayPaidStatus(cid); } else { string grp = getFormItemVal(form, cbGroup); if (grp != "") { string s = getCardCodeByGroup(grp); string[] c = s.Split(','); foreach (string i in c) { checkePayPaidStatus(i.Replace("'", "").Trim()); } } } populateePaymentFormMatrix(); } catch (Exception ex) { SBO_Application.MessageBox(ex.Message); } break; case btnRun: try { //ProcessJob(); //showMessage("Job completed"); populateePaymentFormMatrix(); } catch (Exception ex) { SBO_Application.MessageBox(ex.Message); } break; case btnFind: string id = getFormItemVal(oePaymentFormForm, editCustomerID); SBO_Application.SetStatusBarMessage("Finding customer please wait...", SAPbouiCOM.BoMessageTime.bmt_Medium, false); List <String> list = FindCustomer(id); if (list.Count() == 0) { SBO_Application.SetStatusBarMessage("No customer found.", SAPbouiCOM.BoMessageTime.bmt_Medium, false); } else { SAPbouiCOM.ComboBox oCB = (SAPbouiCOM.ComboBox)form.Items.Item(cbCustomerID).Specific; try { while (oCB.ValidValues.Count > 0) { oCB.ValidValues.Remove(0, SAPbouiCOM.BoSearchKey.psk_Index); } } catch (Exception) { } ComboAddItem(oCB, ""); foreach (string c in list) { ComboAddItem(oCB, c); } SBO_Application.SetStatusBarMessage("Found " + list.Count().ToString() + " customer(s).", SAPbouiCOM.BoMessageTime.bmt_Medium, false); } break; } } break; } } } catch (Exception ex) { errorLog(ex); } }
private void Button0_ClickAfter(object sboObject, SAPbouiCOM.SBOItemEventArg pVal) { oForm.Close(); }
private void CustImpFormHandler(SAPbouiCOM.Form form, SAPbouiCOM.ItemEvent pVal) { try { if (pVal.BeforeAction) { } else { switch (pVal.EventType) { case SAPbouiCOM.BoEventTypes.et_CLICK: break; case SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED: { switch (pVal.ItemUID) { case btnClose: try { if (tImpProcess != null) { tImpProcess.Abort(); } } catch (Exception) { } oCustImpForm.Close(); break; case btnImp: try { if (custObjForImport == null) { form.Items.Item(btnFind).Click(); } else { string cardcode = getFormItemVal(form, editCustomerID); if (cardcode == "") { showMessage("Enter customer ID."); } else { if (custObjForImport == null) { form.Items.Item(btnFind).Click(); } else { string code = FindCustomerByID(cardcode); if (code == "") { showMessage("Customer not found"); return; } if (SBO_Application.MessageBox("Import payment method(s) to " + cardcode + "?", 1, "Yes", "No") == 1) { foreach (PaymentMethodProfile pm in custObjForImport.PaymentMethodProfiles) { if (!isPaymentMethodExists(cardcode, pm.CardNumber, pm.CardExpiration)) { CCCUST cccust = new CCCUST(); cccust.CustomerID = cardcode; cccust.active = 'Y'; cccust.email = custObjForImport.Email; cccust.firstName = custObjForImport.BillingAddress.FirstName; cccust.lastName = custObjForImport.BillingAddress.LastName; cccust.street = custObjForImport.BillingAddress.Address1; cccust.city = custObjForImport.BillingAddress.City; cccust.state = custObjForImport.BillingAddress.State; cccust.zip = custObjForImport.BillingAddress.ZipCode; cccust.expDate = pm.CardExpiration; cccust.cardCode = pm.CardCode; try { if (pm.MethodName != null && pm.MethodName != "") { if (pm.MethodName.IndexOf(" ") >= 0) { string name = pm.MethodName; string[] s = name.Split(' '); cccust.firstName = s[0]; cccust.lastName = s[s.Length - 1]; } } } catch (Exception) { } cccust.routingNumber = pm.Routing; cccust.checkingAccount = pm.Account; cccust.GroupName = getGroupName(cardcode); cccust.CustNum = custObjForImport.CustomerToken; cccust.MethodID = pm.MethodID; int id = getNextTableID("@CCCUST"); string ccname = cccust.firstName + " " + cccust.lastName; string desc = ccname; if (pm.MethodName != "" && pm.MethodName != "") { desc = pm.MethodName; } if (pm.MethodType == "check") { cccust.methodDescription = id.ToString() + "_" + pm.Routing + " " + pm.Account + "(" + desc + ")"; cccust.checkingAccount = pm.Account; cccust.routingNumber = pm.Routing; } else { cccust.cardNum = pm.CardNumber; cccust.methodDescription = id.ToString() + "_" + pm.CardNumber + " " + pm.CardExpiration + "(" + desc + ")"; cccust.cardType = pm.CardType; } string cardid = ""; cccust.CardName = getCardName(cccust.GroupName, cccust.cardType, "", ref cardid); cccust.CCAccountID = cardid; insert(cccust); SBO_Application.SetStatusBarMessage(string.Format("Import payment method {0} to {1}.", cccust.cardNum, cardcode), SAPbouiCOM.BoMessageTime.bmt_Medium, false); } } } } } } } catch (Exception ex) { SBO_Application.SetStatusBarMessage(string.Format("Import payment method error: {0}.", ex.Message), SAPbouiCOM.BoMessageTime.bmt_Medium, true); } break; case btnFImp: string fn = getFormItemVal(form, editFileName); if (fn == "") { showMessage("Please enter file name."); } else { if (!File.Exists(fn)) { showMessage("File: " + fn + " not found."); } else { if (SBO_Application.MessageBox("Import payment method(s) from file " + fn + "?", 1, "Yes", "No") == 1) { SetText("Import Begin. Please wait...\r\n"); tImpProcess = new Thread(importThread); tImpProcess.Start(); } } } break; case btnExpFImp: fn = getFormItemVal(form, editExpFileName); if (fn == "") { showMessage("Please enter exported customer file name."); } else { if (!File.Exists(fn)) { showMessage("File: " + fn + " not found."); } else { if (SBO_Application.MessageBox("Import payment method(s) from file " + fn + "?", 1, "Yes", "No") == 1) { SetText("Import Begin. Please wait...\r\n"); tImpProcess = new Thread(ExpImportThread); tImpProcess.Start(); } } } break; } } break; } } } catch (Exception ex) { errorLog(ex); } }
private void CustImpFormHandler(SAPbouiCOM.Form form, SAPbouiCOM.ItemEvent pVal) { try { if (pVal.BeforeAction) { } else { switch (pVal.EventType) { case SAPbouiCOM.BoEventTypes.et_CLICK: break; case SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED: { switch (pVal.ItemUID) { case btnClose: oCustImpForm.Close(); break; case btnImp: try { if (custObjForImport == null) { form.Items.Item(btnFind).Click(); } else { string cardcode = getComboBoxVal(form, cbCustomerID); if (cardcode == "") { showMessage("Please select a customer."); } else { if (custObjForImport == null) { form.Items.Item(btnFind).Click(); } else { if (SBO_Application.MessageBox("Import payment method(s) to " + cardcode + "?", 1, "Yes", "No") == 1) { int i = 0; foreach (PaymentMethod pm in custObjForImport.PaymentMethods) { if (!isPaymentMethodExists(cardcode, pm.CardNumber, pm.CardExpiration)) { CCCUST cccust = new CCCUST(); cccust.CustomerID = cardcode; cccust.active = 'Y'; cccust.email = custObjForImport.BillingAddress.Email; cccust.firstName = custObjForImport.BillingAddress.FirstName; cccust.lastName = custObjForImport.BillingAddress.LastName; cccust.street = custObjForImport.BillingAddress.Street; cccust.city = custObjForImport.BillingAddress.City; cccust.state = custObjForImport.BillingAddress.State; cccust.zip = custObjForImport.BillingAddress.Zip; cccust.expDate = pm.CardExpiration; cccust.cardCode = pm.CardCode; cccust.routingNumber = pm.Routing; cccust.checkingAccount = pm.Account; cccust.GroupName = getGroupName(cardcode); cccust.CustNum = custObjForImport.CustNum; cccust.MethodID = pm.MethodID; try { if (pm.MethodName != null && pm.MethodName != "") { if (pm.MethodName.IndexOf(" ") > 0) { string name = pm.MethodName; string[] s = name.Split(' '); cccust.firstName = s[0]; cccust.lastName = s[s.Length - 1]; } } } catch (Exception) { } int id = getNextTableID("@CCCUST"); string desc = cccust.firstName + " " + cccust.lastName; if (pm.MethodName != null && pm.MethodName != "") { desc = pm.MethodName; } if (pm.MethodType == "check") { cccust.methodDescription = id.ToString() + "_" + pm.Routing + " " + pm.Account + "(" + desc + ")"; cccust.checkingAccount = pm.Account; cccust.routingNumber = pm.Routing; } else { cccust.cardNum = pm.CardNumber; cccust.methodDescription = id.ToString() + "_" + pm.CardNumber + " " + pm.CardExpiration + "(" + desc + ")"; cccust.checkingAccount = pm.Account; cccust.cardType = pm.CardType; } string cardid = ""; cccust.CardName = getCardName(cccust.GroupName, cccust.cardType, "", ref cardid); cccust.CCAccountID = cardid; cccust.methodName = pm.MethodName; insert(cccust); SBO_Application.SetStatusBarMessage(string.Format("Import payment method {0} to {1}.", cccust.cardNum, cardcode), SAPbouiCOM.BoMessageTime.bmt_Medium, false); } i++; } } } } } }catch (Exception ex) { SBO_Application.SetStatusBarMessage(string.Format("Import payment method error: {0}.", ex.Message), SAPbouiCOM.BoMessageTime.bmt_Medium, true); } break; case btnFind: try { string custNum = getFormEditVal(form, editCustNum); if (custNum == "") { showMessage("Please enter customer number."); } else { SBO_Application.SetStatusBarMessage("Finding customer please wait...", SAPbouiCOM.BoMessageTime.bmt_Medium, false); ueSecurityToken token = getToken(""); custObjForImport = ebiz.getCustomer(token, custNum); SAPbouiCOM.ComboBox oCB = (SAPbouiCOM.ComboBox)form.Items.Item(cbPaymentMethod).Specific; try { while (oCB.ValidValues.Count > 0) { oCB.ValidValues.Remove(0, SAPbouiCOM.BoSearchKey.psk_Index); } } catch (Exception) { } ComboAddItem(oCB, ""); foreach (PaymentMethod pm in custObjForImport.PaymentMethods) { string s = ""; string name = ""; name = custObjForImport.BillingAddress.FirstName + " " + custObjForImport.BillingAddress.LastName; if (pm.MethodName != null && pm.MethodName != "") { if (pm.MethodName.IndexOf(" ") > 0) { name = pm.MethodName; } } if (pm.MethodType == "check") { s = pm.Routing + " " + pm.Account + "(" + name + ")"; } else { s = pm.CardNumber + " " + pm.CardExpiration + "(" + name + ")"; } ComboAddItem(oCB, s); } oCB.Select(""); SBO_Application.SetStatusBarMessage(string.Format("{0} payment method(s) ready to import.", oCB.ValidValues.Count - 1), SAPbouiCOM.BoMessageTime.bmt_Medium, false); // form.Items.Item(btnImp).Click(); } }catch (Exception ex) { custObjForImport = null; SAPbouiCOM.ComboBox oCB = (SAPbouiCOM.ComboBox)form.Items.Item(cbPaymentMethod).Specific; try { while (oCB.ValidValues.Count > 0) { oCB.ValidValues.Remove(0, SAPbouiCOM.BoSearchKey.psk_Index); } } catch (Exception) { } ComboAddItem(oCB, ""); oCB.Select(""); SBO_Application.SetStatusBarMessage(string.Format("Find customer error: {0}.", ex.Message), SAPbouiCOM.BoMessageTime.bmt_Medium, true); errorLog(ex); } break; } } break; } } } catch (Exception ex) { errorLog(ex); } }
public twmKDS_EXPXML() { try { //Draw the form String sFileName = string.Format("{0}.xml", this.GetType().Name); bool bSuccess = true; if (System.IO.File.Exists(Environment.CurrentDirectory + "\\" + sFileName)) { System.Xml.XmlDocument oXml = new System.Xml.XmlDocument(); oXml.Load(Environment.CurrentDirectory + "\\" + sFileName); String sXml = eCommon.ModifySize(oXml.InnerXml); try { eCommon.SBO_Application.LoadBatchActions(ref sXml); } catch { bSuccess = false; } } else { String ResourceName = string.Format("{0}.Src.Resource.{1}", System.Reflection.Assembly.GetExecutingAssembly().GetName().Name, sFileName); String sXml = eCommon.ModifySize(eCommon.GetXMLResource(ResourceName)); try { eCommon.SBO_Application.LoadBatchActions(ref sXml); } catch { bSuccess = false; } } if (bSuccess) { _oForm = eCommon.SBO_Application.Forms.ActiveForm; if (_oForm.TypeEx.StartsWith("-")) { //a UDF form is opened. Close it. String UDFFormUID = _oForm.UniqueID; String ParentFormUID = eCommon.GetParentFormUID(_oForm); _oForm.Close(); _oForm = eCommon.SBO_Application.Forms.ActiveForm; if (_oForm.UniqueID != ParentFormUID) { _oForm = eCommon.SBO_Application.Forms.Item(ParentFormUID); } } _oForm.EnableMenu("6913", false); GetItemReferences(); // Initform can be use if you want to fill anything or color anything InitForm(); if (!SBOAddon.oOpenForms.Contains(_oForm.UniqueID)) { SBOAddon.oOpenForms.Add(_oForm.UniqueID, this); } _oForm.Visible = true; } } catch (Exception ex) { System.Windows.Forms.MessageBox.Show(ex.Message); } }
private void SBO_Application_ItemEvent(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; // SOCIO DE NEGOCIOS if ((pVal.FormType == 134 & pVal.EventType != SAPbouiCOM.BoEventTypes.et_FORM_UNLOAD) & (pVal.Before_Action == true)) { oOrderForm = SBO_Application.Forms.GetFormByTypeAndCount(pVal.FormType, pVal.FormTypeCount); if ((pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_LOAD) & (pVal.BeforeAction == true)) { DibujaItems.BtnCoRuc(oOrderForm); } if (pVal.ItemUID == "btnCRu" & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED)) { /*VALIDAMOS LICENCIA*/ DateTime dt1, dt2; dt1 = DateTime.Parse("01/01/2021"); dt2 = DateTime.Now; TimeSpan ts = dt2 - dt1; if (ts.Days < 15) { if ((oOrderForm.Mode == SAPbouiCOM.BoFormMode.fm_ADD_MODE)) { try { txtRuc = (SAPbouiCOM.EditText)oOrderForm.Items.Item("41").Specific; oCardType = (SAPbouiCOM.ComboBox)oOrderForm.Items.Item("40").Specific; Ruc = txtRuc.Value; if (Ruc.Length == 11) { oSocioNegocio = new SocioNegocio(); DatosSunat = ClassDatosSN.GetDatosSN(Ruc); oSocioNegocio.CardType = oCardType.Value; // [C] cliente [S] Proveedor oSocioNegocio.ruc = DatosSunat[0]; oSocioNegocio.razonSocial = DatosSunat[1]; oSocioNegocio.estado = DatosSunat[2]; oSocioNegocio.condicion = DatosSunat[3]; oSocioNegocio.direccion = DatosSunat[4]; oSocioNegocio.departamento = DatosSunat[5]; oSocioNegocio.provincia = DatosSunat[6]; oSocioNegocio.distrito = DatosSunat[7]; if (!(SetConnectionContext() == 0)) { SBO_Application.MessageBox("Failed setting a connection to DI API", 1, "Ok", "", ""); System.Environment.Exit(0); // Terminating the Add-On Application } if (!(ConnectToCompany() == 0)) { SBO_Application.MessageBox("Failed connecting to the company's Data Base", 1, "Ok", "", ""); System.Environment.Exit(0); // Terminating the Add-On Application } if (oSocioNegocio.estado == "ACTIVO" && oSocioNegocio.condicion == "HABIDO") { if (SBO_Application.MessageBox("Esta seguro de [Cear] Socio de negocios:" + oSocioNegocio.razonSocial, 2, "Ok", "Cancelar") == 1) { int res = AddSocioNegocioController.CreaSoNe(oCompany, oSocioNegocio); if (res == 0) { SBO_Application.MessageBox("Socio de negocios creado: " + oCompany.CompanyName + Constants.vbNewLine, 1, "Ok", "", ""); oOrderForm.Close(); } else { string LastError = ""; oCompany.GetLastError(out res, out LastError); SBO_Application.MessageBox(res + "-" + LastError); } } } else { if (SBO_Application.MessageBox("El SN: " + oSocioNegocio.razonSocial + "\r\n" + "Estado: " + oSocioNegocio.estado + " Condición: " + oSocioNegocio.condicion + "\r\n" + "Desea crear SN de todas formas?", 2, "Ok", "Cancelar") == 1) { int res = AddSocioNegocioController.CreaSoNe(oCompany, oSocioNegocio); if (res == 0) { SBO_Application.MessageBox("Socio de negocios creado: " + oCompany.CompanyName + Constants.vbNewLine, 1, "Ok", "", ""); oOrderForm.Close(); } else { string LastError = ""; oCompany.GetLastError(out res, out LastError); SBO_Application.MessageBox(res + "-" + LastError); } } } } else { SBO_Application.MessageBox("Nùmero de RUC debe de contener 12 caracteres"); } } catch (Exception ex) { SBO_Application.MessageBox(ex.Message); } } else { SBO_Application.MessageBox("Esta obcion solo esta activada para [Crear] Socio de negocio."); } } else { SBO_Application.MessageBox("Periodo de prueba [terminado]"); } } } }
// TODO: Submit the PO to create GRPO void _btnPost_PressedAfter(object sboObject, SAPbouiCOM.SBOItemEventArg pVal) { try { if (eCommon.DataTableIndexOf(_dt_VendorGrid, "Checked", "Y") == null) { eCommon.SBO_Application.StatusBar.SetText("No PO Selected", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } else { SAPbobsCOM.Documents oReceipt = null; // If save as draft if (_cbDraft.Checked) { oReceipt = eCommon.oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oDrafts) as SAPbobsCOM.Documents; oReceipt.DocObjectCode = SAPbobsCOM.BoObjectTypes.oPurchaseDeliveryNotes; } // If save as GRPO else { oReceipt = eCommon.oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oPurchaseDeliveryNotes) as SAPbobsCOM.Documents; } oReceipt.CardCode = _oForm.DataSources.UserDataSources.Item("txtVendor").ValueEx; oReceipt.CardName = _oForm.DataSources.UserDataSources.Item("txtNAME").ValueEx; oReceipt.DocDate = DateTime.ParseExact(_oForm.DataSources.UserDataSources.Item("txtPSTDT").ValueEx, "yyyyMMdd", System.Globalization.DateTimeFormatInfo.CurrentInfo, System.Globalization.DateTimeStyles.AssumeLocal); //check if empty if (_oForm.DataSources.UserDataSources.Item("txtDOCDT").ValueEx.Length > 0) { oReceipt.DocDueDate = DateTime.ParseExact(_oForm.DataSources.UserDataSources.Item("txtDOCDT").ValueEx, "yyyyMMdd", System.Globalization.DateTimeFormatInfo.CurrentInfo, System.Globalization.DateTimeStyles.AssumeLocal); } //check if empty if (_oForm.DataSources.UserDataSources.Item("txtDUEDT").ValueEx.Length > 0) { oReceipt.TaxDate = DateTime.ParseExact(_oForm.DataSources.UserDataSources.Item("txtDUEDT").ValueEx, "yyyyMMdd", System.Globalization.DateTimeFormatInfo.CurrentInfo, System.Globalization.DateTimeStyles.AssumeLocal); } //check if empty if (_oForm.DataSources.UserDataSources.Item("txtRMK").ValueEx.Length > 0) { oReceipt.Comments = _oForm.DataSources.UserDataSources.Item("txtRMK").ValueEx; } int[] SelectedRows = eCommon.DataTableIndexOf(_dt_VendorGrid, "Checked", "Y"); int iLineCount = 0; if (SelectedRows != null) { foreach (int Row in SelectedRows) { //Check whether it is checked. if not just continue; //first time theres already a new line, so only add on 2nd line on wards if (iLineCount > 0) { oReceipt.Lines.Add(); } // the document type String temp = _dt_VendorGrid.GetValue("Doc_Type", Row).ToString(); oReceipt.Lines.BaseType = Int32.Parse(_dt_VendorGrid.GetValue("Doc_Type", Row).ToString()); // the document id oReceipt.Lines.BaseEntry = Int32.Parse(_dt_VendorGrid.GetValue("Doc_Entry", Row).ToString()); // which line is it in the document oReceipt.Lines.BaseLine = Int32.Parse(_dt_VendorGrid.GetValue("Line_Num", Row).ToString()); oReceipt.Lines.Quantity = double.Parse(_dt_VendorGrid.GetValue("Quantity", Row).ToString()); oReceipt.Lines.UserFields.Fields.Item("U_TWM_CTBOXNO").Value = _dt_VendorGrid.GetValue("Checked", Row); iLineCount++; } } //add the invoice int iErr = oReceipt.Add(); //open the invoice if (iErr != 0) { throw new Exception(eCommon.oCompany.GetLastErrorDescription()); } else { String iDocEntry = eCommon.oCompany.GetNewObjectKey(); String sObjectType = eCommon.oCompany.GetNewObjectType(); oReceipt = eCommon.oCompany.GetBusinessObject((SAPbobsCOM.BoObjectTypes) int.Parse(sObjectType)) as SAPbobsCOM.Documents; oReceipt.GetByKey(int.Parse(iDocEntry)); String sDocNum = oReceipt.DocNum.ToString(); eCommon.SBO_Application.OpenForm((SAPbouiCOM.BoFormObjectEnum) int.Parse(sObjectType), "", iDocEntry); _oForm.Close(); } } } catch (Exception Ex) { eCommon.SBO_Application.StatusBar.SetText(Ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } }
private void PayOnTermFormHandler(SAPbouiCOM.ItemEvent pVal) { try { if (pVal.BeforeAction) { } else { switch (pVal.EventType) { case SAPbouiCOM.BoEventTypes.et_CLICK: break; case SAPbouiCOM.BoEventTypes.et_KEY_DOWN: if ((pVal.CharPressed == 13 || pVal.CharPressed == 10 || pVal.CharPressed == 9) && pVal.ItemUID == editStartDate) { try { string deliveryID = getFormItemVal(oPayOnTermForm, editStartDate); if (deliveryID != "") { if (cfgBatchAutoMode != "Y") { if (getFormItemVal(oPayOnTermForm, editStartDate) != "") { if (ManualScan == "") { ManualScan = getFormItemVal(oPayOnTermForm, editStartDate); } else { ManualScan = ManualScan + "," + getFormItemVal(oPayOnTermForm, editStartDate); } setFormEditVal(oPayOnTermForm, editStartDate, ""); } } populatePayOnTermMatrix(true, getFormItemVal(oPayOnTermForm, editStartDate)); } } catch (Exception e) { errorLog(e); } } break; case SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED: { switch (pVal.ItemUID) { case btnClose: oPayOnTermForm.Close(); break; case btnInvoice: //DateTime dt = DateTime.Parse(getFormItemVal(oPayOnTermForm, editStartDate)); bAuto = false; populatePayOnTermMatrix(false); SAPbouiCOM.Matrix oMatrix = (SAPbouiCOM.Matrix)oPayOnTermForm.Items.Item(matrixPayOnTerm).Specific; if (oMatrix.RowCount == 0) { SBO_Application.MessageBox("No order to process."); return; } if (SBO_Application.MessageBox("Capture and create invoices for delivered order?", 1, "Yes", "No") == 1) { tProcess = new Thread(BatchCreateInvoice); tProcess.Start(); /* * BatchCreateInvoice(); * populatePayOnTermMatrix(true); * SetPaymentID(); */ } break; case btnRefresh: try { populatePayOnTermMatrix(false); } catch (Exception ex) { SBO_Application.MessageBox(ex.Message); } break; case btnFind: { if (cfgBatchAutoMode != "Y") { if (getFormItemVal(oPayOnTermForm, editStartDate) != "") { if (ManualScan == "") { ManualScan = getFormItemVal(oPayOnTermForm, editStartDate); } else { ManualScan = ManualScan + "," + getFormItemVal(oPayOnTermForm, editStartDate); } setFormEditVal(oPayOnTermForm, editStartDate, ""); } } populatePayOnTermMatrix(true, getFormItemVal(oPayOnTermForm, editStartDate)); } break; } } break; } } } catch (Exception ex) { errorLog(ex); } }
private void RBillingFormHandler(SAPbouiCOM.Form form, SAPbouiCOM.ItemEvent pVal) { try { oRBillingForm = form; if (pVal.BeforeAction) { } else { switch (pVal.EventType) { case SAPbouiCOM.BoEventTypes.et_COMBO_SELECT: { switch (pVal.ItemUID) { case cbCustomerID: string id = getFormItemVal(form, cbCustomerID); if (id != "") { setFormEditVal(form, editCustomerID, id); populateRBillingMatrix("", string.Format(" AND \"U_CustomerID\"='{0}'", getFormItemVal(oRBillingForm, editCustomerID))); } break; } } break; case SAPbouiCOM.BoEventTypes.et_CLICK: if (pVal.ItemUID == matrixRBilling) { if (pVal.ColUID != "jobID") { switch (pVal.ColUID) { case "LastRun": populateRBillingMatrix("\"U_LastRunDate\" DESC,"); break; case "Desc": populateRBillingMatrix("\"U_Description\","); break; case "NextRun": populateRBillingMatrix(); break; case "InvID": populateRBillingMatrix("\"U_InvoiceID\", "); break; case "CustName": populateRBillingMatrix("\"U_CustomerName\", "); break; case "CustomerID": populateRBillingMatrix("\"U_CustomerID\", "); break; default: populateRBillingMatrix(); break; } } else { HandleJobSelect(); } } break; case SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED: { switch (pVal.ItemUID) { case btnClose: oRBillingForm.Close(); oRBillingForm = null; break; case btnAdd: JobCustID = getFormItemVal(form, cbCustomerID); if (JobCustID == "") { showMessage("Please select a customer"); return; } resetGlobal(); JobCustID = getFormItemVal(form, cbCustomerID); CreateJobForm(); bAuto = false; break; case btnRefresh: try { populateRBillingMatrix(); } catch (Exception ex) { showMessage(ex.Message); } break; case btnRun: try { ProcessJob(); populateRBillingMatrix(); } catch (Exception ex) { showMessage(ex.Message); } break; case btnFind: string id = getFormItemVal(oeBizConnectForm, editCustomerID); showStatus("Finding customer please wait...", SAPbouiCOM.BoMessageTime.bmt_Medium, false); List <String> list = FindCustomer(id); if (list.Count() == 0) { showStatus("No customer found.", SAPbouiCOM.BoMessageTime.bmt_Medium, false); } else { SAPbouiCOM.ComboBox oCB = (SAPbouiCOM.ComboBox)form.Items.Item(cbCustomerID).Specific; try { while (oCB.ValidValues.Count > 0) { oCB.ValidValues.Remove(0, SAPbouiCOM.BoSearchKey.psk_Index); } } catch (Exception) { } ComboAddItem(oCB, ""); foreach (string c in list) { ComboAddItem(oCB, c); } showStatus("Found " + list.Count().ToString() + " customer(s).", SAPbouiCOM.BoMessageTime.bmt_Medium, false); } break; } } break; } } } catch (Exception ex) { errorLog(ex); } }