diff --git a/Bancos/ProveedoresAbonar.aspx.vb b/Bancos/ProveedoresAbonar.aspx.vb
index 2c5693387..c6ca8828a 100644
--- a/Bancos/ProveedoresAbonar.aspx.vb
+++ b/Bancos/ProveedoresAbonar.aspx.vb
@@ -1169,6 +1169,7 @@ Partial Class Bancos_ProveedoresAbonar
                         IDPoliza = 0
                     End If
 
+                    TieneError = True
                     If Not TieneError Then
 
                         ObjIE.Commit()
@@ -2022,12 +2023,12 @@ Partial Class Bancos_ProveedoresAbonar
             Dim IVARNC As Decimal = (ImporteRNC * PorcentajeIVA).RoundSQL(2)
             Dim TotalRNC As Decimal = (ImporteRNC + IVARNC).RoundSQL(2)
 
-            CompraRNC.ConfiguraRegistroRapido(CvePS_RNC, CveUM, UM, CveClasificacion, Clasificacion, PS, CveSubProyectoPrincipal, SubProyecto, ImporteRNC.RoundSQL(2), IVARNC, TotalRNC, PorcentajeIVA)
+            CompraRNC.ConfiguraRegistroRapido(CvePS_RNC, CveUM, UM, CveClasificacion, Clasificacion, PS, CveSubProyectoPrincipal, SubProyecto, ImporteRNC, IVARNC, TotalRNC, PorcentajeIVA)
 
             If CompraRNC.AddCompra(sqltransaccion) Then
-                Dim tImporteRNC = (ImporteRNC + IVARNC).RoundSQL(2) ' le agrego el importe del iva
+                'Dim tImporteRNC = (ImporteRNC + IVARNC).RoundSQL(2) ' le agrego el importe del iva
                 Dim Pago As New CompraPago
-                Pago.ImportePago = tImporteRNC
+                Pago.ImportePago = TotalRNC
                 Pago.CveMonedaPago = CompraActual.CveMoneda
                 Pago.CveCompraAmortizacion = CompraRNC.CveCompra
                 Pago.Referencia = CompraRNC.SerieFolio
@@ -2713,7 +2714,7 @@ Public Class ClsCompraManagerComprasCA
         Me.CveRetISRConcepto = -1
         Me.CveTipoPoliza = 3
         Me.NumeroReembolso = ""
-        Me.SubTotal = SubTotal
+        Me.SubTotal = SubTotal.RoundSQL
         Me.IVA = IVA
         Me.Total = Total
         Me.PorcentajeIVA = PorcentajeIVA
@@ -3664,7 +3665,7 @@ Public Class ClsCompraManagerComprasCA
         'HACEMOS CALCULOS
         LocalSubTotalIVA = TmpDT.SUMD("IVA")
         LocalSubTotalIEPSIVA = TmpDT.SUMD("IEPSPSIVA")
-        LocalSubTotal = (TmpDT.SUMD("Total") + TmpDT.SUMD("Descuento")).RoundSQL(8)
+        LocalSubTotal = (TmpDT.SUMD("Total") + TmpDT.SUMD("Descuento")).RoundSQL(2)
         LocalRetIVA = TmpDT.SUMD("RetIVA")
         LocalRetISR = TmpDT.SUMD("RetISR")
         LocalIEPSPS = TmpDT.SUMD("IEPSPS")
diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 033be19eb..1f3e35b51 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -22668,7 +22668,20 @@ Partial Class Compras_Compras
         nRow("SubTotal") = subtotalParcial.RoundSQL(4)
 
         nRow("Total") = totalParcialDeseado.RoundSQL(4)
-        nRow("PorcentajeIVA") = (ivaParcial / subtotalParcial).RoundSQL(2)
+
+
+        Dim tmpPorcentajeIVA As Decimal = 0
+        If ivaParcial > 0 Then
+            tmpPorcentajeIVA = (ivaParcial / subtotalParcial).RoundSQL(2)
+            If tmpPorcentajeIVA = 0.17 Or tmpPorcentajeIVA = 0.15 Then
+                tmpPorcentajeIVA = 0.16D
+            End If
+            If tmpPorcentajeIVA = 0.07 Or tmpPorcentajeIVA = 0.09 Then
+                tmpPorcentajeIVA = 0.16D
+            End If
+        End If
+
+        nRow("PorcentajeIVA") = tmpPorcentajeIVA
         nRow("Porcentaje") = ((totalParcialDeseado.RoundSQL(4) * 100) / TotalOriginal).RoundSQL(2)
 
         nRow("RetIVAPorcentaje") = (retIvaParcial / subtotalParcial).RoundSQL(4)
diff --git a/Compras/eFacturas.aspx b/Compras/eFacturas.aspx
index 2573067e0..d57e53051 100644
--- a/Compras/eFacturas.aspx
+++ b/Compras/eFacturas.aspx
@@ -311,7 +311,7 @@
                                                     
                                                     <div class="col-md-4">
                                                         <div class="form-group form-md-line-input input-iconright" >
-                                                            <asp:TextBox ID="TxtNumeroReembolso" runat="server" Width="100%" CssClass=" form-control input-sm " />
+                                                            <asp:TextBox ID="TxtNumeroReembolso" runat="server" Width="100%" CssClass=" form-control " />
                                                             <label runat="server" id="LblNumeroReembolso" for="<%= TxtNumeroReembolso.ClientID.ToString()%>">Número de Reembolso:</label>
                                                             <asp:RequiredFieldValidator ID="RfvTxtNumeroReembolso" runat="server" ControlToValidate="TxtNumeroReembolso" InitialValue="" Display="Dynamic"
                                                                 ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Num. Reembolso''</b> es necesario, por favor ingreselo." ValidationGroup="GrpRegistraCompra">
@@ -319,9 +319,18 @@
                                                         </div>
                                                     </div>
 
-                                                     <div class="col-md-4">
-                                                 
-                                              </div>
+                                                     <div class="col-md-4">                                                                  
+                                                         
+                                                          <div class="form-group form-md-line-input input-iconright">
+     
+                                                             <asp:TextBox runat="server" ID="TxtObservaciones" CssClass="form-control" MaxLength="50" Width="100%" ></asp:TextBox>
+                                                             <label runat="server" id="Label3" for="<%= TxtObservaciones.ClientID.ToString()%>">Observaciones:</label>  
+
+                                                             <%--<asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server" ControlToValidate="TxtObservaciones" InitialValue="" Display="Dynamic"
+                                                                 ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripción''</b> es necesario, por favor ingreselo." ValidationGroup="GrpRegistraCompra">
+                                                             </asp:RequiredFieldValidator>--%>
+                                                         </div>
+                                                    </div> 
 
 
                                                 </div>
@@ -448,15 +457,7 @@
 
                                                           </div>
                                                       </div>
-
-                                                     
-                                                           
-
                                                     </div>
-                                             
-
-                                             
-
                                               <div class="col-md-4" style="text-align: center;">
                                                   <asp:Button ID="BtnGuardarFacturas" runat="server" Text="Guardar" class="btn btn-primary" OnClick="BtnGuardarFacturas_Click"  ValidationGroup="GrpRegistraCompra"
                                                       Style="margin: 0; position: absolute; top: 50%; transform: translateY(30%);" />
diff --git a/Compras/eFacturas.aspx.vb b/Compras/eFacturas.aspx.vb
index c238cae1b..55db2884b 100644
--- a/Compras/eFacturas.aspx.vb
+++ b/Compras/eFacturas.aspx.vb
@@ -5801,7 +5801,7 @@ Partial Class Compras_eFacturas
 
                 If CompraActual.ConfiguraRegistroCompra(DdlPS.SelectedValue.ToEntero, DdlSubProyecto.SelectedValue.ToEntero, CveCajachica, CvePersonal,
                                                               DdlRetIVAConcepto.SelectedValue.ToEntero, DdlRetISRConcepto.SelectedValue.ToEntero, NumeroReembolso:=TxtNumeroReembolso.Text,
-                                                              DTProrrateo:=DTProrrateo, DTPagosDeudores:=DTPagosDeudores) Then
+                                                              DTProrrateo:=DTProrrateo, DTPagosDeudores:=DTPagosDeudores, Observaciones:=TxtObservaciones.Text) Then
                     If CompraActual.AddCompra(Objcompras.IniciaTransacSQL()) Then
                         Contador = Contador + 1
                     Else
@@ -6874,7 +6874,7 @@ Public Class ClsCompraManager
     End Sub
 
     Public Function ConfiguraRegistroCompra(CvePS As Integer, CveSubProyecto As Integer, CveCajaChica As Integer, CvePersonal As Integer, CveRetIVAConcepto As Integer, CveRetISRConcepto As Integer, NumeroReembolso As String, DTProrrateo As DataTable,
-                                            DTPagosDeudores As DataTable, Optional TipoComprobante As String = "") As Boolean
+                                            DTPagosDeudores As DataTable, Optional TipoComprobante As String = "", Optional Observaciones As String = "") As Boolean
 
         Dim respuesta As Boolean = True
         Me.CveSubProyecto = CveSubProyecto
@@ -6886,6 +6886,7 @@ Public Class ClsCompraManager
         Me.CveTipoPoliza = 3
         Me.NumeroReembolso = NumeroReembolso
         Me.DTPagosDeudores = DTPagosDeudores
+        Me.Observaciones = Observaciones
 
         If TipoComprobante.Length > 0 Then
             Me.TipoComprobante = TipoComprobante
diff --git a/Empresas/189/Formatos/Entradas.rdlc b/Empresas/189/Formatos/Entradas.rdlc
index 2b765df5f..06dc666ac 100644
--- a/Empresas/189/Formatos/Entradas.rdlc
+++ b/Empresas/189/Formatos/Entradas.rdlc
@@ -2042,7 +2042,7 @@
                 <Paragraph>
                   <TextRuns>
                     <TextRun>
-                      <Value>Capturo:</Value>
+                      <Value>Capturó:</Value>
                       <Style>
                         <FontFamily>Myriad Pro</FontFamily>
                         <FontSize>8pt</FontSize>