diff --git a/Compras/Compras.aspx b/Compras/Compras.aspx
index 7863393bd..d4347bc2b 100644
--- a/Compras/Compras.aspx
+++ b/Compras/Compras.aspx
@@ -155,11 +155,7 @@
         .manita {
             cursor: pointer;
         }
-
-        .centrarUM {
-            line-height: 40px;
-        }
-
+ 
         select.selecthidden {
             display: none;
         }
@@ -766,7 +762,7 @@
                                             <%-- 2 --%>
                                             <asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-VerticalAlign="Middle" ItemStyle-Width="70px">
                                                 <ItemTemplate>
-                                                    <asp:Label ID="LtlUnidadMedida" CssClass="centrarUM" runat="server" Text='<%# Eval("UM") %>'></asp:Label>
+                                                    <asp:Label ID="LtlUnidadMedida" runat="server" Text='<%# Eval("UM") %>'></asp:Label>
                                                     <asp:LinkButton ID="LBAplicarEquivalencia" OnClick="LBAplicarEquivalencia_Click" data-toggle="tooltip" title="Aplicar conversión de equivalencia" Text="" runat="server" Visible="false"> <i class="fa fa-magic"></i></asp:LinkButton>
                                                 </ItemTemplate>
                                             </asp:TemplateField>
@@ -2878,7 +2874,7 @@
                                 </asp:TemplateField>
                                 <asp:TemplateField HeaderText="Factura" HeaderStyle-HorizontalAlign="Center" ItemStyle-HorizontalAlign="Left">
                                     <ItemTemplate>
-                                        <asp:HyperLink ID="HplFactura" runat="server" CssClass="Texto" Text='<%# Eval("SerieFolio")%>' NavigateUrl='<%# If(Eval("CveCompra").ToString <> "0", Eval("CveCompra", "/Compras/Compras.aspx?CveCompra={0}"), If(Eval("CveIE").ToString <> "0", Eval("CveIE", "/Bancos/IE.aspx?CveIE={0}"), ""))%>'></asp:HyperLink>
+                                        <asp:HyperLink ID="HplFactura" runat="server" CssClass="Texto" Text='<%# Eval("SerieFolio")%>' NavigateUrl='<%# If(Eval("CveCompra").ToString <> "0", Eval("CveCompra", "/Compras/Compras.aspx?CveCompra={0}"), If(Eval("CveIE").ToString <> "0", Eval("CveIE", "/Bancos/IE.aspx?CveIE={0}"), ""))%>'></asp:HyperLink>                                       
                                     </ItemTemplate>
                                 </asp:TemplateField>
                                 <asp:TemplateField HeaderText="Fecha Compra" HeaderStyle-HorizontalAlign="Center" ItemStyle-HorizontalAlign="Center">
@@ -4125,20 +4121,14 @@
                                                             <asp:TemplateField>
                                                                 <HeaderTemplate>Saldo</HeaderTemplate>
                                                                 <ItemTemplate>
-                                                                    <asp:Literal ID="LtlSaldo" runat="server" Text='<%# Eval("Saldo", "{0:N2}") %>'></asp:Literal>&nbsp;
-                                                               
-                                                               
-                                                               
+                                                                    <asp:Literal ID="LtlSaldo" runat="server" Text='<%# Eval("Saldo", "{0:N2}") %>'></asp:Literal>&nbsp;                                                                 
                                                                 </ItemTemplate>
                                                                 <ItemStyle HorizontalAlign="Right" />
                                                             </asp:TemplateField>
                                                             <asp:TemplateField>
                                                                 <HeaderTemplate>Fecha</HeaderTemplate>
                                                                 <ItemTemplate>
-                                                                    <asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("FechaDocumento", "{0:d}") %>'></asp:Literal>&nbsp;
-                                                               
-                                                               
-                                                               
+                                                                    <asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("FechaDocumento", "{0:d}") %>'></asp:Literal>&nbsp;                                                               
                                                                 </ItemTemplate>
                                                                 <ItemStyle HorizontalAlign="Right" />
                                                             </asp:TemplateField>
@@ -4812,23 +4802,23 @@
                                             <label class="col-md-6"><b>Aplicado: </b></label>
                                             <div class="col-md-6">
                                                 <asp:Label ID="LblAplicado" runat="server"></asp:Label>
-                                            </div>
-
-                                            <div class="row form-group">
-                                            </div>
+                                            </div>                                             
                                         </div>
                                         <br />
                                     </div>
                                     <div class="row">
-                                        <div class="col-md-12 text-right">
+                                        <div class="col-md-6 text-right">
+                                             <input type="text" id="TxtBusquedaNC" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusquedaNC','{0}')", GvFacturaNC.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 120px;" />
+                                                <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusquedaNC','{0}')", GvFacturaNC.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+                                         </div>
+                                        <div class="col-md-6 text-right">
                                             <asp:UpdatePanel ID="UpChkNCInvNC" runat="server" UpdateMode="Conditional">
                                                 <ContentTemplate>
                                                     <asp:CheckBox ID="ChkNCInvNC" Text="Afecta Rep Sin Entrada" runat="server" />
                                                 </ContentTemplate>
                                             </asp:UpdatePanel>
                                         </div>
-                                    </div>
-                                    <br />
+                                    </div>                                   
                                     <div class="row">
                                         <div class="col-md-12">
                                             <asp:GridView ID="GvFacturaNC" OnRowDataBound="GvFacturaNC_RowDataBound" 
@@ -4837,6 +4827,7 @@
                                                     <asp:TemplateField>
                                                         <ItemTemplate>
                                                             <asp:CheckBox ID="ChkFacturaNC" runat="server" />
+                                                             <span style='display: none'><%# Eval("UUID")%></span>
                                                         </ItemTemplate>
                                                     </asp:TemplateField>
                                                     <asp:HyperLinkField DataTextField="SerieFolio" HeaderText="Folio" DataNavigateUrlFields="CveCompra" DataNavigateUrlFormatString="/Compras/Compras.aspx?CveCompra={0}" Target="_blank" ItemStyle-HorizontalAlign="Left" />
@@ -4844,7 +4835,7 @@
                                                     <asp:BoundField HeaderText="Importe/Saldo" DataField="Saldo" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" />
                                                     <asp:TemplateField ItemStyle-Width="15%" ItemStyle-HorizontalAlign="Right">
                                                         <ItemTemplate>
-                                                            <asp:TextBox ID="TxtImporte" runat="server" Width="100%" />
+                                                            <asp:TextBox ID="TxtImporte" runat="server" Width="100%" CssClass="text-right" />
                                                             <ajax:FilteredTextBoxExtender ID="FTETxtImporte" runat="server" TargetControlID="TxtImporte" FilterType="Custom, Numbers" ValidChars="." />
                                                         </ItemTemplate>
                                                     </asp:TemplateField>
diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 0cd09df4d..6db7b064a 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -3586,7 +3586,7 @@ Partial Class Compras_Compras
 
     Private Sub CargaPSAlias()
 
-        DdlPSAlias2.setEsWebService(UsuarioActual.Empresa.Funcionalidad(105) = "1")
+        DdlPSAlias2.setEsWebService(True)
 
         If UsuarioActual.CveEmpresa = 66 Then
             DdlPSAlias2.ddlWS.Attributes.Add("data-subfamilia", "-1")
@@ -6940,8 +6940,9 @@ Partial Class Compras_Compras
                                                                 For Each rw As GridViewRow In GvDeudores.Rows
                                                                     If rw.FCCheckBox("Chk").Checked Then
                                                                         importeMovimiento = rw.FCTextBox("TxtSaldoDeudor").Text.ToDecimal
-                                                                        importeMN = importeMovimiento * tipoCambioActual * Multiplicador
+                                                                        importeMN = (importeMovimiento * tipoCambioActual * Multiplicador).RoundSQL
                                                                         IdCtaContable = CtaProveedorDeudores
+                                                                        Dim tCveProveedor As Integer = rw.DataKey("CveProveedor").ToEntero
 
                                                                         'Conta ContPAQ
                                                                         If IdCtaContable = 0 Then
@@ -6949,7 +6950,7 @@ Partial Class Compras_Compras
                                                                             idCuentaContabilizacion = 0
                                                                         End If
 
-                                                                        If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, importeMovimiento, Referencia, ConceptoContable, Concepto, FechaMovimiento, IdCtaContable, -1, CveCompra:=CveCompra, CveProveedor:=CveProveedorConcepto, CveIE:=rw.DataKey("CveIE").ToString.ToEntero, CvePersonal:=CvePersonal, CveCreditoDetalle:=CveCreditoDetalle, ImporteMX:=importeMN, ImporteME:=If(tipoCambioActual = 1, 0, importeMovimiento), Contabilizable:=SeContabiliza) Then
+                                                                        If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, importeMovimiento, Referencia, ConceptoContable, Concepto, FechaMovimiento, IdCtaContable, -1, CveCompra:=CveCompra, CveProveedor:=tCveProveedor, CveIE:=rw.DataKey("CveIE").ToString.ToEntero, CvePersonal:=CvePersonal, CveCreditoDetalle:=CveCreditoDetalle, ImporteMX:=importeMN, ImporteME:=If(tipoCambioActual = 1, 0, importeMovimiento), Contabilizable:=SeContabiliza) Then
                                                                             ErrorPrepoliza = True : Exit For
                                                                         End If
 
@@ -6961,10 +6962,11 @@ Partial Class Compras_Compras
                                                                 For Each rw As GridViewRow In GvDeudores.Rows
                                                                     If rw.FCCheckBox("Chk").Checked Then
                                                                         importeMovimiento = rw.FCTextBox("TxtSaldoDeudor").Text.ToDecimal
-                                                                        importeMN = importeMovimiento * tipoCambioActual * Multiplicador
+                                                                        importeMN = (importeMovimiento * tipoCambioActual * Multiplicador).RoundSQL
                                                                         IdCtaContable = CtaProveedorDeudores
+                                                                        Dim tCveProveedor As Integer = rw.DataKey("CveProveedor").ToEntero
 
-                                                                        If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, importeMovimiento, Referencia, 254, Concepto, FechaMovimiento, IdCtaContable, -1, CveCompra:=CveCompra, CveProveedor:=CveProveedorConcepto, CveIE:=rw.DataKey("CveIE").ToString.ToEntero, CvePersonal:=CvePersonal, CveCreditoDetalle:=CveCreditoDetalle, ImporteMX:=importeMN, ImporteME:=If(tipoCambioActual = 1, 0, importeMovimiento), Contabilizable:=SeContabiliza) Then
+                                                                        If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, importeMovimiento, Referencia, 254, Concepto, FechaMovimiento, IdCtaContable, -1, CveCompra:=CveCompra, CveProveedor:=tCveProveedor, CveIE:=rw.DataKey("CveIE").ToString.ToEntero, CvePersonal:=CvePersonal, CveCreditoDetalle:=CveCreditoDetalle, ImporteMX:=importeMN, ImporteME:=If(tipoCambioActual = 1, 0, importeMovimiento), Contabilizable:=SeContabiliza) Then
                                                                             ErrorPrepoliza = True
                                                                             Exit For
                                                                         End If
@@ -20133,35 +20135,24 @@ Partial Class Compras_Compras
 
     Private Sub NCSeleccionFacturasRelacionadas(UUIDSListRelacioandos As List(Of String))
 
-
         If UUIDSListRelacioandos.Count > 0 Then
             Dim SaldoNota As Decimal = TxtTotal.Text.ToDecimal
             Dim SaldoNotaPorAplicar As Decimal = SaldoNota
             Dim CountAplicacion As Integer = 0
-
             Dim sbNoencontrados As New StringBuilder
 
-
             For Each UUID As String In UUIDSListRelacioandos
-
                 UUID = UUID.ToUpper
                 Dim UUIDEncontrado As Boolean = False
 
                 For Each GvRow As GridViewRow In GvFacturaNC.Rows
                     Dim UUIDGv As String = GvRow.DataKey("UUID").Trim.ToUpper
-
-
-                    If UUID.Trim.ToUpper = GvRow.DataKey("UUID").Trim.ToUpper Then
+                    If UUID.Trim.ToUpper = UUIDGv Then
                         UUIDEncontrado = True
                         Exit For
                     End If
-
                 Next
-
-                If Not UUIDEncontrado Then
-                    sbNoencontrados.Append($"{UUID},")
-                End If
-
+                If Not UUIDEncontrado Then sbNoencontrados.Append($"{UUID}, <br/>")
             Next
 
             Dim TeminarAmortizacion As Boolean = False
@@ -20176,19 +20167,18 @@ Partial Class Compras_Compras
 
                         If SaldoFactura <= SaldoNotaPorAplicar Then
                             SaldoNotaPorAplicar = SaldoNotaPorAplicar - SaldoFactura
-                            GvRow.FCTextBox("TxtImporte").Text = SaldoFactura.ToString("###,###,###.00")
+                            GvRow.FCTextBox("TxtImporte").Text = SaldoFactura.FormatoNumero
                             GvRow.FCCheckBox("ChkFacturaNC").Checked = True
                         Else
 
                             If SaldoFactura >= SaldoNotaPorAplicar Then
 
-                                GvRow.FCTextBox("TxtImporte").Text = SaldoNotaPorAplicar.ToString("###,###,###.00")
+                                GvRow.FCTextBox("TxtImporte").Text = SaldoNotaPorAplicar.FormatoNumero
                                 GvRow.FCCheckBox("ChkFacturaNC").Checked = True
                                 SaldoNotaPorAplicar = 0
                                 TeminarAmortizacion = True
-
                             Else
-                                GvRow.FCTextBox("TxtImporte").Text = SaldoFactura.ToString("###,###,###.00")
+                                GvRow.FCTextBox("TxtImporte").Text = SaldoFactura.FormatoNumero
                                 GvRow.FCCheckBox("ChkFacturaNC").Checked = True
                                 SaldoNotaPorAplicar = SaldoNotaPorAplicar - SaldoFactura
 
@@ -20198,36 +20188,28 @@ Partial Class Compras_Compras
                         CountAplicacion = CountAplicacion + 1
                         Exit For
                     End If
-
-
                     If SaldoNotaPorAplicar <= 0 Then
                         TeminarAmortizacion = True
                         Exit For
                     End If
-
                 Next
 
-
                 If TeminarAmortizacion Then
                     Exit For
                 End If
-
             Next
 
+            Dim TipoMensaje As TipoMensaje = TipoMensaje.ToastInformacion
 
-            Dim TipoMesaje As TipoMensaje = TipoMensaje.ToastInformacion
-
-            TipoMesaje = If(sbNoencontrados.ToString.Length > 0 Or (SaldoNotaPorAplicar <> 0), TipoMensaje.ToastAdventencia, TipoMesaje)
-
-
+            TipoMensaje = If(sbNoencontrados.ToString.Length > 0 Or (SaldoNotaPorAplicar <> 0), TipoMensaje.ToastAdventencia, TipoMensaje)
             Dim MsgSalida As String = ""
             If sbNoencontrados.ToString.Length > 0 Then
-                MsgSalida = $"UUIDS no encotradas o sin saldo: {sbNoencontrados.ToString()} <br/>"
+                MsgSalida = $"Folios Fiscales no encontradas o sin saldo: {sbNoencontrados } <br/><br/>"
             End If
 
-            MsgSalida = $"{MsgSalida}Se seleccionó  {(SaldoNota - SaldoNotaPorAplicar).ToString("###,###,###.00")} de {SaldoNota.ToString("###,###,###.00")} a {CountAplicacion} factura{If(CountAplicacion > 0, "s", "")}."
+            MsgSalida = $"{MsgSalida} Se seleccionó $ {(SaldoNota - SaldoNotaPorAplicar).FormatoNumero} de $ {SaldoNota.FormatoNumero} a {CountAplicacion} factura {If(CountAplicacion > 0, "s", "")}."
 
-            Alert(MsgSalida, TipoMesaje)
+            Alert(MsgSalida, TipoMensaje)
 
             If CountAplicacion > 0 Then
                 BtnFacturaNC_Click(Nothing, Nothing)
@@ -20235,8 +20217,6 @@ Partial Class Compras_Compras
 
         End If
 
-
-
     End Sub
 
 
@@ -20244,8 +20224,6 @@ End Class
 
 
 
-
-
 Public Class MMensajeDevolucion
     Public Property CveMovimiento As Integer
     Public Property TieneError As Boolean