diff --git a/Transportes/RepContratos.aspx.vb b/Transportes/RepContratos.aspx.vb
index 8ded38a68..744f1aa8b 100644
--- a/Transportes/RepContratos.aspx.vb
+++ b/Transportes/RepContratos.aspx.vb
@@ -248,15 +248,13 @@ Partial Class ListadoContratos
     Private Function VallidaCantidadPasajeros(CveTipoAF As Integer, Cantidad As Integer) As Boolean
 
         Dim Respuesta As Boolean = True
-
-        If CveTipoAF = 181 And Cantidad < 30 Then 'autobus
+        If CveTipoAF = 181 And Cantidad < 21 Then 'autobus
             Respuesta = False
-            Alert("El tipo unidad autobus debe de tener un minimo de 30 pasajeros.", TipoMensaje.MsgAdvertencia)
+            Alert("El tipo unidad autobus debe de tener un minimo de 22 pasajeros.", TipoMensaje.MsgAdvertencia)
         ElseIf CveTipoAF = 184 And Cantidad > 21 Then 'sprinter
             Respuesta = False
             Alert("El tipo de unidad sprinter no puede tener más de 21 pasajeros.", TipoMensaje.MsgAdvertencia)
         End If
-
         Return Respuesta
 
     End Function