From 060e87d9d31c3cd7e6e646ab8afd4835724fca58 Mon Sep 17 00:00:00 2001 From: rrene Date: Mon, 3 Mar 2025 17:36:52 -0700 Subject: [PATCH] --- cambio e cant de pasajeros --- Transportes/RepContratos.aspx.vb | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) 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