X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.db-live.git;a=blobdiff_plain;f=yarrg%2Fweb%2Fquery_commod;h=153ea792c92e7f9abcc9eac7472d37c72bdb7fca;hp=574f373f4ce2bec0b0a61d0d4e702246374aae63;hb=29010a75143814a91b4f5200454bea879280e7c1;hpb=ace8b7e1933e7da5e615a837cd47aeea1a4a23a2 diff --git a/yarrg/web/query_commod b/yarrg/web/query_commod index 574f373..153ea79 100644 --- a/yarrg/web/query_commod +++ b/yarrg/web/query_commod @@ -50,6 +50,7 @@ my ($commodname,$cmid); my $qa= \%ARGS; +

Commodity enquiry

% $prselector->('BuySell'); @@ -69,6 +70,8 @@ my $qa= \%ARGS; %#========== results ========== +
+
<%perl> $emsgokorprint->($emsg) or $cmid=undef; @@ -109,9 +112,14 @@ foreach my $bs (split /_/, $ARGS{BuySell}) { % my $rowix= 0; % while ($island= $islands->fetchrow_hashref) { % if (!$rowix) { - +
++++ -
+ + Prices Quantity at price