diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb
index d660ba9ab..f1d03693a 100644
--- a/Compras/PopUpVerFactura.aspx.vb
+++ b/Compras/PopUpVerFactura.aspx.vb
@@ -2012,7 +2012,7 @@ Partial Class PopUpVerFactura
                 If Vta.Timbre.Comprobante.TipoComprobante = "I" Then 'AndAlso (dtVentas(0)("Total").ToString.ToDouble = dtVentas(0)("TotalPadre").ToString.ToDouble) Then
                     Vta.Timbre.CFDIRelacionados.TipoRelacion = "04"
                     Vta.Timbre.CFDIRelacionados.UUID.Add(dtVentas(0)("FolioFiscalPadre").ToString)
-                    Vta.Timbre.CFDIRelacionados.TipoRelacionTexto = "Refacturación de Ingreso"
+                    Vta.Timbre.CFDIRelacionados.TipoRelacionTexto = "Sustitución de los CFDI Previos"
                 End If
 
                 If UsuarioActual.Empresa.Funcionalidad(592) = "1" Then
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index b498de99f..8ebe04595 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -11026,7 +11026,7 @@ Partial Class Ventas
                             Timbre.CFDIRelacionados.TipoRelacionTexto = "03-Devolución aplicada a Ingreso"
                         Case 4
                             Timbre.CFDIRelacionados.TipoRelacion = "04"
-                            Timbre.CFDIRelacionados.TipoRelacionTexto = "04-Refacturación de Ingreso"
+                            Timbre.CFDIRelacionados.TipoRelacionTexto = "04-Sustitución de los CFDI Previos"
                         Case 7
                             Timbre.CFDIRelacionados.TipoRelacion = "07"
                             Timbre.CFDIRelacionados.TipoRelacionTexto = "07-CFDI por aplicación de anticipo"