diff --git a/CRM/RepAcercamientosProcesos.aspx.cs b/CRM/RepAcercamientosProcesos.aspx.cs index e3e9ff01f..fe314794b 100644 --- a/CRM/RepAcercamientosProcesos.aspx.cs +++ b/CRM/RepAcercamientosProcesos.aspx.cs @@ -596,7 +596,7 @@ public partial class CRM_RepAcercamientosProcesos : ClsPaginas protected void LnkExcel_Click(object sender, EventArgs e) { - GVRepAcercamientosEtapas.ExportToExcelGembox("Reporte de Procesos de Acercamiento", UsuarioActual, "", "", "Reporte de Procesos de Acercamiento", "", -1); + GVRepAcercamientosEtapas.ExportToExcelGembox("Reporte de Procesos de Acercamiento", UsuarioActual, "", "", "Reporte de Procesos de Acercamiento"); } public override void VerifyRenderingInServerForm(Control control) diff --git a/CRM/RepAcercamientosRechazos.aspx.cs b/CRM/RepAcercamientosRechazos.aspx.cs index ea1d906c8..f2778ba18 100644 --- a/CRM/RepAcercamientosRechazos.aspx.cs +++ b/CRM/RepAcercamientosRechazos.aspx.cs @@ -579,7 +579,7 @@ public partial class CRM_RepAcercamientosRechazos : ClsPaginas protected void LnkExcel_Click(object sender, EventArgs e) { - GVRepAcercamientosEtapas.ExportToExcelGembox("Reporte de Rechazos de Acercamiento", UsuarioActual, "", "", "Reporte de Rechazos de Acercamiento", "", -1); + GVRepAcercamientosEtapas.ExportToExcelGembox("Reporte de Rechazos de Acercamiento", UsuarioActual, "", "", "Reporte de Rechazos de Acercamiento"); } public override void VerifyRenderingInServerForm(Control control) diff --git a/Contabilidad2/RepAnexoCatalogoAnual.aspx.vb b/Contabilidad2/RepAnexoCatalogoAnual.aspx.vb index 3e4e49632..a4fcaef1c 100644 --- a/Contabilidad2/RepAnexoCatalogoAnual.aspx.vb +++ b/Contabilidad2/RepAnexoCatalogoAnual.aspx.vb @@ -343,7 +343,15 @@ Partial Class Contabilidad2_RepAnexoCatalogoAnual SubProyecto = DdlSubProyecto.SelectedItem.Text End If - GvAnual.ExportToExcelGembox("AnexoCatálogoAnual", UsuarioActual, $"01/01/{DdlEjercicio.SelectedValue}", $"31/12/{DdlEjercicio2.SelectedValue}", "Anexo del Catálogo - Anual", SubProyecto, DdlDivisor.SelectedValue.ToEntero, DatoTituloExtra:=$"Periodo {DdlPeriodo.SelectedItem.Text}") + Dim SbFiltros As New StringBuilder() + SbFiltros.AppendFormat("Fecha Inicio: {0} Fecha Fin: {1}|", $"01/01/{DdlEjercicio.SelectedValue}", $"31/12/{DdlEjercicio2.SelectedValue}") + SbFiltros.AppendFormat("SubProyecto: {0}|", SubProyecto) + SbFiltros.AppendFormat("Divisor : {0}|", DdlDivisor.SelectedItem.Text) + + + + GvAnual.ExportToExcelGembox("AnexoCatálogoAnual", UsuarioActual, "Anexo del Catálogo - Anual", DatoTituloExtra:=$"Periodo{DdlPeriodo.SelectedItem.Text}", DatosFiltros:=SbFiltros.ToString()) + 'GvAnual.ExportToExcelGembox("AnexoCatálogoAnual", UsuarioActual, $"01/01/{DdlEjercicio.SelectedValue}", $"31/12/{DdlEjercicio2.SelectedValue}", "Anexo del Catálogo - Anual", SubProyecto, DdlDivisor.SelectedValue.ToEntero, DatoTituloExtra:=$"Periodo {DdlPeriodo.SelectedItem.Text}") End Sub diff --git a/Contabilidad2/RepAnexoCatalogoCC.aspx.vb b/Contabilidad2/RepAnexoCatalogoCC.aspx.vb index dbeabfa41..55871e9f4 100644 --- a/Contabilidad2/RepAnexoCatalogoCC.aspx.vb +++ b/Contabilidad2/RepAnexoCatalogoCC.aspx.vb @@ -339,7 +339,15 @@ Partial Class Contabilidad2_RepAnexoCatalogoCC SubProyecto = DdlSubProyecto.SelectedItem.Text End If - GvCC.ExportToExcelGembox("AnexoCatálogoMensual", UsuarioActual, $"01/01/{DdlEjercicio.SelectedValue}", $"31/12/{DdlEjercicio.SelectedValue}", $"Estado de Resultados Horizontal por {LblSubProyecto.Text}", SubProyecto, DdlDivisor.SelectedValue.ToEntero, DatoTituloExtra:=$"Periodo {DdlPeriodo.SelectedItem.Text}") + + Dim SbFiltros As New StringBuilder() + SbFiltros.AppendFormat("Fecha Inicio: {0} Fecha Fin: {1}|", $"01/01/{DdlEjercicio.SelectedValue}", $"31/12/{DdlEjercicio.SelectedValue}") + SbFiltros.AppendFormat("Estado de Resultados Horizontal por : {0}|", SubProyecto) + SbFiltros.AppendFormat("Divisor : {0}|", DdlDivisor.SelectedItem.Text) + + + GvCC.ExportToExcelGembox("AnexoCatálogoMensual", UsuarioActual, $"Estado de Resultados Horizontal por {LblSubProyecto.Text}", DatoTituloExtra:=$"Periodo {DdlPeriodo.SelectedItem.Text}", DatosFiltros:=SbFiltros.ToString()) + 'GvCC.ExportToExcelGembox("AnexoCatálogoMensual", UsuarioActual, $"01/01/{DdlEjercicio.SelectedValue}", $"31/12/{DdlEjercicio.SelectedValue}", $"Estado de Resultados Horizontal por {LblSubProyecto.Text}", SubProyecto, DdlDivisor.SelectedValue.ToEntero, DatoTituloExtra:=$"Periodo {DdlPeriodo.SelectedItem.Text}") End Sub diff --git a/Contabilidad2/RepAnexoCatalogoMensual.aspx.vb b/Contabilidad2/RepAnexoCatalogoMensual.aspx.vb index eccd5ea9b..ed9732f15 100644 --- a/Contabilidad2/RepAnexoCatalogoMensual.aspx.vb +++ b/Contabilidad2/RepAnexoCatalogoMensual.aspx.vb @@ -334,7 +334,13 @@ Partial Class Contabilidad2_RepAnexoCatalogoMensual SubProyecto = DdlSubProyecto.SelectedItem.Text End If - GvMensual2.ExportToExcelGembox("AnexoCatálogoMensual", UsuarioActual, $"01/01/{DdlEjercicio.SelectedValue}", $"31/12/{DdlEjercicio.SelectedValue}", "Anexo del Catálogo - Mensual", SubProyecto, DdlDivisor.SelectedValue.ToEntero, DatoTituloExtra:=$"Periodo {DdlPeriodo.SelectedItem.Text}") + Dim SbFiltros As New StringBuilder() + SbFiltros.AppendFormat("Fecha Inicio: {0} Fecha Fin: {1}|", $"01/01/{DdlEjercicio.SelectedValue}", $"31/12/{DdlEjercicio.SelectedValue}") + SbFiltros.AppendFormat("Divisor : {0}|", DdlDivisor.SelectedItem.Text) + + GvMensual2.ExportToExcelGembox("AnexoCatálogoMensual", UsuarioActual, "Anexo del Catálogo - Mensual", DatoTituloExtra:=$"Periodo {DdlPeriodo.SelectedItem.Text}", DatosFiltros:=SbFiltros.ToString()) + 'GvMensual2.ExportToExcelGembox("AnexoCatálogoMensual", UsuarioActual, $"01/01/{DdlEjercicio.SelectedValue}", $"31/12/{DdlEjercicio.SelectedValue}", "Anexo del Catálogo - Mensual", SubProyecto, DdlDivisor.SelectedValue.ToEntero, DatoTituloExtra:=$"Periodo {DdlPeriodo.SelectedItem.Text}") + End Sub diff --git a/RH/RepCursos.aspx.vb b/RH/RepCursos.aspx.vb index 8a78e8e49..1ee537f4c 100644 --- a/RH/RepCursos.aspx.vb +++ b/RH/RepCursos.aspx.vb @@ -86,7 +86,7 @@ Partial Class RH_RepCursos End Sub Protected Sub LnkExportar_Click(sender As Object, e As EventArgs) Handles LnkExportar.Click - Gv.ExportToExcelGembox("ReporteCapacitacion", UsuarioActual, "", "", "Report eCapacitación", "", 1) + Gv.ExportToExcelGembox("ReporteCapacitacion", UsuarioActual, "", "", "Report eCapacitación") End Sub Protected Sub Gv_RowDataBound(sender As Object, e As GridViewRowEventArgs)