<%args>
$filename => undef
</%args>
<%init>
if ($filename){

	my $dbh = $m->comp("/_shared/procs/utils/dbi_connect.m", database=>'guianet');
	my ($req_key) = $dbh->selectrow_array("select reqkey from tdownloads where filename='$filename'");
	return $req_key;

}else{
	
	return undef;
	
}
</%init>
