X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?a=blobdiff_plain;f=yarrg%2Fweb%2Fquery_routesearch;h=3f65fc3ca0aff7f15a35581c4e34fe9a38edb0c0;hb=43454422b2df5e0dcfe144fcb871a2b6f9c1a3d0;hp=b9b734806968750d406d0f52eb4a5735e3ecbc1b;hpb=30375dc1932be83a48fca8122e81b845c4b0ecc2;p=ypp-sc-tools.web-test.git diff --git a/yarrg/web/query_routesearch b/yarrg/web/query_routesearch index b9b7348..3f65fc3 100644 --- a/yarrg/web/query_routesearch +++ b/yarrg/web/query_routesearch @@ -36,13 +36,18 @@ <%args> $quri $dbh +$baseqf +$queryqf $islandstring => ''; $capacitystring => ''; $lossperleague => ''; $capitalstring => ''; +$minprofitstring => ''; $distance => ''; +$prselector $someresults $emsgokorprint +$allargs %args> <%perl> @@ -54,6 +59,7 @@ my @islandids; my $maxmaxdist=35; my $maxcpu=90; +my $concur_lim=5; my $qa= \%ARGS; my $routeparams= { EmsgRef => \$emsg, SayRequiredCapacity => 1 }; @@ -62,12 +68,15 @@ my $maxcountea=15; %perl> +