-- mejoras

Ventas/Ventas.aspx.vb

@@ -26942,6 +26942,7 @@ Partial Class Ventas
             Dim DtTemporal As DataTable = ObjMovtos.DtResultados.FiltraParametros("TipoDocto NOT IN ('RNC','Rem') AND Tipo = 'Act' AND CveVenta > 0", "Moneda, OrdenVencimiento, FechaVencimiento")
             GvCxC.DataSource = DtTemporal
         End If
+        If UsuarioActual.Empresa.Funcionalidad(713) <> "" Then GvCxC.Columns(6).Visible = True 'columna de IEPS
         ObjMovtos.Dispose()
         GvCxC.DataBind()
         UpAplicarNC.Update()
@@ -36218,7 +36219,7 @@ Partial Class Ventas
     'End Sub
 
     Protected Sub LBNotaCredito_Click(sender As Object, e As EventArgs)
-
+        CargaDdlNCPS()
         DivGvCxC.Visible = True
         CargaCxC()
         'CARGAR RNC