use SL::DBUtils;
use SL::CVar;
+use strict;
+
my %project_id_column_prefixes = ("ar" => "global",
"ap" => "global",
"oe" => "global",
$params{active} = 1;
}
- $query = qq|UPDATE project SET projectnumber = ?, description = ?, active = ?
+ my $query = qq|UPDATE project SET projectnumber = ?, description = ?, active = ?
WHERE id = ?|;
@values = ($params{projectnumber}, $params{description}, $params{active} ? 't' : 'f', conv_i($params{id}));