diff --git a/App_Code/Modelos.vb b/App_Code/Modelos.vb
index 9897b9d96..8dc90d7c4 100644
--- a/App_Code/Modelos.vb
+++ b/App_Code/Modelos.vb
@@ -5508,6 +5508,14 @@ Namespace Modelos
                                                                 AutoConta = False
                                                             End If
 
+
+                                                            If Not ErrorCancelar AndAlso ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, -1) Then
+                                                                If ObjConta.ValorPolizaDescuadre > 0 Then
+                                                                    GuardaLogAD($"Modelos/RecepcionEntrega | Error{ObjConta.MensajePolizaDescuadre} Diferencia{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
+                                                                    ErrorCancelar = True
+                                                                End If
+                                                            End If
+
                                                             If AutoConta And Not ErrorCancelar Then
 
                                                                 If IdCtaContable > 0 Then
diff --git a/Bancos/IE.aspx.vb b/Bancos/IE.aspx.vb
index 15c9ae491..5e3f93992 100644
--- a/Bancos/IE.aspx.vb
+++ b/Bancos/IE.aspx.vb
@@ -5845,6 +5845,8 @@ Partial Class Bancos_IE
                 TxtObservaciones.Text = $"SOLICITUD DE VIÁTICOS - FOLIO {ObjBancos.DtResultados.FiltroPrimeroValor("Folio").ToString()}: {ObjBancos.DtResultados.FiltroPrimeroValor("Asunto").ToString()}."
             End If
             ObjBancos.Dispose()
+
+            RBL_SelectedIndexChanged(Nothing, Nothing)
         End If
     End Sub
 #End Region
diff --git a/Bancos/PagoAcreedor.aspx b/Bancos/PagoAcreedor.aspx
index fb07433fd..3e313be87 100644
--- a/Bancos/PagoAcreedor.aspx
+++ b/Bancos/PagoAcreedor.aspx
@@ -377,7 +377,7 @@
                                             <ItemTemplate>
                                                 <asp:TextBox ID="TxtAbonar" Width="80px" runat="server" Style="text-align: right;" onkeyup="FormatoMoneda(this)"></asp:TextBox>
                                                 <asp:RangeValidator ID="RVAbonar" runat="server" Enabled="false" Type="Currency" MinimumValue="0" MaximumValue='<%# Eval("Saldo", "{0:N2}") %>' ErrorMessage="*" ControlToValidate="TxtAbonar" Display="Dynamic"></asp:RangeValidator>
-                                                <asp:TextBox ID="TxtCveMoneda" Enabled="false" Width="80px" Text='<%# Eval("CveMoneda")%>'  runat="server" Style="text-align: right;"></asp:TextBox>
+                                                <asp:TextBox ID="TxtCveMoneda" Enabled="false" Width="80px" Text='<%# Eval("CveMoneda")%>'  runat="server" Style="text-align: right;" Visible="false"></asp:TextBox>
                                             </ItemTemplate>
                                         </asp:TemplateField>
                                         <asp:TemplateField Visible="false">
diff --git a/Bancos/PagoAcreedor.aspx.cs b/Bancos/PagoAcreedor.aspx.cs
index df4599748..5dbf0ec6c 100644
--- a/Bancos/PagoAcreedor.aspx.cs
+++ b/Bancos/PagoAcreedor.aspx.cs
@@ -351,30 +351,32 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
                         ImporteBancosMN = (Importe * TCPago).RoundSQL();
                         ImporteAcreedorMN = (Importe * TC).RoundSQL();
 
-                        //if (CveMonedaPago == 1 && tCveMoneda == 1)
-                        //{
-                        //    ImporteMN = Importe;
-                        //    ImporteComisionMN = ImporteComision;             
-                        //}
-                        //else if (CveMonedaPago == 1 && tCveMoneda == 2)
-                        //{
-                        //    ImporteComisionMN = ImporteComision;
-                                                       
-                        //    ImporteMN = Importe;
-                        //    ImporteComplementaria  = (Importe * TC - Importe).RoundSQL();                            
-                        //}
-                        //else if (CveMonedaPago == 2 && tCveMoneda == 1)
-                        //{
-                        //    ImporteMN = Importe;
-                        //    ImporteComisionMN = ImporteComision;
-                        //    ImporteComplementaria = 0; 
-                        //}
-                        //else if (CveMonedaPago == 2 && tCveMoneda == 2)
-                        //{
-                        //    ImporteComisionMN = ImporteComision;                           
-                        //    ImporteMN = Importe;
-                        //    ImporteComplementaria = (Importe * TC - Importe).RoundSQL();                            
-                        //}
+                        if (CveMonedaPago == 1 && tCveMoneda == 1)
+                        {
+                            //ImporteMN = Importe;
+                            //ImporteComisionMN = ImporteComision;
+                        }
+                        else if (CveMonedaPago == 1 && tCveMoneda == 2)
+                        {
+                            //ImporteComisionMN = ImporteComision;
+
+                            //ImporteMN = Importe;
+                            //ImporteComplementaria = (Importe * TC - Importe).RoundSQL();
+                        }
+                        else if (CveMonedaPago == 2 && tCveMoneda == 1)
+                        {
+                            ImporteBancosMN = Importe;
+                            ImporteMN = Importe;
+                            //ImporteComisionMN = ImporteComision;
+                            //ImporteComplementaria = 0;
+                        }
+                        else if (CveMonedaPago == 2 && tCveMoneda == 2)
+                        {
+                            
+                            //ImporteComisionMN = ImporteComision;
+                            //ImporteMN = Importe;
+                            //ImporteComplementaria = (Importe * TC - Importe).RoundSQL();
+                        }
 
                         //ImporteMN = ImporteMN.RoundSQL();
                         //ImporteComplementaria = ImporteComplementaria.RoundSQL();
diff --git a/Empresas/119/Formatos/RepIVA.rpt b/Empresas/119/Formatos/RepIVA.rpt
index c09e9e811..214b40af6 100644
Binary files a/Empresas/119/Formatos/RepIVA.rpt and b/Empresas/119/Formatos/RepIVA.rpt differ
diff --git a/Empresas/119/Formatos/RepIVAAcreditable.rpt b/Empresas/119/Formatos/RepIVAAcreditable.rpt
index a1124d4e7..5b9781196 100644
Binary files a/Empresas/119/Formatos/RepIVAAcreditable.rpt and b/Empresas/119/Formatos/RepIVAAcreditable.rpt differ
diff --git a/Empresas/Grales/Formatos/RepIVA.rpt b/Empresas/Grales/Formatos/RepIVA.rpt
index 46c367c4c..629f1ee5d 100644
Binary files a/Empresas/Grales/Formatos/RepIVA.rpt and b/Empresas/Grales/Formatos/RepIVA.rpt differ
diff --git a/Empresas/Grales/Formatos/RepIVAAcreditable.rpt b/Empresas/Grales/Formatos/RepIVAAcreditable.rpt
index 25fec2118..9b6052ed7 100644
Binary files a/Empresas/Grales/Formatos/RepIVAAcreditable.rpt and b/Empresas/Grales/Formatos/RepIVAAcreditable.rpt differ
diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb
index 73704b612..9ecfe5bbe 100644
--- a/Inventarios/EntradasSalidas.aspx.vb
+++ b/Inventarios/EntradasSalidas.aspx.vb
@@ -1910,6 +1910,9 @@ Partial Class Inventarios_EntradasSalidas
                                     If UsuarioActual.Empresa.Funcionalidad(342).ToEntero > 0 Then
                                         IdCtaContableOtro = UsuarioActual.Empresa.Funcionalidad(342).ToEntero
                                     End If
+                                Case 34
+                                    CveConceptoContable = 51
+                                    EsContabilizable = True
                                 Case 13, 29
                                     CveConceptoContable = 69
                                     TipoMovtoOtro = True
@@ -1930,7 +1933,7 @@ Partial Class Inventarios_EntradasSalidas
                             Else
 
                                 'Dim Total As Decimal = 0
-                                If CveConceptoContable.Contiene(181, 78) Then
+                                If CveConceptoContable.Contiene(181, 78, 51) Then
                                     Dim Dt As DataTable = ObjInventario.DtResultados.FiltraParametros("", "", {"CveClasificacion"}).Copy
                                     'Dim IdCuentaGasto As Integer = 0
                                     For Each Dr As DataRow In Dt.Rows
diff --git a/Inventarios/EntregaAlmacen.aspx.vb b/Inventarios/EntregaAlmacen.aspx.vb
index 9c4e09413..c011b8eb8 100644
--- a/Inventarios/EntregaAlmacen.aspx.vb
+++ b/Inventarios/EntregaAlmacen.aspx.vb
@@ -3137,7 +3137,7 @@ Partial Class Inventarios_EntregaAlmacen
 
                         If Not ErrorMovInv AndAlso ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, -1) Then
                             If ObjConta.ValorPolizaDescuadre > 0 Then
-                                GuardaLogAD($"Compras/Compras-Guardar | Error{ObjConta.MensajePolizaDescuadre} Diferencia{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
+                                GuardaLogAD($"Inventario/EntregaAlmacen | Error{ObjConta.MensajePolizaDescuadre} Diferencia{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
                                 ErrorMovInv = True
                             End If
                         End If
diff --git a/RH/SolicitudViaticos.aspx.cs b/RH/SolicitudViaticos.aspx.cs
index 39f049ba5..341ed2e16 100644
--- a/RH/SolicitudViaticos.aspx.cs
+++ b/RH/SolicitudViaticos.aspx.cs
@@ -151,10 +151,12 @@ public partial class RH_SolicitudViaticos : ClsPaginas
         }
         else
         {
-            if ((UsuarioActual.CveEmpresa == 72 || UsuarioActual.CveEmpresa == 1 || UsuarioActual.CveEmpresa == 2) && UsuarioActual.CvePersonal > 0)
+
+            if ((UsuarioActual.CveEmpresa.Contiene(1,2,72,  172, 173, 174)) && UsuarioActual.CvePersonal > 0)
             {
                 CargaFolio();
             }
+           
 
             BtnGuardar.Text = "Guardar";
             LnkImprimirExcel.Visible = false;