--FIX autorizaciones con ixc

Ventas/CatAutorizacionLimites.aspx.vb

@@ -62,6 +62,10 @@ Partial Class Ventas_CatAutorizacionLimites
 
         DdlEstatus.SelectedValue = "0"
 
+        If UsuarioActual.Empresa.Funcionalidad(595) = "3" Then
+            LnkAgregar.Visible = False
+        End If
+
         UpModal.Update()
     End Sub
     Private Sub CargaDatos()
@@ -190,6 +194,12 @@ Partial Class Ventas_CatAutorizacionLimites
                 e.Row.FCLabel("LblTipoAuto").CssClass = "badge badge-secondary"
             End If
 
+            If e.Row.DBCampo("CveIEAplicado").ToString().ToEntero() > 0 Then
+                e.Row.FCLiteral("LtlFactura").Text = String.Format("<a class=""Texto"" target=""_blank"" href=""/Bancos/IE.aspx?CveIE={0}"">{1}</a>", e.Row.DBCampo("CveIEAplicado"), e.Row.DBCampo("FolioIEAplicado"))
+            Else
+                e.Row.FCLiteral("LtlFactura").Text = String.Format("<a class=""Texto"" target=""_blank"" href=""/Ventas/Ventas.aspx?CveVenta={0}"">{1}</a>", e.Row.DBCampo("CveVentaAplicada"), e.Row.DBCampo("FacturaAplicada"))
+            End If
+
             'If e.Row.DBCampo("Estatus") = "True" Then
             '    e.Row.Cells(1).ForeColor = Drawing.Color.Green
             '    e.Row.Cells(1).Font.Bold = True