-- activar SubTotal,IVA,IEPS pendiente

Compras/RepCxP.aspx.vb

@@ -169,23 +169,10 @@ Partial Class Compras_RepCxP
         DdlUsuarioRegistro.DataSource = GlobalDTUsuarios.FiltraParametros(String.Format("CveEmpresa = {0}", UsuarioActual.CveEmpresa), "Nombre")
         DdlUsuarioRegistro.DataBind()
         DdlUsuarioRegistro.Items.Insert(0, New ListItem("Todos", "-1"))
-
         txtCorteA.Text = $"31/12/{NowADS().Year}"
 
-        'Dim ObjSisUsuarios As New ClsSisUsuarios()
-
-        'If ObjSisUsuarios.GetEmpresasUsuario(UsuarioActual.CveUsuario) Then
-        '    DdlEmpresas.DataSource = ObjSisUsuarios.DtResultados
-        '    DdlEmpresas.DataBind()
-        '    DivEmpresasFiltro.Visible = True
-        '    For i As Integer = 0 To DdlEmpresas.Items.Count - 1
-        '        DdlEmpresas.Items(i).Selected = True
-        '    Next
-        'End If
-        'ObjSisUsuarios.Dispose()
-
         If UsuarioActual.Empresa.Funcionalidad(713) <> "" Then
-            ChkIEPSP.Visible = False
+            ChkIEPSP.Visible = True
         End If
 
         For Each lItem As ListItem In DdlGrupo.Items
@@ -194,7 +181,6 @@ Partial Class Compras_RepCxP
             End If
         Next
 
-
     End Sub
 
     Protected Sub DdlProyecto_SelectedIndexChanged(sender As Object, e As System.EventArgs) Handles DdlProyecto.SelectedIndexChanged