private void Frm_SeleccionEmpresa_Load(object sender, EventArgs e)
{
BS_Empresas.DataSource = NEmpresas.Listar();
BS_Emp_Accesos.DataSource = NEmp_Accesos.Listar();
BS_Grupos.DataSource = NGrupos.Listar();
BS_Usuarios.DataSource = NUsuarios.Listar();
this.Txt_Usuario.Text = Environment.UserName;
this.Cmb_Empresa.SelectedIndex = 0;
this.Cmb_Empresa.Focus();
}
private void Frm_Usuarios_Load(object sender, EventArgs e)
{
BS_Usuarios.DataSource = NUsuarios.Listar();
BS_Grupo_Opciones.DataSource = NGrupo_Opciones.ListarPorCodigo(MOFIN_LIB.Entorno.vs_Grupo);
r_GrupoOpciones = BS_Grupo_Opciones.Current as Grupo_Opciones;
r_EmpAccesos = BS_Emp_Accesos.Current as Emp_Accesos;
this.Modo_Consulta();
this.Grd_Usuarios.Focus();
BS_Empresas.DataSource = NEmpresas.Listar();
BS_Grupos.DataSource = NGrupos.Listar();
BS_OpcSistema.DataSource = NOpc_Sistema.Listar();
r_OpcSistema = BS_OpcSistema.Current as Opc_Sistema;
}
private void TSB_Eliminar_Click(object sender, EventArgs e)
{
string vl_RegEliminar = r_Usuarios.Nombre.ToString();
DialogResult vl_Resp = MessageBox.Show(MOFIN_LIB.Funciones._Mens_Idioma(9010) + "\n\n" + vl_RegEliminar,
MOFIN_LIB.Funciones._Mens_Idioma(201), MessageBoxButtons.YesNo, MessageBoxIcon.Question);
if (vl_Resp == DialogResult.Yes)
{
NUsuarios.Elimiar(r_Usuarios);
BS_Usuarios.DataSource = NUsuarios.Listar();
Grd_Usuarios.Refresh();
MessageBox.Show(Funciones._Mens_Idioma(9011), Funciones._Mens_Idioma(201), MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
private void Btn_Aceptar_Click(object sender, EventArgs e)
{
byte vl_Uno = 1;
byte vl_Dos = 2;
r_Usuarios.Cnfg_Desktop = Opc_Desktop2.Checked == true ? vl_Dos : vl_Uno;
r_Usuarios.Cnfg_Idioma = Opc_Idioma2.Checked == true ? vl_Dos : vl_Uno;
r_Usuarios.Cnfg_PaisUso = Opc_Pais2.Checked == true ? vl_Dos : vl_Uno;
r_Usuarios.Cnfg_FormFecha = Opc_FormFec2.Checked == true ? vl_Dos : vl_Uno;
if (vl_EsNuevo)
{
NUsuarios.Insertar(r_Usuarios);
}
else
{
NUsuarios.Actualizar(r_Usuarios);
}
// NEmp_Accesos.Actualizar(BS_Emp_Accesos.Current as Emp_Accesos);
this.Modo_Consulta();
BS_Usuarios.DataSource = NUsuarios.Listar();
MessageBox.Show(Funciones._Mens_Idioma(9019), Funciones._Mens_Idioma(201), MessageBoxButtons.OK, MessageBoxIcon.Information);
}
