- Timestamp:
- 08/17/17 16:17:38 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cgi-bin/search-rpc.cgi
r908 r909 162 162 163 163 if ($args{type}) { 164 # assume alloctype class if we only get one letter 165 $args{type} = "_$args{type}" if $args{type} =~ /^.$/; 164 166 my $notflag = ''; 165 167 if ($args{type} =~ /^NOT:/) { … … 235 237 } 236 238 239 # Filter on "available", because we can. 240 if ($args{available} && $args{available} =~ /^[yn]$/) { 241 push @fields, "s.available"; 242 push @matchtypes, '='; 243 push @vals, $args{available}; 244 } 245 237 246 my $cols = "s.cidr, s.custid, s.type, s.city, s.description, s.id, s.parent_id, s.available, s.vrf, a.dispname"; 238 247 my $sql = qq(SELECT $cols FROM searchme s JOIN alloctypes a ON s.type = a.type);
Note:
See TracChangeset
for help on using the changeset viewer.