private void btnEliminar_Click(object sender, EventArgs e) { bool _Connection = new lSerializados().CheckConnection(Configuration.UrlConnection); string _Message = "No existe conexión con el servidor de datos... Contacte a un Administrador de Red para ver las opciones de conexión."; string _Title = "Conexión de Red"; if (_Connection) { int Row = DtComprobaciones.CurrentCell.RowIndex; int IDcompro = Convert.ToInt32(DtComprobaciones.Rows[Row].Cells[0].Value.ToString()); oComprobacion _Comprobacion = _Comprobaciones.Where(o => o.IdComprobacion == IDcompro).FirstOrDefault(); DialogResult dialogo = MessageBox.Show("Desea eliminar fórmula número " + IDcompro.ToString() + "?", "Confirme", MessageBoxButtons.YesNo, MessageBoxIcon.Question); if (dialogo == DialogResult.Yes) { _Message = ((cmbTipo.SelectedIndex == 0) ? "- Debe seleccionar un tipo de plantilla" : ""); if (_Message.Length > 0) { MessageBox.Show(_Message, "Información Faltante", MessageBoxButtons.OK, MessageBoxIcon.Error); return; } if (_Comprobacion.AdmiteCambios == 0) { MessageBox.Show("La fórmula no puede ser eliminada ya que es un cálculo de " + cmbTipo.Text, "Eliminar", MessageBoxButtons.OK, MessageBoxIcon.Warning); return; } DialogResult _response = DialogResult.None; oComprobacion _Template = new oComprobacion() { IdComprobacion = IDcompro, IdTipoPlantilla = cmbTipo.SelectedIndex, Concepto = "", Formula = "", Condicion = "", Nota = "" }; KeyValuePair <bool, string[]> _result = new lComprobacionesAdmin(_Template, "E").Delete(); string _Messages = ""; foreach (string _Msg in _result.Value) { _Messages += ((_Messages.Length > 0) ? "\r\n" : "") + _Msg; } if (_result.Key && _response != DialogResult.Yes) { _Messages = "Fórmula eliminada con éxito"; } MessageBox.Show(_Messages, (_result.Key) ? "Proceso Existoso" : "Información Faltante", MessageBoxButtons.OK, (_result.Key) ? MessageBoxIcon.Information : MessageBoxIcon.Exclamation); if (_result.Key) { string _Path = Configuration.Path; oPlantilla[] _Templates = Assembler.LoadJson <oPlantilla[]>($"{_Path}\\jsons\\Plantillas.json"); oPlantilla _Temp = _Templates.FirstOrDefault(o => o.IdTipoPlantilla == _Template.IdTipoPlantilla && o.Anio == (int)cmbAnio.SelectedValue); //Libro Actual de Excel. Excel.Worksheet xlSht; Excel.Workbook wb = Globals.ThisAddIn.Application.ActiveWorkbook; string[] Formula = _Comprobacion.Formula.Split('='); string[] _celdaBase = Formula[0].Replace("[", "").Replace("]", "").Split(','); string[] _celdaFin = Formula[1].Replace("[", "").Replace("]", "").Split(','); Excel.Range _RangeO; Excel.Range _RangeR; xlSht = (Excel.Worksheet)wb.Worksheets.get_Item(_celdaBase[0]); for (int a = 1; a < 1000; a++) { _RangeO = (Excel.Range)xlSht.get_Range($"A" + a.ToString()); if (_RangeO != null) { if (_RangeO.Value.ToString() == _celdaBase[1]) { _RangeR = (Excel.Range)xlSht.get_Range($"{Generales.ColumnAdress(Int32.Parse(_celdaBase[2]))}" + a.ToString()); _RangeR.Formula = ""; _RangeR.Value = ""; _RangeR.NumberFormat = "@"; _RangeR.Value2 = ""; a = 1001; } } } FileJson(_Temp, cmbTipo.SelectedIndex.ToString()); this.Hide(); } } } else { MessageBox.Show(_Message, _Title, MessageBoxButtons.OK, MessageBoxIcon.Error); } }
private void btguardar_Click(object sender, EventArgs e) { bool _Connection = new lSerializados().CheckConnection(Configuration.UrlConnection); string _Message = "No existe conexión con el servidor de datos... Contacte a un Administrador de Red para ver las opciones de conexión."; string _Title = "Conexión de Red"; if (_Connection) { _Message = (txtConcepto.Text.Trim() == "") ? "- Debe indicar concepto." : ""; _Message += (txtcelda.Text.Trim() == "") ? ((_Message.Length > 0) ? "\r\n" : "") + "- Debe indicar celda." : ""; _Message += (txtformula.Text.Trim() == "") ? ((_Message.Length > 0) ? "\r\n" : "") + "- Debe indicar fórmula." : ""; _Message += (chkCondicionar.Checked && txtCondicion.Text.Trim() == "") ? ((_Message.Length > 0) ? "\r\n" : "") + "- Debe indicar condición." : ""; if (_Message.Length > 0) { MessageBox.Show(_Message, "Información Faltante", MessageBoxButtons.OK, MessageBoxIcon.Error); return; } DialogResult _response = DialogResult.None; string Formulax = (txtcelda.Text + "=" + txtformula.Text); string condicion = ""; if (chkCondicionar.Checked) { condicion = txtCondicion.Text; } oComprobacion _Template = new oComprobacion() { IdComprobacion = Convert.ToInt32(txtNro.Text), IdTipoPlantilla = TpPlantilla,//buscar Concepto = txtConcepto.Text, Formula = Formulax, Condicion = condicion, Nota = txtNota.Text, }; if (accion == "A") { KeyValuePair <bool, string[]> _result = new lComprobacionesAdmin(_Template, accion).Add(); string _Messages = ""; foreach (string _Msg in _result.Value) { _Messages += ((_Messages.Length > 0) ? "\r\n" : "") + _Msg; } if (_result.Key && _response != DialogResult.Yes) { _Messages = "Comprobación agregada con éxito"; } MessageBox.Show(_Messages, (_result.Key) ? "Proceso Existoso" : "Información Faltante", MessageBoxButtons.OK, (_result.Key) ? MessageBoxIcon.Information : MessageBoxIcon.Exclamation); //if (_result.Key) this.Hide(); } else if (accion == "M") { KeyValuePair <bool, string[]> _result = new lComprobacionesAdmin(_Template, accion).Update(); string _Messages = ""; foreach (string _Msg in _result.Value) { _Messages += ((_Messages.Length > 0) ? "\r\n" : "") + _Msg; } if (_result.Key && _response != DialogResult.Yes) { _Messages = "Comprobación modificada con éxito"; } MessageBox.Show(_Messages, (_result.Key) ? "Proceso Existoso" : "Información Faltante", MessageBoxButtons.OK, (_result.Key) ? MessageBoxIcon.Information : MessageBoxIcon.Exclamation); //if (_result.Key) this.Hide(); } string _Path = Configuration.Path; oPlantilla[] _Templates = Assembler.LoadJson <oPlantilla[]>($"{_Path}\\jsons\\Plantillas.json"); oPlantilla _Temp = _Templates.FirstOrDefault(o => o.IdTipoPlantilla == _Template.IdTipoPlantilla && o.Anio == _iYear); if (_oComprobacion != null) { //Libro Actual de Excel. Excel.Worksheet xlSht; Excel.Workbook wb = Globals.ThisAddIn.Application.ActiveWorkbook; string[] Formula = _oComprobacion.Formula.Split('='); string[] _celdaBase = Formula[0].Replace("[", "").Replace("]", "").Split(','); string[] _celdaFin = Formula[1].Replace("[", "").Replace("]", "").Split(','); Excel.Range _RangeO; Excel.Range _RangeR; xlSht = (Excel.Worksheet)wb.Worksheets.get_Item(_celdaBase[0]); for (int a = 1; a < 1000; a++) { _RangeO = (Excel.Range)xlSht.get_Range($"A" + a.ToString()); if (_RangeO != null) { if (_RangeO.Value.ToString() == _celdaBase[1]) { _RangeR = (Excel.Range)xlSht.get_Range($"{Generales.ColumnAdress(Int32.Parse(_celdaBase[2]))}" + a.ToString()); _RangeR.Formula = ""; _RangeR.Value = ""; _RangeR.NumberFormat = "@"; _RangeR.Value2 = ""; a = 1001; } } } } _Form.Close(); FileJson(_Temp, TpPlantilla.ToString()); _Form.Show(); } else { MessageBox.Show(_Message, _Title, MessageBoxButtons.OK, MessageBoxIcon.Error); } }
private void btguardar_Click(object sender, EventArgs e) { bool _Connection = new lSerializados().CheckConnection(Configuration.UrlConnection); string _Message = "No existe conexión con el servidor de datos... Contacte a un Administrador de Red para ver las opciones de conexión."; string _Title = "Conexión de Red"; if (_Connection) { _Message = (txtConcepto.Text.Trim() == "") ? "- Debe indicar concepto." : ""; _Message += (txtcelda.Text.Trim() == "") ? ((_Message.Length > 0) ? "\r\n" : "") + "- Debe indicar celda." : ""; _Message += (txtformula.Text.Trim() == "") ? ((_Message.Length > 0) ? "\r\n" : "") + "- Debe indicar fórmula." : ""; _Message += (chkCondicionar.Checked && txtCondicion.Text.Trim() == "") ? ((_Message.Length > 0) ? "\r\n" : "") + "- Debe indicar condición." : ""; if (_Message.Length > 0) { MessageBox.Show(_Message, "Información Faltante", MessageBoxButtons.OK, MessageBoxIcon.Error); return; } DialogResult _response = DialogResult.None; string Formulax = (txtcelda.Text + "=" + txtformula.Text); string condicion = ""; if (chkCondicionar.Checked) { condicion = txtCondicion.Text; } oComprobacion _Template = new oComprobacion() { IdComprobacion = Convert.ToInt32(txtNro.Text), IdTipoPlantilla = TpPlantilla,//buscar Concepto = txtConcepto.Text, Formula = Formulax, Condicion = condicion, Nota = txtNota.Text, }; if (accion == "A") { KeyValuePair <bool, string[]> _result = new lComprobacionesAdmin(_Template, accion).Add(); string _Messages = ""; foreach (string _Msg in _result.Value) { _Messages += ((_Messages.Length > 0) ? "\r\n" : "") + _Msg; } if (_result.Key && _response != DialogResult.Yes) { _Messages = "Comprobación agregada con éxito"; } MessageBox.Show(_Messages, (_result.Key) ? "Proceso Existoso" : "Información Faltante", MessageBoxButtons.OK, (_result.Key) ? MessageBoxIcon.Information : MessageBoxIcon.Exclamation); if (_result.Key) { this.Hide(); } } else if (accion == "M") { KeyValuePair <bool, string[]> _result = new lComprobacionesAdmin(_Template, accion).Update(); string _Messages = ""; foreach (string _Msg in _result.Value) { _Messages += ((_Messages.Length > 0) ? "\r\n" : "") + _Msg; } if (_result.Key && _response != DialogResult.Yes) { _Messages = "Comprobación modificada con éxito"; } MessageBox.Show(_Messages, (_result.Key) ? "Proceso Existoso" : "Información Faltante", MessageBoxButtons.OK, (_result.Key) ? MessageBoxIcon.Information : MessageBoxIcon.Exclamation); if (_result.Key) { this.Hide(); } } } else { MessageBox.Show(_Message, _Title, MessageBoxButtons.OK, MessageBoxIcon.Error); } }
private void btnEliminar_Click(object sender, EventArgs e) { bool _Connection = new lSerializados().CheckConnection(Configuration.UrlConnection); string _Message = "No existe conexión con el servidor de datos... Contacte a un Administrador de Red para ver las opciones de conexión."; string _Title = "Conexión de Red"; if (_Connection) { int Row = DtComprobaciones.CurrentCell.RowIndex; int IDcompro = Convert.ToInt32(DtComprobaciones.Rows[Row].Cells[0].Value.ToString()); oComprobacion _Comprobacion = _Comprobaciones.Where(o => o.IdComprobacion == IDcompro).FirstOrDefault(); DialogResult dialogo = MessageBox.Show("Desea eliminar fórmula número " + IDcompro.ToString() + "?", "Confirme", MessageBoxButtons.YesNo, MessageBoxIcon.Question); if (dialogo == DialogResult.Yes) { _Message = ((cmbTipo.SelectedIndex == 0) ? "- Debe seleccionar un tipo de plantilla" : ""); if (_Message.Length > 0) { MessageBox.Show(_Message, "Información Faltante", MessageBoxButtons.OK, MessageBoxIcon.Error); return; } if (_Comprobacion.AdmiteCambios == 0) { MessageBox.Show("La fórmula no puede ser eliminada ya que es un cálculo de " + cmbTipo.Text, "Eliminar", MessageBoxButtons.OK, MessageBoxIcon.Warning); return; } DialogResult _response = DialogResult.None; oComprobacion _Template = new oComprobacion() { IdComprobacion = IDcompro, IdTipoPlantilla = cmbTipo.SelectedIndex, Concepto = "", Formula = "", Condicion = "", Nota = "" }; KeyValuePair <bool, string[]> _result = new lComprobacionesAdmin(_Template, "E").Delete(); string _Messages = ""; foreach (string _Msg in _result.Value) { _Messages += ((_Messages.Length > 0) ? "\r\n" : "") + _Msg; } if (_result.Key && _response != DialogResult.Yes) { _Messages = "Fórmula eliminada con éxito"; } MessageBox.Show(_Messages, (_result.Key) ? "Proceso Existoso" : "Información Faltante", MessageBoxButtons.OK, (_result.Key) ? MessageBoxIcon.Information : MessageBoxIcon.Exclamation); if (_result.Key) { this.Hide(); } } } else { MessageBox.Show(_Message, _Title, MessageBoxButtons.OK, MessageBoxIcon.Error); } }