diff --git a/Ventas/PV.aspx.vb b/Ventas/PV.aspx.vb
index 3900a78d9..4ddb7a3de 100644
--- a/Ventas/PV.aspx.vb
+++ b/Ventas/PV.aspx.vb
@@ -3541,6 +3541,12 @@ Partial Class PV
             If ObjFactura.CveAlmacenTraspasoDestino <= 0 And ObjFactura.TipoDocto = "Rem" Then
                 ObjFactura.ErrorList.Add("Ocurrió un error al seleccionar el almacen de entrega por adelantado de la sucursal.")
             End If
+
+            'SI LA SUCURSAL NO TIENE SERVICIO A DOMICILIO 
+            If ObjFactura.ServicioDomicilio AndAlso ObjFactura.CveAlmacenServicioDomicilio <= 0 And ObjFactura.TipoDocto = "Rem" Then
+                ObjFactura.ErrorList.Add("No existe un almacen configurado como 'Servicio a Domicilio' en esta sucursal.")
+            End If
+
         End If
 
     End Sub