Subversion Repositories VORC

Rev

Rev 58 | Rev 65 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 58 Rev 62
Line 114... Line 114...
114
		return $filter =~ /^\d+$/ ? "$colName = $filter" : $filter eq "true" ? "isnull($colName) = 0" : "isnull($colName) = 1";
114
		return $filter =~ /^\d+$/ ? "$colName = $filter" : $filter eq "true" ? "isnull($colName) = 0" : "isnull($colName) = 1";
115
	} else {
115
	} else {
116
    no strict;
116
    no strict;
117
    my @options = ("", "true", "-blank-");
117
    my @options = ("", "true", "-blank-");
118
    my $dbh = getRCDBH;
118
    my $dbh = getRCDBH;
119
    push @options, map { @{$_} } $dbh->selectall_array ("select distinct RCid from v_ticket where isnull(RCid) = 0 order by RCid");
119
    push @options, map { @{$_} } @{$dbh->selectall_arrayref ("select distinct RCid from v_ticket where isnull(RCid) = 0 order by RCid")};
Line 120... Line 120...
120
    
120
    
121
    @options = map { $FORM{"filter-RCid"} eq $_ ?
121
    @options = map { $FORM{"filter-RCid"} eq $_ ?
122
                       ( $h->option ({ selected=>[] }, $_) ) :
122
                       ( $h->option ({ selected=>[] }, $_) ) :