From 9493637c44b0e22b2b9f72cf9e2748585064be56 Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Wed, 2 Sep 2009 23:55:19 +0100 Subject: [PATCH 1/1] Plumb max mass/vol through to routetrade --- yarrg/web/query_route | 4 +++- yarrg/web/routetrade | 7 +++++++ 2 files changed, 10 insertions(+), 1 deletion(-) diff --git a/yarrg/web/query_route b/yarrg/web/query_route index d4a3bd1..759c9c5 100644 --- a/yarrg/web/query_route +++ b/yarrg/web/query_route @@ -238,7 +238,9 @@ for my $dd (0..$qa->{Dropdowns}-1) { dbh => $dbh, islandids => \@islandids, archipelagoes => \@archipelagoes, - qa => $qa + qa => $qa, + max_mass => $max_mass, + max_volume => $max_volume &> % } diff --git a/yarrg/web/routetrade b/yarrg/web/routetrade index 5db4c58..7e1a06e 100644 --- a/yarrg/web/routetrade +++ b/yarrg/web/routetrade @@ -38,11 +38,18 @@ $dbh @islandids @archipelagoes $qa +$max_mass +$max_volume <&| script &> da_pageload= Date.now(); +% if (defined $max_mass || defined $max_volume) { +WARNING - VESSEL CAPACITY LIMIT NOT YET IMPLEMENTED +

+% } + <%perl> my $now= time; -- 2.30.2