--Se arregló el PA_Trans_ViajesPasajerosAdd

Transportes/Boletos.aspx.vb

@@ -152,12 +152,13 @@ Partial Class Boletos
 
             If retorno > 1 Then
                 ObjTransporte.Commit()
+                Alert("Boleto creado correctamente.")
             End If
         Catch ex As Exception
             Alert($"No se pudo generar el boleto {ex}", TipoMensaje.MsgError)
         Finally
             ObjTransporte.Dispose()
-
+            Response.Redirect($"/Transportes/Boletos.aspx?CveViaje={CveViaje}")
         End Try
 
     End Sub

Transportes/ListadoBoletos.aspx.vb

@@ -51,7 +51,13 @@ Partial Class ListadoBoletos
         Try
             ObjTransportes.IniciaTransacSQL()
             If ObjTransportes.UpdateViajesPasajeros(CveViajePasajero.ToEntero, Activar:=True, Estatus:=cambiarEstatus) Then
-                Alert("El boleto ha sido cancelado correctamente.")
+
+                If cambiarEstatus Then
+                    Alert($"El boleto ha sido cancelado correctamente.")
+                Else
+                    Alert($"El boleto ha sido reactivado correctamente.")
+
+                End If
             End If
             ObjTransportes.Commit()