Compras correciones otros impuetos, excel rep anexo cataloco por centro de costos

App_Code/modExtensiones.vb

@@ -2232,11 +2232,11 @@ Namespace Extensiones
 
                 Dim IndexEndTable As Integer = GridView.Rows.Count + TotalRowHeader + TotalRowFooter
 
-                worksheet.Rows(IndexEndTable).Cells(0).Value = "Usuario Imprimió"
-                worksheet.Rows(IndexEndTable + 1).Cells(0).Value = Usuario.Nombre
+                worksheet.Rows(IndexEndTable).Cells(1).Value = "Usuario Imprimió"
+                worksheet.Rows(IndexEndTable + 1).Cells(1).Value = Usuario.Nombre
 
-                worksheet.Rows(IndexEndTable).Cells(2).Value = "Fecha Impresión"
-                worksheet.Rows(IndexEndTable + 1).Cells(2).Value = DateTime.Now.ToString("dd/MM/yyyy")
+                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))
 

Compras/Compras.aspx

@@ -3690,7 +3690,7 @@
                     <asp:UpdatePanel runat="server">
                         <ContentTemplate>
                             <asp:Button ID="BtnAgregarIEPS" OnClick="BtnAgregarIEPS_Click" runat="server" ClientIDMode="Static" Text="Agregar" ValidationGroup="GrpAgregar" CssClass="btn btn-primary" />
-                            <%--<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>--%>
+                            <button type="button" class="btn btn-danger" data-dismiss="modal" runat="server" id="BtnCancelarotrosImpuestos" visible="false">Cancelar</button>
                         </ContentTemplate>
                     </asp:UpdatePanel>
                 </div>

Compras/Compras.aspx.vb

@@ -2359,7 +2359,15 @@ Partial Class Compras_Compras
         End If
 
         If TrasladoIEPS > 0 Or OtrosImpuestos > 0 Then
-            RegistraScript("$('#ModalIEPS').modal({ backdrop: 'static', keyboard: false },'show');")
+
+
+            If OtrosImpuestos > 0 Then
+                RegistraScript("$('#ModalIEPS').modal({ backdrop: 'static', keyboard: false },'show');")
+            Else
+                RegistraScript("$('#ModalIEPS').modal('show');")
+                BtnCancelarotrosImpuestos.Visible = True
+            End If
+
 
             If TrasladoIEPS > 0 Then
                 ChkIEPS.Visible = True

Contabilidad/RepAnexoCatalogo.aspx.vb

@@ -313,7 +313,17 @@ Partial Class AC_RepAnexoCatalogo
         Dim params As New List(Of ReportParameter)
         params.Add(New ReportParameter("IdCuenta", IdCuenta.ToString))
         params.Add(New ReportParameter("pEmp", UsuarioActual.Empresa.Empresa))
+
         params.Add(New ReportParameter("pImg", New Uri(Server.MapPath(String.Format("~/Empresas/{0}/Logo.png", UsuarioActual.CveEmpresa))).AbsoluteUri))
+
+
+        Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
+        If Imagen.Exists Then
+            params.Add(New ReportParameter("pImg", $"file://{Imagen.FullName}"))
+        Else
+            params.Add(New ReportParameter("pImg", ""))
+        End If
+
         params.Add(New ReportParameter("pFechaFin", FechaFin.ToString("dd/MM/yyyy")))
 
         ImprimirPDF(reportpath, DtDatos, params, fileName, Formato)

Contabilidad2/RepAnexoCatalogo.aspx.vb

@@ -297,7 +297,14 @@ Partial Class AC2_RepAnexoCatalogo
         params.Add(New ReportParameter("IdCuenta", IdCuenta.ToString))
         params.Add(New ReportParameter("pEmp", UsuarioActual.Empresa.Empresa))
         params.Add(New ReportParameter("usuarioImprimio", UsuarioActual.Nombre))
-        params.Add(New ReportParameter("pImg", New Uri(Server.MapPath(String.Format("~/Empresas/{0}/Logo.png", UsuarioActual.CveEmpresa))).AbsoluteUri))
+
+        Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
+        If Imagen.Exists Then
+            params.Add(New ReportParameter("pImg", $"file://{Imagen.FullName}"))
+        Else
+            params.Add(New ReportParameter("pImg", ""))
+        End If
+
         params.Add(New ReportParameter("pFechaFin", FechaFin.ToString("dd/MM/yyyy")))
         params.Add(New ReportParameter("pFechaInicio", FechaInicio.ToString("dd/MM/yyyy")))
 

Contabilidad2/RepAnexoCatalogoCC.aspx.vb

@@ -375,10 +375,10 @@ Partial Class Contabilidad2_RepAnexoCatalogoCC
         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)
+        SbFiltros.AppendFormat("Periodo : {0}|", DdlPeriodo.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}")
+        GvCC.ExportToExcelGembox("AnexoCatálogoMensual", UsuarioActual, $"Estado de Resultados Horizontal por {LblSubProyecto.Text}", DatoTituloExtra:="", DatosFiltros:=SbFiltros.ToString())
 
     End Sub