Below I want to take the value they select form a list and place it into the
where clause of the SQL statement. How do I get there from here? I know I
need a submit button, where does that go in the structure of the print
$query???
if ($guess eq "") {
print header;
print $query->scrolling_list(-name=>'name_list',
-values=>['total_games','total_units'],
-default=>[' total_games ',' total_units '],
-size=>5,
-multiple=>'true',
-labels=>\%labels);
}
print $query->end_html;
print "\n";
elsif (guess ne "") {
$ora_sth = $ora_dbh->prepare ( q
{
select
timestamp,
report_type,
data_name,
data_value
from
dwhs.mainstream_games_reports
where
report_type = $guess and
timestamp >= sysdate - 7
} ) || die "Can't prepare statement: $DBI::errstr";
Stefan Ward
Data Warehouse Eng
Sony Online Entertainment
www.station.sony.com <http://www.station.sony.com>
858-577-3074
