$capacitystring => '';
$lossperleague => '';
$capitalstring => '';
+$minprofitstring => '';
$someresults
$emsgokorprint
+$allargs
</%args>
<%perl>
</%perl>
-<h1>Specify route</h1>
-
% # Sadly we need to do this rather hacky thing to make it be a POST
% # form if the user has already selected some thing(s)
% if (!$qa->{Dropdowns}) {
% } (0..$qa->{Dropdowns}-1));
% }
+<div class="query">
+
+<h1>Specify route</h1>
+
% $prselector->('ShowStalls');
<& enter_route, qa => $qa, dbh => $dbh, emsg_r => \$emsg,
% my $routeparams= { EmsgRef => \$emsg };
% if (!$qa->{Dropdowns}) {
-<& enter_advrouteopts, qa=>$qa, dbh=>$dbh, routeparams=>$routeparams &>
+<input type=submit name=submit value="<% $goupdate->() %>">
+<p>
+
+<& enter_advrouteopts, qa=>$qa, dbh=>$dbh,
+ minprofit_needs_apply => $be_post,
+ routeparams=>$routeparams &>
% } #---------- end of dropdowns, now common middle of page code ----------
-<input type=submit name=submit value="<% $goupdate->() %>">
% my $ours= sub { $_[0] =~
-% m/^island|^archipelago|^routestring|^capacitystring|^lossperleague|^capitalstring|^[RT]/;
+% m/^island|^archipelago|^routestring|^capacitystring|^lossperleague|^capitalstring|^minprofitstring|^[RT]/;
% };
<& "lookup:formhidden", ours => $ours &>
+</div>
+<div class="results">
<%perl>
#========== results ==========
dbh => $dbh,
islandids => \@islandids,
archipelagoes => \@archipelagoes,
- qa => $qa,
- routeparams => $routeparams
+ qa => $qa, quri => $quri,
+ routeparams => $routeparams,
+ reset_suppressions => !!$allargs->{'apply_minprofit'}
&>
% }
+</div>
</form>