diff --git a/App_Code/ClsBancos.vb b/App_Code/ClsBancos.vb index 81a6e7ee9..66fdf8815 100644 --- a/App_Code/ClsBancos.vb +++ b/App_Code/ClsBancos.vb @@ -1903,14 +1903,15 @@ Public Class ClsBancos Return Retorno End Function - Public Function GetIngresoEgresosDelDia(Fecha As Date, Tipo As String, CveEmpresa As Integer) As Boolean + Public Function GetIngresoEgresosDelDia(Fecha As Date, Tipo As String, CveEmpresa As Integer, Optional Opcion As Integer = -1) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Banc_IngresoEgresosDiariosGet") With SqlAdapter.SelectCommand.Parameters .Add("@Fecha", SqlDbType.Date).Value = Fecha .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa - .Add("@Tipo", SqlDbType.VarChar).Value = Tipo + .Add("@Tipo", SqlDbType.VarChar).Value = Tipo 'Ing Ingresp Egs Egreso + .Add("@Opcion", SqlDbType.VarChar).Value = Opcion ' 1 Bancos 2 caja chica End With Try diff --git a/Bancos/FlujoDiario.aspx.vb b/Bancos/FlujoDiario.aspx.vb index f1edf7256..8eab374df 100644 --- a/Bancos/FlujoDiario.aspx.vb +++ b/Bancos/FlujoDiario.aspx.vb @@ -60,21 +60,40 @@ Partial Class Bancos_FlujoDiario params.Add(New ReportParameter("LogoPath", If(Imagen.Exists, $"file://{Imagen.FullName}", ""))) + If Imagen.Exists Then + params.Add(New ReportParameter("LogoPath", $"file://{Imagen.FullName}")) + Else + params.Add(New ReportParameter("LogoPath", "")) + End If + + 'SE LLENA TmpDTSaldosIniciales Dim Ban As New ClsBancos + Dim TmpDTIngresosDelDiaCajaChica As New DataTable + Dim TmpDTGastosDelDiaCajaChica As New DataTable + If Ban.GetBancosSaldos(-1, -1, -1, MinFecha.ToString, TxtFecha.Text.ToDate.AddDays(-1).ToShortDateString, 0, "-1", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then TmpDTSaldosIniciales = Ban.DtResultados End If 'Se Llena TmpDTIngresosDelDia - If Ban.GetIngresoEgresosDelDia(TxtFecha.Text.ToDate, "Ing", UsuarioActual.CveEmpresa) Then - TmpDTIngresosDelDia = Ban.DtResultados'.FiltraParametros("CveTipoTransaccion <> 8") + If Ban.GetIngresoEgresosDelDia(TxtFecha.Text.ToDate, "Ing", UsuarioActual.CveEmpresa, 1) Then + TmpDTIngresosDelDia = Ban.DtResultados + TmpDTIngresosDelDia = Ban.DtResultados + End If + + If Ban.GetIngresoEgresosDelDia(TxtFecha.Text.ToDate, "Ing", UsuarioActual.CveEmpresa, 2) Then + TmpDTIngresosDelDiaCajaChica = Ban.DtResultados '.FiltraParametros("CveTipoTransaccion <> 8") End If 'Se Llena TmpDTGastosDelDia - If Ban.GetIngresoEgresosDelDia(TxtFecha.Text.ToDate, "Egs", UsuarioActual.CveEmpresa) Then - TmpDTGastosDelDia = Ban.DtResultados'.FiltraParametros("CveTipoTransaccion <> 2") + If Ban.GetIngresoEgresosDelDia(TxtFecha.Text.ToDate, "Egs", UsuarioActual.CveEmpresa, 1) Then + TmpDTGastosDelDia = Ban.DtResultados '.FiltraParametros("CveTipoTransaccion <> 2") + End If + + If Ban.GetIngresoEgresosDelDia(TxtFecha.Text.ToDate, "Egs", UsuarioActual.CveEmpresa, 2) Then + TmpDTGastosDelDiaCajaChica = Ban.DtResultados '.FiltraParametros("CveTipoTransaccion <> 2") End If 'Se Llena TmpDTSaldosActuales @@ -91,10 +110,15 @@ Partial Class Bancos_FlujoDiario Dim rds5 As New ReportDataSource With {.Name = "DataSet5", .Value = If(TmpDTGastosDelDia IsNot Nothing, TmpDTGastosDelDia, New DataTable)} Dim rds4 As New ReportDataSource With {.Name = "DataSet4", .Value = If(TmpDTSaldosActuales IsNot Nothing, TmpDTSaldosActuales, New DataTable)} + Dim rds6 As New ReportDataSource With {.Name = "DataSet6", .Value = If(TmpDTIngresosDelDiaCajaChica IsNot Nothing, TmpDTIngresosDelDiaCajaChica, New DataTable)} + Dim rds7 As New ReportDataSource With {.Name = "DataSet7", .Value = If(TmpDTGastosDelDiaCajaChica IsNot Nothing, TmpDTGastosDelDiaCajaChica, New DataTable)} + lrds.Add(rds) lrds.Add(rds2) lrds.Add(rds3) lrds.Add(rds4) + lrds.Add(rds6) + lrds.Add(rds7) 'lrds.Add(rds5)- diff --git a/Compras/Proveedores.aspx b/Compras/Proveedores.aspx index 9d79517f9..0d80e1b2d 100644 --- a/Compras/Proveedores.aspx +++ b/Compras/Proveedores.aspx @@ -1247,8 +1247,7 @@
- - +
@@ -1257,6 +1256,10 @@ + + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> + @@ -1267,11 +1270,7 @@
-
-
- " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> -
+
@@ -1783,9 +1782,7 @@
- - - +
@@ -1794,6 +1791,10 @@ + + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> + @@ -1805,8 +1806,7 @@
- " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
- - - +
@@ -1877,6 +1875,10 @@ + + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> + @@ -1888,8 +1890,7 @@
- " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
@@ -1957,10 +1958,7 @@ -
- - - +
@@ -1969,6 +1967,11 @@ + + + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> + @@ -2082,9 +2085,7 @@
- - - +
@@ -2093,6 +2094,10 @@ + + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> + @@ -2103,11 +2108,7 @@
-
-
- " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> -
+
@@ -2197,6 +2198,10 @@ + + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> + @@ -2208,8 +2213,7 @@
- " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
diff --git a/CxC/RepCxCDetalle.aspx b/CxC/RepCxCDetalle.aspx index 694f59a17..4bf3cb25c 100644 --- a/CxC/RepCxCDetalle.aspx +++ b/CxC/RepCxCDetalle.aspx @@ -39,7 +39,7 @@ Excel
  • - Generar Excel Personalizado + Generar Excel Personalizado
  • Personalizar Columnas @@ -545,7 +545,7 @@ - + diff --git a/CxC/RepCxCDetalle.aspx.vb b/CxC/RepCxCDetalle.aspx.vb index 4edcd7ef5..004b76845 100644 --- a/CxC/RepCxCDetalle.aspx.vb +++ b/CxC/RepCxCDetalle.aspx.vb @@ -896,50 +896,72 @@ Partial Class RepCxCDetalle Protected Sub ImgExcel_Click(sender As Object, e As System.EventArgs) Handles ImgExcel.Click GenerarImpresion("EXCEL") End Sub - Private Sub ImgExcelPersonalizado_Click(sender As Object, e As EventArgs) Handles ImgExcelPersonalizado.Click - SpreadsheetInfo.SetLicense(SerialGemBoxSpreadsheet()) - - Dim ef As ExcelFile = New ExcelFile - Dim ws As ExcelWorksheet = ef.Worksheets.Add("DataTable to Sheet") - Dim dt As DataTable = New DataTable - Dim response As HttpResponse = Me.Response - - 'Recorrer columnas - For index = 0 To GvDatos.Columns.Count - 1 - If GvDatos.Columns(index).Visible Then - dt.Columns.Add(GvDatos.Columns(index).HeaderText) - End If - Next - - 'Recorrer filas - For Each fila As GridViewRow In GvDatos.Rows - Dim dr As DataRow = dt.NewRow() - - For index = 0 To GvDatos.Columns.Count - 1 - If GvDatos.Columns(index).Visible Then - If TypeOf GvDatos.Columns(index) Is TemplateField Then - If GvDatos.Columns(index).HeaderText = "Folio" Then - dr(GvDatos.Columns(index).HeaderText) = fila.FCHyperLink("HlFolio").Text.Replace(" ", "") - End If - ElseIf TypeOf GvDatos.Columns(index) Is HyperLinkField Then - dr(GvDatos.Columns(index).HeaderText) = DirectCast(fila.Cells(index).Controls(0), HyperLink).Text.Replace(" ", "") - Else - dr(GvDatos.Columns(index).HeaderText) = fila.Cells(index).Text.Replace(" ", "") - End If - End If - Next - dt.Rows.Add(dr) - Next - - ' Insert DataTable into an Excel worksheet. - ws.InsertDataTable(dt, - New InsertDataTableOptions() With - { - .ColumnHeaders = True, - .StartRow = 1 - }) - - ef.Save(response, "RepCxC.xlsx") + Private Sub ImgExcelPersonalizado_Click(sender As Object, e As EventArgs) Handles ImgExcelPersonalizado.Click + + Dim Cliente = If(DdlClientesWS.SelectedValue = "-1", "", $" Cliente: {DdlClientesWS.SelectedText}") + Dim Sucursal = If(DdlSubProyecto.SelectedValue = "-1", "", $" Sucursal: {DdlSubProyecto.SelectedItem.Text}") + Dim Grupo = $" Agrupado Por: {DdlGrupo.SelectedItem.Text}" 'If(DdlGrupo.SelectedValue = "3", "", $" Agrupado Por: {DdlGrupo.SelectedItem.Text}") + Dim TipoDocto = If(DdlTipoDocto.GetSelectedText = "", "", $" Documentos: {DdlTipoDocto.GetSelectedText}") + Dim Vendedor = If(DdlVendedor.SelectedValue = "-1", "", $" Vendedor: {DdlVendedor.SelectedItem.Text}") + Dim FechaIn As String = If(txtFechaI.Text = "", "", $" Fecha Inicio Docto: {txtFechaI.Text}") + Dim FechaFn As String = If(txtFechaF.Text = "", "", $" Fecha Fin Docto: {txtFechaF.Text}") + Dim FVI As String = If(txtFechaVI.Text = "", "", $" Fecha Venc. Inic.: {txtFechaVI.Text}") + Dim FVF As String = If(txtFechaVF.Text = "", "", $" Fecha Venc. Final: ;{txtFechaVF.Text}") + Dim Registro = If(DdlUsuario.SelectedValue = "-1", "", $" Registró: ;{DdlUsuario.SelectedItem.Text}") + Dim Responsable = If(DdlResponsable.SelectedValue = "-1", "", $" Responsable: ;{DdlResponsable.SelectedItem.Text}") + Dim EstatusCob = If(DdlCobranzaEstatusFiltro.SelectedValue = "-1", "", $"status Cobranza: ;{DdlCobranzaEstatusFiltro.SelectedItem.Text}") + Dim CorteA As String = If(txtCorteA.Text = "31/12/2019", "", $"Corte A {txtCorteA.Text}") + Dim ClasificacionCli = If(DdlClienteClasificacion.SelectedValue = "-1", "", $" Clasificación Cliente: {DdlClienteClasificacion.SelectedItem.Text}") + + Dim Filtro As String = $"{Cliente}{Sucursal}{Grupo}{Vendedor}{FechaIn}{FechaFn}{Registro}{Responsable}{TipoDocto}{EstatusCob}{FVI}{FVF}{ClasificacionCli}{CorteA}" + + ExportToExcelGembox(GvDatos, "ReporteCxCDetalle", UsuarioActual, "REPORTE DE CUENTAS POR COBRAR DEL CLIENTE CON DETALLE", DatoTituloExtra:=$"", DatosFiltros:=Filtro) + 'GvDatos.ExportToExcelG("ReporteCxCDetalle", "REPORTE DE CUENTAS POR COBRAR DEL CLIENTE CON DETALLE", UsuarioActual, Filtro) + + 'SpreadsheetInfo.SetLicense(SerialGemBoxSpreadsheet()) + + 'Dim ef As ExcelFile = New ExcelFile + 'Dim ws As ExcelWorksheet = ef.Worksheets.Add("DataTable to Sheet") + 'Dim dt As DataTable = New DataTable + 'Dim response As HttpResponse = Me.Response + + ''Recorrer columnas + 'For index = 0 To GvDatos.Columns.Count - 1 + ' If GvDatos.Columns(index).Visible Then + ' dt.Columns.Add(GvDatos.Columns(index).HeaderText) + ' End If + 'Next + + ''Recorrer filas + 'For Each fila As GridViewRow In GvDatos.Rows + ' Dim dr As DataRow = dt.NewRow() + + ' For index = 0 To GvDatos.Columns.Count - 1 + ' If GvDatos.Columns(index).Visible Then + ' If TypeOf GvDatos.Columns(index) Is TemplateField Then + ' If GvDatos.Columns(index).HeaderText = "Folio" Then + ' dr(GvDatos.Columns(index).HeaderText) = fila.FCHyperLink("HlFolio").Text.Replace(" ", "") + ' End If + ' ElseIf TypeOf GvDatos.Columns(index) Is HyperLinkField Then + ' dr(GvDatos.Columns(index).HeaderText) = DirectCast(fila.Cells(index).Controls(0), HyperLink).Text.Replace(" ", "") + ' Else + ' dr(GvDatos.Columns(index).HeaderText) = fila.Cells(index).Text.Replace(" ", "") + ' End If + ' End If + ' Next + ' dt.Rows.Add(dr) + 'Next + + '' Insert DataTable into an Excel worksheet. + 'ws.InsertDataTable(dt, + ' New InsertDataTableOptions() With + ' { + ' .ColumnHeaders = True, + ' .StartRow = 1 + ' }) + + 'ef.Save(response, "RepCxC.xlsx") + End Sub Private Sub GenerarImpresion(Optional TipoImpresion As String = "PDF") @@ -953,8 +975,8 @@ Partial Class RepCxCDetalle TCEspecifico = TxtEspecifico.Text.ToDouble Else TCEspecifico = -1 - End If - + End If + Dim Cliente = If(DdlClientesWS.SelectedValue = "-1", "", $" Cliente: {DdlClientesWS.SelectedText}") Dim Sucursal = If(DdlSubProyecto.SelectedValue = "-1", "", $" Sucursal: {DdlSubProyecto.SelectedItem.Text}") Dim Grupo = $" Agrupado Por: {DdlGrupo.SelectedItem.Text}" 'If(DdlGrupo.SelectedValue = "3", "", $" Agrupado Por: {DdlGrupo.SelectedItem.Text}") @@ -968,8 +990,8 @@ Partial Class RepCxCDetalle Dim Responsable = If(DdlResponsable.SelectedValue = "-1", "", $" Responsable: {DdlResponsable.SelectedItem.Text}") Dim EstatusCob = If(DdlCobranzaEstatusFiltro.SelectedValue = "-1", "", $" Estatus Cobranza: {DdlCobranzaEstatusFiltro.SelectedItem.Text}") Dim CorteA As String = If(txtCorteA.Text = "31/12/2019", "", $" Corte A: {txtCorteA.Text}") - Dim ClasificacionCli = If(DdlClienteClasificacion.SelectedValue = "-1", "", $" Clasificación Cliente: {DdlClienteClasificacion.SelectedItem.Text}") - + Dim ClasificacionCli = If(DdlClienteClasificacion.SelectedValue = "-1", "", $" Clasificación Cliente: {DdlClienteClasificacion.SelectedItem.Text}") + Dim TituloReporte As String = "REPORTE DE CUENTAS POR COBRAR DEL CLIENTE CON DETALLE" 'If UsuarioActual.CveEmpresa = 72 Then ' TituloReporte = "Antigüedad de Saldos de Clientes" @@ -1150,4 +1172,220 @@ Partial Class RepCxCDetalle #End Region + + Public Overrides Sub VerifyRenderingInServerForm(ByVal control As Control) + End Sub + + + Public Sub ExportToExcelGembox(GridView As GridView, NombreArchivoXLSx As String, Usuario As Usuario, Titulo As String, Optional DatoTituloExtra As String = "", Optional DatosFiltros As String = "", Optional AnchoImagen As Integer = 100, Optional AlturaImagen As Integer = 100, Optional DTExtra As DataTable = Nothing) + + Dim sw1 As New StringWriter() + Dim htw1 As New HtmlTextWriter(sw1) + GridView.RenderControl(htw1) + + Dim options = GemBox.Spreadsheet.LoadOptions.HtmlDefault + + Dim htmlStream1 = New MemoryStream(options.Encoding.GetBytes(sw1.ToString())) + + htmlStream1.Position = 0 + Dim sr1 As New StreamReader(htmlStream1) + Dim myStr1 = sr1.ReadToEnd() + sr1.Dispose() + htmlStream1.Dispose() + sw1.Dispose() + + Dim HtmlCompleto As String = myStr1 + + HtmlCompleto = Regex.Replace(HtmlCompleto, "\<[\/]*a[^\>]*\>", "") + + Dim htmlStream5 = New MemoryStream(options.Encoding.GetBytes(HtmlCompleto)) + + GemBox.Spreadsheet.SpreadsheetInfo.SetLicense(SerialGemBoxSpreadsheet) + + Dim excel As GemBox.Spreadsheet.ExcelFile + + excel = GemBox.Spreadsheet.ExcelFile.Load(htmlStream5, options) + + If Usuario IsNot Nothing Then + + Dim TotalRowHeader As Integer = 6 + Dim TotalRowFooter As Integer = 2 + + + Dim worksheet = excel.Worksheets(0) + worksheet.Rows.InsertEmpty(0, TotalRowHeader) + Dim celdasConTexto = worksheet.GetUsedCellRange(True) + If celdasConTexto Is Nothing Then Exit Sub 'No se recuperaron datos, salir de sin guardar porque soltará error + celdasConTexto.Style.Font.Name = "Calibri Light" + + Dim RangoNombreEmpresa = worksheet.Cells.GetSubrangeAbsolute(1, celdasConTexto.FirstColumnIndex, 1, celdasConTexto.LastColumnIndex) + RangoNombreEmpresa.Merged = True + RangoNombreEmpresa.Value = Usuario.Empresa.Empresa + RangoNombreEmpresa.Style.Font.Size = 18 * 20 + RangoNombreEmpresa.Style.Font.Name = "Calibri Light" + RangoNombreEmpresa.Style.HorizontalAlignment = GemBox.Spreadsheet.HorizontalAlignmentStyle.Center + RangoNombreEmpresa.Style.VerticalAlignment = GemBox.Spreadsheet.VerticalAlignmentStyle.Center + + + Dim RangoTitulo = worksheet.Cells.GetSubrangeAbsolute(3, celdasConTexto.FirstColumnIndex, 3, celdasConTexto.LastColumnIndex) + RangoTitulo.Merged = True + RangoTitulo.Value = Titulo + RangoTitulo.Style.Font.Size = 20 * 20 + RangoTitulo.Style.Font.Name = "Calibri Light" + RangoTitulo.Style.HorizontalAlignment = GemBox.Spreadsheet.HorizontalAlignmentStyle.Center + RangoTitulo.Style.VerticalAlignment = GemBox.Spreadsheet.VerticalAlignmentStyle.Center + + If DatoTituloExtra.Length > 0 Then + Dim RangoDatoTituloExtra = worksheet.Cells.GetSubrangeAbsolute(TotalRowHeader, celdasConTexto.FirstColumnIndex, TotalRowHeader, celdasConTexto.LastColumnIndex) + RangoDatoTituloExtra.Merged = True + RangoDatoTituloExtra.Value = DatoTituloExtra + RangoDatoTituloExtra.Style.Font.Size = 20 * 20 + RangoDatoTituloExtra.Style.Font.Name = "Calibri Light" + RangoDatoTituloExtra.Style.HorizontalAlignment = GemBox.Spreadsheet.HorizontalAlignmentStyle.Left + RangoDatoTituloExtra.Style.VerticalAlignment = GemBox.Spreadsheet.VerticalAlignmentStyle.Center + + End If + + If DatosFiltros.Length > 0 Then + + Dim Arreglo As String() = DatosFiltros.Split("|"c) + worksheet.Rows.InsertEmpty(TotalRowHeader, Arreglo.Count) + For Each TextoFiltro As String In Arreglo + Dim RangoDatoTituloExtra = worksheet.Cells.GetSubrangeAbsolute(TotalRowHeader, celdasConTexto.FirstColumnIndex, TotalRowHeader, celdasConTexto.LastColumnIndex) + RangoDatoTituloExtra.Merged = True + RangoDatoTituloExtra.Value = TextoFiltro + RangoDatoTituloExtra.Style.Font.Size = 12 * 20 + RangoDatoTituloExtra.Style.Font.Name = "Calibri Light" + RangoDatoTituloExtra.Style.HorizontalAlignment = GemBox.Spreadsheet.HorizontalAlignmentStyle.Left + RangoDatoTituloExtra.Style.VerticalAlignment = GemBox.Spreadsheet.VerticalAlignmentStyle.Center + TotalRowHeader += 1 + + Next + End If + + ' TotalRowHeader += 2 + + For i = celdasConTexto.FirstColumnIndex To celdasConTexto.LastColumnIndex + + worksheet.Rows(TotalRowHeader).Cells(i).Style.Font.Size = 12 * 20 + worksheet.Rows(TotalRowHeader).Cells(i).Style.HorizontalAlignment = GemBox.Spreadsheet.HorizontalAlignmentStyle.Center + worksheet.Rows(TotalRowHeader).Cells(i).Style.VerticalAlignment = GemBox.Spreadsheet.VerticalAlignmentStyle.Center + + worksheet.Rows(TotalRowHeader).Cells(i).Style.FillPattern.SetPattern(GemBox.Spreadsheet.FillPatternStyle.Solid, GemBox.Spreadsheet.SpreadsheetColor.FromArgb(75, 119, 190), GemBox.Spreadsheet.SpreadsheetColor.FromArgb(255, 255, 255)) + worksheet.Rows(TotalRowHeader).Cells(i).Style.Font.Color = GemBox.Spreadsheet.SpreadsheetColor.FromArgb(255, 255, 255) + + If i > 0 Then + Try + worksheet.Columns(i).AutoFit(1) + Catch ex As Exception + End Try + End If + + Next + + Dim IndexEndTable As Integer = GridView.Rows.Count + TotalRowHeader + TotalRowFooter + + worksheet.Rows(IndexEndTable).Cells(1).Value = "Usuario Imprimió" + worksheet.Rows(IndexEndTable + 1).Cells(1).Value = Usuario.Nombre + + worksheet.Rows(IndexEndTable).Cells(3).Value = "Fecha Impresión" + worksheet.Rows(IndexEndTable + 1).Cells(3).Value = DateTime.Now.ToString("dd/MM/yyyy") + + Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", Usuario.Empresa.Ruta)) + + If Imagen.Exists Then + Dim Ruta As String = String.Format("{0}/Logo.png", Usuario.Empresa.Ruta) + Using sr As New StreamReader(Ruta) + Dim ms As New MemoryStream() + sr.BaseStream.CopyTo(ms) + worksheet.Pictures.Add(ms, ExcelPictureFormat.Png, "A1", AnchoImagen, AlturaImagen, LengthUnit.Pixel) + End Using + End If + + + For I = celdasConTexto.FirstColumnIndex To celdasConTexto.LastColumnIndex - 2 + + If I > 0 Then + + If 1 = 1 Then + worksheet.Columns(I + 1).Style.NumberFormat = "#,##0.00" + Else + worksheet.Columns(I + 1).Style.NumberFormat = "#,##" + End If + + Try + worksheet.Columns(I).AutoFit(1) + Catch ex As Exception + End Try + + End If + Next + + + + If DTExtra IsNot Nothing Then + + Dim NombreTabla As String = "" + + If DTExtra.TableName IsNot Nothing Then + NombreTabla = DTExtra.TableName + End If + + If NombreTabla.Trim = "" Then + NombreTabla = "hoja2" + End If + + 'excel.Worksheets.Add(NombreTabla) + + Dim workbookDTExtra = New ExcelFile + Dim worksheetDTExtra = workbookDTExtra.Worksheets.Add(NombreTabla) + + + worksheetDTExtra.InsertDataTable(DTExtra, + New InsertDataTableOptions() With + { + .ColumnHeaders = True, + .StartRow = 0 + }) + + + + Dim columnCount = worksheetDTExtra.CalculateMaxUsedColumns() + For i As Integer = 0 To columnCount - 1 + worksheetDTExtra.Columns(i).AutoFit(1, worksheetDTExtra.Rows(1), worksheetDTExtra.Rows(worksheetDTExtra.Rows.Count - 1)) + worksheetDTExtra.Cells(0, i).Style.FillPattern.SetSolid(Drawing.ColorTranslator.FromHtml("#4b77be")) + worksheetDTExtra.Cells(0, i).Style.Font.Color = GemBox.Spreadsheet.SpreadsheetColor.FromArgb(255, 255, 255) + + Next + + + excel.Worksheets.AddCopy(NombreTabla, worksheetDTExtra) + excel.Worksheets(0).Name = Titulo + + + + End If + + + + Dim indexRow As Integer = 8 + + + For indexRow = 8 To worksheet.Rows.Count - 4 + + If worksheet.Cells(indexRow, 0).Value.ToString.Trim = "" Then + worksheet.Cells.GetSubrangeRelative(indexRow, 0, celdasConTexto.LastColumnIndex + 1, 1).Style.FillPattern.SetSolid(Drawing.ColorTranslator.FromHtml("#c0c0c0")) + End If + + Next + + + End If + + excel.Save(HttpContext.Current.Response, $"{NombreArchivoXLSx}.xlsx") + + + End Sub + + End Class diff --git a/Empresas/119/Formatos/RepCxCDetalle.rdlc b/Empresas/119/Formatos/RepCxCDetalle.rdlc index 43ee63af5..80cf87f75 100644 --- a/Empresas/119/Formatos/RepCxCDetalle.rdlc +++ b/Empresas/119/Formatos/RepCxCDetalle.rdlc @@ -1,1967 +1,5 @@  - - - - - - - - 0.8791cm - - - 5.43111cm - - - 2.01211cm - - - 1.97083cm - - - 2.16822cm - - - 2.23839cm - - - 2.34184cm - - - 1.36229cm - - - 1.55364cm - - - 1.29043cm - - - 1.33583cm - - - 1.29092cm - - - 2.5cm - - - - - 0.49417cm - - - - - true - true - - - - - Tipo - - - - - - - Textbox3 - - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - Silver - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Nombre - - - - - - - Textbox13 - - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - Silver - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Fecha - - - - - - - Textbox4 - - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - Silver - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Fecha Venc - - - - - - - Textbox23 - - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - Silver - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Folio - - - - - - - Textbox12 - - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - Silver - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Total - - - - - - - Textbox14 - - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - Silver - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Saldo - - - - - - - Textbox16 - - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - Silver - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Mon - - - - - - - Textbox26 - - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - Silver - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Sucursal - - - - - - - Textbox18 - - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - Silver - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Dias V - - - - - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - Silver - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Dias T - - - - - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - Silver - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Código - - - - - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - Silver - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Vendedor - - - - - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - - Black - - 1pt - - Silver - 2pt - 2pt - 2pt - 2pt - - - - - - - - 0.41479cm - - - - - true - true - - - - - - - - - - - - TipoDocto - - - =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - - - - - - - - Textbox15 - - - =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Microsoft.VisualBasic.Interaction.IIF(Fields!Fecha.Value Is Nothing, "Cantidad:", Fields!Fecha.Value) - - - - - - - Fecha2 - - - =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - - - - - - - - Textbox24 - - - =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!SerieFolio.Value - - - - - - - SerieFolio4 - - - =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!Total.Value - - - - - - - Total2 - - - =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!Saldo.Value - - - - - - - Saldo2 - - - =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - - - - - - - - Textbox27 - - - =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Microsoft.VisualBasic.Interaction.IIF(Fields!SubProyecto.Value = "", "Total", Fields!SubProyecto.Value) - - - - - - =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) - 2pt - 2pt - 2pt - 2pt - - - 4 - - - - - - - - - true - true - - - - - - - - - - - =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) - 2pt - 2pt - 2pt - 2pt - - - - - - - - 0.36363cm - - - - - true - true - - - - - =Fields!TipoDocto.Value - - - - - - - TipoDocto1 - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - - - - - =Fields!Nombre.Value - - - - - - - Nombre - - - 2pt - 2pt - 2pt - 2pt - - - true - - - - - - true - true - - - - - =Fields!Fecha.Value - - - - - - - Fecha1 - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!FechaVencimiento.Value - - - - - - - FechaVencimiento - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!SerieFolio.Value - - - - - - - SerieFolio1 - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!Total.Value - - - - - - - Total1 - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!Saldo.Value - - - - - - - Saldo - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!Moneda.Value - - - - - - - Moneda - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!SubProyecto.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!DiasVencidos.Value - - - - - - - DiasVencidos1 - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!DiasTranscurridos.Value - - - - - - - DiasTranscurridos - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!Codigo.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!Vendedor.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - - - - - - - - - - - - - - - - - - - - - - After - - - - - - - =iif(Fields!Fecha.Value IS NOTHING, false, true) - - - - - =iif(Fields!Fecha.Value IS NOTHING, True, False) - - - - - - - true - true - DataSet1 - 0.15021cm - 0.0635cm - 1.27259cm - 26.37471cm - - - - - - 0.78933in - - - - - - - Textbox1 - 0.18521cm - 7.41726cm - 0.6cm - 13.02632cm - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!TituloReporte.Value - - - - - - - Textbox2 - 0.94396cm - 7.41726cm - 0.52945cm - 13.02632cm - 1 - - - 2pt - 2pt - 2pt - 2pt - - - - External - =Parameters!LogoPath.Value - FitProportional - 0.0635cm - 1.87966cm - 3.21028cm - 2 - - - - - - true - true - - - - - =Parameters!AgrupadoPor.Value - HTML - - - 2pt - 2pt - 2pt - 2pt - - - - 2.85333cm - 0.0635cm - 0cm - 26.34825cm - 4 - - - - - - - - - - - 0.68792cm - true - true - - - true - true - - - - - ="Página " & Globals.PageNumber & " de " & Globals.TotalPages - - - - - - - Textbox3 - 0.20991cm - 23.83501cm - 0.40039cm - 2.35691cm - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Usuario: - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!UsuarioImprimio.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Fecha Impresión: - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Globals!ExecutionTime - - - - - - 2pt - 2pt - 2pt - 2pt - - - - 0.11642cm - 0.0635cm - 0cm - 26.34825cm - 5 - - - - - - - - - - 21.59cm - 27.94cm - 0.5cm - 0.5cm - 0.5cm - 0.5cm - 0.13cm - + + + + + + Textbox3 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Nombre + + + + + + + Textbox13 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Fecha + + + + + + + Textbox4 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + F. Venc. + + + + + + + Textbox23 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Folio + + + + + + + Textbox12 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Total + + + + + + + Textbox14 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Saldo + + + + + + + Textbox16 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Mon + + + + + + + Textbox26 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Sucursal + + + + + + + Textbox18 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Dias V + + + + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Dias T + + + + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Código + + + + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Vendedor + + + + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Linea A. + + + + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + Silver + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.36187cm + + + + + true + true + + + + + + + + + + + + TipoDocto + + + =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) + + + + + + + + true + true + + + + + + + + + + + + Textbox15 + + + =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) + + + + + + + + true + true + + + + + =Microsoft.VisualBasic.Interaction.IIF(Fields!Fecha.Value Is Nothing, "Cantidad:", Fields!Fecha.Value) + + + + + + + Fecha2 + + + =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) + + + + + + + + true + true + + + + + + + + + + + + Textbox24 + + + =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) + + + + + + + + true + true + + + + + =Fields!SerieFolio.Value + + + + + + + SerieFolio4 + + + =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) + + + + + + + + true + true + + + + + =Fields!Total.Value + + + + + + + Total2 + + + =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) + + + + + + + + true + true + + + + + =Fields!Saldo.Value + + + + + + + Saldo2 + + + =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) + + + + + + + + true + true + + + + + + + + + + + + Textbox27 + + + =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) + + + + + + + + true + true + + + + + =Microsoft.VisualBasic.Interaction.IIF(Fields!SubProyecto.Value = "", "Total", Fields!SubProyecto.Value) + + + + + + =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) + + + 4 + + + + + + + + + true + true + + + + + + + + + + + =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) + + + + + + + + true + true + + + + + + + + + + + =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) + + + + + + + + 0.36363cm + + + + + true + true + + + + + =Fields!TipoDocto.Value + + + + + + + TipoDocto1 + + + + + + + + + + true + true + + + + + =Fields!Nombre.Value + + + + + + + Nombre + + + + + + + + + + true + true + + + + + =Fields!Fecha.Value + + + + + + + Fecha1 + + + + + + + + + + true + true + + + + + =Fields!FechaVencimiento.Value + + + + + + + FechaVencimiento + + + + + + + + + + true + true + + + + + =Fields!SerieFolio.Value + + + + + + + SerieFolio1 + + + + + + + + + + true + true + + + + + =Fields!Total.Value + + + + + + + Total1 + + + + + + + + + + true + true + + + + + =Fields!Saldo.Value + + + + + + + Saldo + + + + + + + + + + true + true + + + + + =Fields!Moneda.Value + + + + + + + Moneda + + + + + + + + + + true + true + + + + + =Fields!SubProyecto.Value + + + + + + + + + + + + + true + true + + + + + =Fields!DiasVencidos.Value + + + + + + + DiasVencidos1 + + + + + + + + + + true + true + + + + + =Fields!DiasTranscurridos.Value + + + + + + + DiasTranscurridos + + + + + + + + + + true + true + + + + + =Fields!Codigo.Value + + + + + + + + + + + + + true + true + + + + + =Fields!Vendedor.Value + + + + + + + + + + + + + true + true + + + + + =Fields!LineaAdicional.Value + + + + + + + LineaAdicional + + + =iif(Fields!SubProyecto.Value= "", "#67809F" , iif(Fields!Fecha.Value= "", "LightGrey", "No Color")) + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + After + + + + + + + =iif(Fields!Fecha.Value IS NOTHING, false, true) + + + + + =iif(Fields!Fecha.Value IS NOTHING, True, False) + + + + + + + true + true + DataSet1 + 0.15021cm + 0.0635cm + 1.21967cm + 26.34825cm + + + + + + 0.53932in + + + + + + + Textbox1 + 0.18521cm + 7.41726cm + 0.6cm + 13.02632cm + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!TituloReporte.Value + + + + + + + Textbox2 + 0.94396cm + 7.41726cm + 0.52945cm + 13.02632cm + 1 + + + 2pt + 2pt + 2pt + 2pt + + + + External + =Parameters!LogoPath.Value + FitProportional + 0.0635cm + 1.87966cm + 3.21028cm + 2 + + + + + + true + true + + + + + =Parameters!AgrupadoPor.Value + HTML + + + 2pt + 2pt + 2pt + 2pt + + + + 2.85333cm + 0.0635cm + 0cm + 26.34825cm + 4 + + + + + + + + + + + 0.68792cm + true + true + + + true + true + + + + + ="Página " & Globals.PageNumber & " de " & Globals.TotalPages + + + + + + + Textbox3 + 0.20991cm + 23.83501cm + 0.40039cm + 2.35691cm + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Usuario: + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!UsuarioImprimio.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Fecha Impresión: + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Globals!ExecutionTime + + + + + + 2pt + 2pt + 2pt + 2pt + + + + 0.11642cm + 0.0635cm + 0cm + 26.34825cm + 5 + + + + + + + + + + 21.59cm + 27.94cm + 0.5cm + 0.5cm + 0.5cm + 0.5cm + 0.13cm + - - - - - - - 1pt - - - - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Pesos - - - - - - - Textbox6 - - - - - 1pt - - - - - - - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Dólares - - - - - - - Textbox13 - - - - - 1pt - - - - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - 0.49417cm - - - - - true - true - - - - - =Fields!Banco.Value - - - - - - - - 1pt - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =IIF(Fields!Moneda.Value = "Pesos", Fields!Saldo.Value, "") - - - - - - - Saldo - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =IIF(Fields!Moneda.Value = "Dólares", Fields!Saldo.Value, "") - - - - - - - Saldo1 - - - - - 1pt - - 2pt - 2pt - 2pt - 2pt - - - - - - - - 0.6cm - - - - - true - true - - - - - SALDOS - - - - - - - - 1pt - - - - 1pt - - - - 1pt - - - - 1pt - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!Saldo.Value - - - - - - - Saldo2 - - - - - 1pt - - - - 1pt - - - - 1pt - - - - 1pt - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =SUM(IIF(Fields!Moneda.Value = "Dólares" AND Fields!CveCuenta.Value = "-1", CDbl(Fields!Saldo.Value), 0)) - - - - - - - Saldo3 - - - - - 1pt - - - - 1pt - - - - 1pt - - - - 1pt - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - - - - - - - - - - - - After - - - - - =IIF(Fields!Banco.Value = "", TRUE,FALSE) - - - - Before - - - - DataSet1 - 0.17639cm - 0.08599cm - 1.69417cm - 17.21559cm - - - - - - - - - 10.07247cm - - - 3.47235cm - - - 3.71048cm - - - - - 0.6cm - - - - - true - true - - - - - INGRESOS DEL DIA - - - - - - - - 1pt - - - - 1pt - - - - 1pt - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Pesos - - - - - - - Textbox22 - - - - - 1pt - - - - 1pt - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Dólares - - - - - - - Textbox23 - - - - - 1pt - - - - 1pt - - - - 1pt - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - 0.52062cm - - - - - true - true - - - - - =Fields!PagueseA.Value - - - - - - - - 1pt - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Pesos", Fields!Importe.Value, "") - - - - - - - Saldo - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Dólares", Fields!Importe.Value, "") - - - - - - - Importe - - - - - 1pt - - 2pt - 2pt - 2pt - 2pt - - - - - - - - 0.6cm - - - - - true - true - - - - - TOTAL INGRESOS - - - - - - - - 1pt - - - - 1pt - - - - 1pt - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =SUM(IIF(Fields!Moneda.Value = "Pesos", CDbl(Fields!Importe.Value), 0)) - - - - - - - Textbox25 - - - - - 1pt - - - - 1pt - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =SUM(IIF(Fields!Moneda.Value = "Dólares", CDbl(Fields!Importe.Value), 0)) - - - - - - - Textbox26 - - - - - 1pt - - - - 1pt - - - - 1pt - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - - - - - - - - - - - - After - - - - - - Before - - - - DataSet2 - 2.08222cm - 0.08599cm - 1.72062cm - 17.25529cm - 1 - - - - - - - - - 10.09232cm - - - 3.4525cm - - - 3.71048cm - - - - - 0.6cm - - - - - true - true - - - - - GASTOS DEL DÍA - - - - - - - - 1pt - - - 1pt - - - 1pt - - - - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Pesos - - - - - - - Textbox6 - - - - - 1pt - - - 1pt - - - - - - - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Dólares - - - - - - - Textbox13 - - - - - 1pt - - - 1pt - - - - - - 1pt - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - 0.49417cm - - - - - true - true - - - - - =Fields!PagueseA.Value - - - - - - - - 1pt - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Pesos", Fields!Importe.Value, "") - - - - - - - Saldo - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Dólares", Fields!Importe.Value, "") - - - - - - - Saldo1 - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - 0.6cm - - - - - true - true - - - - - TOTAL GASTOS - - - - - - - 1pt - - - 1pt - - - 1pt - - - - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =SUM(IIF(Fields!Moneda.Value = "Pesos", CDbl(Fields!Importe.Value), 0)) - - - - - - - Saldo2 - - - - - - - - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =SUM(IIF(Fields!Moneda.Value = "Dólares", CDbl(Fields!Importe.Value), 0)) - - - - - - - Saldo3 - - - - - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - - - - - - - - - - - - After - - - - - - Before - - - - DataSet3 - 4.05351cm - 0.06614cm - 1.69417cm - 17.25529cm - 2 - - - - - - - - - 10.09232cm - - - 3.43265cm - - - 3.69063cm - - - - - 0.6cm - - - - - true - true - - - - - SALDO AL CIERRE - - - - - - - 1pt - - - 1pt - - - 1pt - - - - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Pesos - - - - - - - Textbox6 - - - - 1pt - - - 1pt - - - - - - - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Dólares - - - - - - - Textbox13 - - - - - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - 0.49417cm - - - - - true - true - - - - - =Fields!Banco.Value - - - - - - - - 1pt - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Pesos", Fields!Saldo.Value, "") - - - - - - - Saldo - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Dólares", Fields!Saldo.Value, "") - - - - - - - Saldo1 - - - - - 1pt - - 2pt - 2pt - 2pt - 2pt - - - - - - - - 0.6cm - - - - - true - true - - - - - SALDOS - - - - - - - 1pt - - - 1pt - - - 1pt - - - - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!Saldo.Value - - - - - - - Saldo2 - - - - - - - - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Sum(Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Dólares" And Fields!CveCuenta.Value = "-1", CDbl(Fields!Saldo.Value), 0)) - - - - - - - Saldo3 - - - - 1pt - - - 1pt - - - - - - 1pt - - #e0e3da - 2pt - 2pt - 2pt - 2pt - - - - - - - - - - - - - - - - - - - After - - - - - =Microsoft.VisualBasic.Interaction.IIF(Fields!Banco.Value = "", True, False) - - - - Before - - - - DataSet4 - 6.02637cm - 0.08599cm - 1.69417cm - 17.21559cm - 3 - - - - - - 3.1in - - - - - - - Textbox1 - 0.22833cm - 6.0099cm - 0.6cm - 9.74549cm - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - FLUJO DIARIO - - - - - - - - - - - - - - - - Textbox2 - 0.86361cm - 6.0099cm - 0.52945cm - 9.74549cm - 1 - - - 2pt - 2pt - 2pt - 2pt - - - - External - =Parameters!LogoPath.Value - FitProportional - 0.22833cm - 0.08599cm - 2.40883cm - 4.0834cm - 2 - - - - - - true - true - - - - - =Parameters!Fecha.Value - - - - Textbox3 - 1.91108cm - 14.00032cm - 0.6cm - 6.2766cm - 3 - - - 2pt - 2pt - 2pt - 2pt - - - - 3.01512cm - 0.04947cm - 0cm - 20.22745cm - 4 - - - - - - - - - - - 1.00188cm - true - true - - - true - true - - - - - ="Página " & Globals.PageNumber & " de " & Globals.TotalPages - - - - - - - Textbox3 - 0.2734cm - 17.14236cm - 0.68085cm - 3.13456cm - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Usuario: - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!UsuarioImprimio.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Fecha Impresión: - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!FechaImpresion.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - 0.15874cm - 0.08599cm - 0cm - 20.21078cm - 5 - - - - - - - - - - 27.94cm - 21.59cm - 0.5cm - 0.5cm - 1cm - 1cm - 0.13cm - + + + + + + + 1pt + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Pesos + + + + + + + Textbox6 + + + + + 1pt + + + + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Dólares + + + + + + + Textbox13 + + + + + 1pt + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.49417cm + + + + + true + true + + + + + =Fields!NumCuenta.Value + + + + + + + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =IIF(Fields!Moneda.Value = "Pesos", Fields!Saldo.Value, "") + + + + + + + Saldo + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =IIF(Fields!Moneda.Value = "Dólares", Fields!Saldo.Value, "") + + + + + + + Saldo1 + + + + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + SALDOS + + + + + + + + 1pt + + + + 1pt + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Fields!Saldo.Value + + + + + + + Saldo2 + + + + + 1pt + + + + 1pt + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =SUM(IIF(Fields!Moneda.Value = "Dólares" AND Fields!CveCuenta.Value = "-1", CDbl(Fields!Saldo.Value), 0)) + + + + + + + Saldo3 + + + + + 1pt + + + + 1pt + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + + + + + + + + + + + + After + + + + + =IIF(Fields!Banco.Value = "", TRUE,FALSE) + + + + Before + + + + DataSet1 + 0.17639cm + 0.08599cm + 1.69417cm + 17.2156cm + + + + + + + + + 10.07247cm + + + 3.47235cm + + + 3.71048cm + + + + + 0.6cm + + + + + true + true + + + + + INGRESOS DEL DÍA BANCOS + + + + + + + + 1pt + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Pesos + + + + + + + Textbox22 + + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Dólares + + + + + + + Textbox23 + + + + + 1pt + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.52062cm + + + + + true + true + + + + + =Fields!PagueseA.Value + + + + + + + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Pesos", Fields!Importe.Value, "") + + + + + + + Saldo + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Dólares", Fields!Importe.Value, "") + + + + + + + Importe + + + + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + TOTAL INGRESOS BANCOS + + + + + + + + 1pt + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =SUM(IIF(Fields!Moneda.Value = "Pesos", CDbl(Fields!Importe.Value), 0)) + + + + + + + Textbox25 + + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =SUM(IIF(Fields!Moneda.Value = "Dólares", CDbl(Fields!Importe.Value), 0)) + + + + + + + Textbox26 + + + + + 1pt + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + + + + + + + + + + + + After + + + + + + Before + + + + DataSet2 + 2.08222cm + 0.08599cm + 1.72062cm + 17.2553cm + 1 + + + + + + + + + 10.09232cm + + + 3.4525cm + + + 3.71048cm + + + + + 0.6cm + + + + + true + true + + + + + GASTOS DEL DÍA BANCOS + + + + + + + + 1pt + + + 1pt + + + 1pt + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Pesos + + + + + + + Textbox6 + + + + + 1pt + + + 1pt + + + + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Dólares + + + + + + + Textbox13 + + + + + 1pt + + + 1pt + + + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.49417cm + + + + + true + true + + + + + =Fields!PagueseA.Value + + + + + + + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Pesos", Fields!Importe.Value, "") + + + + + + + Saldo + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Dólares", Fields!Importe.Value, "") + + + + + + + Saldo1 + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + TOTAL GASTOS BANCOS + + + + + + + 1pt + + + 1pt + + + 1pt + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =SUM(IIF(Fields!Moneda.Value = "Pesos", CDbl(Fields!Importe.Value), 0)) + + + + + + + Saldo2 + + + + + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =SUM(IIF(Fields!Moneda.Value = "Dólares", CDbl(Fields!Importe.Value), 0)) + + + + + + + Saldo3 + + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + true + + + + + + + + + + + + + + + + + After + + + + + + Before + + + + DataSet3 + 4.05351cm + 0.06614cm + 1.69417cm + 17.2553cm + 2 + + + + + + + + + 10.09232cm + + + 3.43265cm + + + 3.69063cm + + + + + 0.6cm + + + + + true + true + + + + + SALDO AL CIERRE + + + + + + + 1pt + + + 1pt + + + 1pt + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Pesos + + + + + + + Textbox6 + + + + 1pt + + + 1pt + + + + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Dólares + + + + + + + Textbox13 + + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.49417cm + + + + + true + true + + + + + =Fields!NumCuenta.Value + + + + + + + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Pesos", Fields!Saldo.Value, "") + + + + + + + Saldo + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Dólares", Fields!Saldo.Value, "") + + + + + + + Saldo1 + + + + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + SALDOS + + + + + + + 1pt + + + 1pt + + + 1pt + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Fields!Saldo.Value + + + + + + + Saldo2 + + + + + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Sum(Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Dólares" And Fields!CveCuenta.Value = "-1", CDbl(Fields!Saldo.Value), 0)) + + + + + + + Saldo3 + + + + 1pt + + + 1pt + + + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + + + + + + + + + + + + After + + + + + =Microsoft.VisualBasic.Interaction.IIF(Fields!Banco.Value = "", True, False) + + + + Before + + + + DataSet4 + 10.05862cm + 0.08599cm + 1.69417cm + 17.2156cm + 3 + + + + + + + + + 10.07247cm + + + 3.47235cm + + + 3.71048cm + + + + + 0.6cm + + + + + true + true + + + + + INGRESOS DEL DÍA CAJA CHICA + + + + + + + + 1pt + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Pesos + + + + + + + Textbox22 + + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Dólares + + + + + + + Textbox23 + + + + + 1pt + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.52062cm + + + + + true + true + + + + + =Fields!PagueseA.Value + + + + + + + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Pesos", Fields!Importe.Value, "") + + + + + + + Saldo + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Dólares", Fields!Importe.Value, "") + + + + + + + Importe + + + + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + TOTAL INGRESOS CAJA CHICA + + + + + + + + 1pt + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =SUM(IIF(Fields!Moneda.Value = "Pesos", CDbl(Fields!Importe.Value), 0)) + + + + + + + Textbox25 + + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =SUM(IIF(Fields!Moneda.Value = "Dólares", CDbl(Fields!Importe.Value), 0)) + + + + + + + Textbox26 + + + + + 1pt + + + + 1pt + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + + + + + + + + + + + + After + + + + + + Before + + + + DataSet6 + 6.06259cm + 0.10584cm + 1.72062cm + 17.2553cm + 4 + + + + + + + + + 10.09232cm + + + 3.4525cm + + + 3.71048cm + + + + + 0.6cm + + + + + true + true + + + + + GASTOS DEL DÍA CAJA CHICA + + + + + + + + 1pt + + + 1pt + + + 1pt + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Pesos + + + + + + + Textbox6 + + + + + 1pt + + + 1pt + + + + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Dólares + + + + + + + Textbox13 + + + + + 1pt + + + 1pt + + + + + + 1pt + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.49417cm + + + + + true + true + + + + + =Fields!PagueseA.Value + + + + + + + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Pesos", Fields!Importe.Value, "") + + + + + + + Saldo + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Microsoft.VisualBasic.Interaction.IIF(Fields!Moneda.Value = "Dólares", Fields!Importe.Value, "") + + + + + + + Saldo1 + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + TOTAL GASTOS CAJA CHICA + + + + + + + 1pt + + + 1pt + + + 1pt + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =SUM(IIF(Fields!Moneda.Value = "Pesos", CDbl(Fields!Importe.Value), 0)) + + + + + + + Saldo2 + + + + + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =SUM(IIF(Fields!Moneda.Value = "Dólares", CDbl(Fields!Importe.Value), 0)) + + + + + + + Saldo3 + + + + + + #e0e3da + 2pt + 2pt + 2pt + 2pt + + + + + + + + + + + + + + + + + + + After + + + + + + Before + + + + DataSet7 + 8.06563cm + 0.08599cm + 1.69417cm + 17.2553cm + 5 + + + + + + 4.62708in + + + + + + + Textbox1 + 0.22833cm + 6.0099cm + 0.6cm + 9.74549cm + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + FLUJO DIARIO + + + + + + + + + + + + + + + + Textbox2 + 0.86361cm + 6.0099cm + 0.52945cm + 9.74549cm + 1 + + + 2pt + 2pt + 2pt + 2pt + + + + External + =Parameters!LogoPath.Value + FitProportional + 0.22833cm + 0.08599cm + 2.40883cm + 4.0834cm + 2 + + + + + + true + true + + + + + =Parameters!Fecha.Value + + + + Textbox3 + 1.91108cm + 14.00032cm + 0.6cm + 6.2766cm + 3 + + + 2pt + 2pt + 2pt + 2pt + + + + 3.01512cm + 0.04947cm + 0cm + 20.22745cm + 4 + + + + + + + + + + + 1.00188cm + true + true + + + true + true + + + + + ="Página " & Globals.PageNumber & " de " & Globals.TotalPages + + + + + + + Textbox3 + 0.2734cm + 17.14236cm + 0.68085cm + 3.13456cm + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Usuario: + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!UsuarioImprimio.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Fecha Impresión: + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!FechaImpresion.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + 0.15874cm + 0.08599cm + 0cm + 20.21078cm + 5 + + + + + + + + + + 27.94cm + 21.59cm + 0.5cm + 0.5cm + 1cm + 1cm + 0.13cm +