<%args>
$reqkey => undef
$user => undef
$extra_info => undef
</%args>
<%init>
my $dbh = $m->comp("/_shared/procs/utils/dbi_connect.m", database=>'guianet');
my ($id,$reqdate,$updated) = $dbh->selectrow_array("select id, reqdate, updated from tdownloads_history where reqkey='$reqkey' and username='$user' order by updated limit 1");
return ($id,$reqdate,$updated) if $extra_info;
return ($id);
</%init>
