static void Main(string[] args) { try { Application oApp = null; if (args.Length < 1) { oApp = new Application(); } else { oApp = new Application(args[0]); } DIApplication.DIConnect((SAPbobsCOM.Company)Application.SBO_Application.Company.GetDICompany()); //CONFIGURACION AccountingAccountsSetupLoginService lObjSetupLoginService = new AccountingAccountsSetupLoginService(); lObjSetupLoginService.CreateTable(); AccountingAccountsSetupDBService lObjSetupDBService = new AccountingAccountsSetupDBService(); lObjSetupDBService.CreateTable(); //IMPORTACION //Logg AccountingAccountsLoggService lObjLoggService = new AccountingAccountsLoggService(); lObjLoggService.CreateTable(); AccountingAccountsLoggDetailService lObjLoggDetailService = new AccountingAccountsLoggDetailService(); lObjLoggDetailService.CreateTable(); Menu MyMenu = new Menu(); MyMenu.AddMenuItems(); oApp.RegisterMenuEventHandler(MyMenu.SBO_Application_MenuEvent); Application.SBO_Application.AppEvent += new SAPbouiCOM._IApplicationEvents_AppEventEventHandler(SBO_Application_AppEvent); oApp.Run(); } catch (Exception ex) { System.Windows.Forms.MessageBox.Show(ex.Message); } }
/// <summary> /// Crea o modifica los datos de conexión de asalariados /// </summary> private void SaveConfigAsalariados() { AccountingAccountsSetupLogin setupLogin = null; AccountingAccountsSetupLoginService setupLoginService = new AccountingAccountsSetupLoginService(); try { if (!CheckEmptyFieldsAsal()) { Application.SBO_Application.StatusBar.SetText("Complete campos vacíos para continuar", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); return; } if (!ValidateIPString(txtServAsal.Value)) { Application.SBO_Application.StatusBar.SetText("Verifique el formato de la dirección ip de su servidor", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); return; } if (lBolUpdateAsal) { setupLogin = new AccountingAccountsSetupLogin() { Code = gCodeAsal, NameServer = txtServAsal.Value, Login = txtLoginAsal.Value, Password = txtPwdAsal.Value, NameDB = txtBDNameAsal.Value, AccountingAccount = txtCuentaCAsal.Value, //Activo = chkActivoAsal.Checked ? chkActivoAsal.ValOn : chkActivoAsal.ValOff, RowCode = gCodeAsal.ToString() }; setupLoginService.Update(setupLogin); } else { setupLogin = new AccountingAccountsSetupLogin() { NameServer = txtServAsal.Value, Login = txtLoginAsal.Value, Password = txtPwdAsal.Value, NameDB = txtBDNameAsal.Value, Descripcion = "Asalariados", AccountingAccount = txtCuentaCAsal.Value, //Activo = chkActivoAsal.Checked ? chkActivoAsal.ValOn : chkActivoAsal.ValOff, RowCode = gCodeAsal.ToString() }; setupLoginService.Add(setupLogin); FillFieldsBD(); lBolUpdateAsal = true; } Application.SBO_Application.StatusBar.SetText("Configuración guardada con éxito", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); } catch (Exception ex) { Application.SBO_Application.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } }