diff --git a/Inventarios/RecepcionAlmacen.aspx.vb b/Inventarios/RecepcionAlmacen.aspx.vb
index 544982725..2bb004a3f 100644
--- a/Inventarios/RecepcionAlmacen.aspx.vb
+++ b/Inventarios/RecepcionAlmacen.aspx.vb
@@ -3330,6 +3330,7 @@ Partial Class Inventarios_RecepcionAlmacen
                     Dim CveConceptoContableCostoME As Integer = -1
                     Dim CveConceptoContableCostoComplementaria As Integer = -1
                     Dim UsaComplementariaFleteImportaciones As Boolean = True
+                    If UsuarioActual.CveEmpresa = 119 Then UsaComplementariaFleteImportaciones = False
 
                     If DtCostos.Rows.Count > 0 Then
                         If CveCompraSurtir > 0 Then
@@ -3356,7 +3357,6 @@ Partial Class Inventarios_RecepcionAlmacen
                                 CveConceptoContableCosto = 176
                                 CveConceptoContableCostoME = 228
                                 CveConceptoContableCostoComplementaria = 229
-
                                 UsaComplementariaFleteImportaciones = True
 
                             Else
@@ -3456,7 +3456,7 @@ Partial Class Inventarios_RecepcionAlmacen
 
                             If UsuarioActual.Empresa.Funcionalidad(200) = "1" Then
                                 If ObjConta.ContabilizarPrePoliza(CvePrePoliza, UsuarioActual.CveUsuario, UsuarioActual.Empresa) Then
-                                    MensajeContabilidad = $"<br>Movimiento contabilizado en el folio: <b><a class='Texto' href = '/Contabilidad/RegPoliza.aspx?IdPoliza={ObjConta.ContaIdPoliza}'>{ObjConta.ContaFolio}</a></b><br>"
+                                    MensajeContabilidad = $"<br>Movimiento contabilizado en el folio: <b><a class='Texto' href = '/Contabilidad/RegPrePolizaS.aspx?CvePrePoliza={CvePrePoliza}'>{ObjConta.ContaFolio}</a></b><br>"
                                 Else
                                     ErrorMovInv = True
                                     MensajeError = "Error al contabilizar los conceptos contables"