private void btngrabar_Click(object sender, EventArgs e)
 {
     if (U_Validacion())
     {
         var BL = new tb_plla_tab0100BL();
         var BE = new tb_plla_tab0100();
         BE.codigo = txtcodigo.Text.Trim();
         tmpcursor = BL.TipoPrestamo_CONSULTA(VariablesPublicas.EmpresaID, BE).Tables[0];
         if (u_n_opsel == 1)
         {
             while (1 == 1)
             {
                 tmpcursor = BL.TipoPrestamo_CONSULTA(VariablesPublicas.EmpresaID, BE).Tables[0];
                 if (BL.Sql_Error.Length > 0)
                 {
                     Frm_Class.ShowError(BL.Sql_Error + "\r" + "Error al buscar código", this);
                     return;
                 }
                 if (tmpcursor.Rows.Count > 0)
                 {
                     var BLMX = new tb_plla_tab0100BL();
                     var BEMX = new tb_plla_tab0100();
                     txtcodigo.Text = BLMX.TipoPrestamo_MAXCODIGO(VariablesPublicas.EmpresaID, BEMX).Tables[0].Rows[0]["maximo_codigo"].ToString();
                 }
                 else
                 {
                     break;
                 }
             }
             tmpcursor = BL.TipoPrestamo_CONSULTA(VariablesPublicas.EmpresaID, BE).Tables[0];
             tmpcursor.Rows.Add(VariablesPublicas.INSERTINTOTABLE(tmpcursor));
             tmpcursor.Rows[0]["cprestamo"] = txtcodigo.Text;
         }
         tmpcursor.Rows[0]["dprestamo"] = txtdescripcion.Text.Trim();
         tmpcursor.Rows[0]["estadoprestamo"] = (chkactivo.Checked ? 1 : 0);
         tmpcursor.AcceptChanges();
         if (BL.TipoPrestamo_InsertUpdate(VariablesPublicas.EmpresaID, BE, tmpcursor))
         {
             seguridadlog();
             U_CancelarEdicion(0);
         }
         else
         {
             Frm_Class.ShowError(BL.Sql_Error, this);
         }
     }
 }
        private void CargaDatos()
        {
            var nposcolumnasortear = 0;
            var PrvSotOrder = default(SortOrder);
            var zordenado = false;
            var xcodcliente = "..";
            var xpalabra1 = string.Empty;
            var xpalabra2 = string.Empty;
            var xpalabra3 = string.Empty;
            if (txtfiltronombre.Text.Trim().Length > 0)
            {
                xpalabra1 = VariablesPublicas.Palabras(txtfiltronombre.Text, 1);
                xpalabra2 = VariablesPublicas.Palabras(txtfiltronombre.Text, 2);
                xpalabra3 = VariablesPublicas.Palabras(txtfiltronombre.Text, 3);
            }
            if ((Examinar.CurrentRow != null))
            {
                xcodcliente = Examinar.Rows[Examinar.CurrentRow.Index].Cells["cprestamo"].Value.ToString();
            }
            if ((Examinar.SortedColumn != null))
            {
                nposcolumnasortear = Examinar.SortedColumn.Index;
                PrvSotOrder = Examinar.SortOrder;
                zordenado = true;
            }
            var BL = new tb_plla_tab0100BL();
            var BE = new tb_plla_tab0100();
            BE.nomlike1 = xpalabra1;
            BE.nomlike2 = xpalabra2;
            BE.nomlike3 = xpalabra3;
            BE.norden = 1;
            BE.ver_blanco = 0;
            tablaclientes = BL.TipoPrestamo_CONSULTA(VariablesPublicas.EmpresaID, BE).Tables[0];
            Examinar.AutoGenerateColumns = false;
            Examinar.DataSource = tablaclientes;

            VariablesPublicas.PintaEncabezados(Examinar);

            if (zordenado)
            {
                if (PrvSotOrder == SortOrder.Ascending)
                {
                    Examinar.Sort(Examinar.Columns[nposcolumnasortear], System.ComponentModel.ListSortDirection.Ascending);
                }
                else
                {
                    Examinar.Sort(Examinar.Columns[nposcolumnasortear], System.ComponentModel.ListSortDirection.Descending);
                }
            }
            else
            {
                Examinar.Sort(Examinar.Columns["cprestamo"], System.ComponentModel.ListSortDirection.Ascending);
            }
            if (Examinar.CurrentRow == null)
            {
                if (Examinar.RowCount > 0)
                {
                    Examinar.CurrentCell = Examinar.Rows[0].Cells["cprestamo"];
                }
            }
            for (lc_cont = 0; lc_cont <= Examinar.Rows.Count - 1; lc_cont++)
            {
                if (Examinar.Rows[lc_cont].Cells["cprestamo"].Value.ToString() == xcodcliente.ToString())
                {
                    Examinar.CurrentCell = Examinar.Rows[lc_cont].Cells["cprestamo"];
                    break;
                }
            }
        }
        private void btneliminar_Click(object sender, EventArgs e)
        {
            if ((Examinar.CurrentRow != null))
            {
                xnomcampo = string.Empty;
                var BL = new tb_plla_tab0100BL();
                var BE = new tb_plla_tab0100();
                BE.codigo = Examinar.Rows[Examinar.CurrentRow.Index].Cells["cprestamo"].Value.ToString();
                tmpcursor = BL.TipoPrestamo_IR(VariablesPublicas.EmpresaID, BE).Tables[0];
                if (BL.Sql_Error.Length > 0)
                {
                    xnomcampo = BL.Sql_Error;
                    Frm_Class.ShowError(BL.Sql_Error, this);
                }
                else
                {
                    if (tmpcursor.Rows.Count == 0)
                    {
                    }
                    else
                    {
                        for (lc_cont = 0; lc_cont <= tmpcursor.Rows.Count - 1; lc_cont++)
                        {
                            xnomcampo = xnomcampo + tmpcursor.Rows[lc_cont]["relacion"] + "\r";
                            if (lc_cont + 1 == 10)
                            {
                                break;
                            }
                        }
                    }
                }
                if (xnomcampo.Length == 0)
                {
                    var BLCO = new tb_plla_tab0100BL();
                    var BECO = new tb_plla_tab0100();
                    BECO.codigo = Examinar.Rows[Examinar.CurrentRow.Index].Cells["cprestamo"].Value.ToString();
                    BECO.norden = 1;
                    BECO.ver_blanco = 0;
                    tmptabla = BLCO.TipoPrestamo_CONSULTA(VariablesPublicas.EmpresaID, BECO).Tables[0];
                    if (BLCO.Sql_Error.Length == 0)
                    {
                        var message = "Desea eliminar datos del cargo  " + tmptabla.Rows[0]["cprestamo"].ToString().Trim() + "-" + tmptabla.Rows[0]["dprestamo"].ToString().Trim() + " ...?";
                        var caption = "Mensaje del Sistema";
                        var buttons = MessageBoxButtons.YesNo;
                        DialogResult result;
                        result = MessageBox.Show(this, message, caption, buttons, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2);
                        if (result == DialogResult.Yes)
                        {
                            BLCO.TipoPrestamo_ELIMINAR(VariablesPublicas.EmpresaID, BECO);
                            if (BLCO.Sql_Error.Length == 0)
                            {
                                var BLL = new tb_co_seguridadlogBL();
                                var BEL = new tb_co_seguridadlog();

                                BEL.moduloid = Name;
                                BEL.clave = VariablesPublicas.EmpresaID + Examinar.Rows[Examinar.CurrentRow.Index].Cells["cprestamo"].Value.ToString();
                                BEL.cuser = VariablesPublicas.Usuar;
                                BEL.fecha = DateTime.Now;
                                BEL.pc = VariablesPublicas.userip;
                                BEL.accion = "B";
                                BEL.detalle = "Descripción: " + txtdescripcion.Text;
                                BLL.Insert(VariablesPublicas.EmpresaID.ToString(), BEL);
                                Examinar.Rows.Remove(Examinar.CurrentRow);

                                Examinar.Refresh();
                                u_PintaDatos();
                            }
                            else
                            {
                                Frm_Class.ShowError(BLCO.Sql_Error, this);
                            }
                        }
                    }
                    else
                    {
                        Frm_Class.ShowError(BLCO.Sql_Error, this);
                    }
                }
                else
                {
                    MessageBox.Show(xnomcampo, "IMPOSIBLE ELIMINAR REGISTRO");
                }
            }
            U_RefrescaControles();
        }