Changeset 27890

Timestamp:

May 10, 2010, 10:08:21 AM (16 years ago)

Author:

Paul Price

Message:

Adding selection by data_group.

File:

• trunk/tools/errors.pl (modified) (3 diffs)

trunk/tools/errors.pl

@@ -12 +12 @@
 my ($db_host, $db_name, $db_user, $db_pw); # Database details
 my ($label);                               # Label
+my ($group);                               # Data group
 my ($stage);                               # Stage of interest
 my ($fault);                               # Fault code of interest
@@ -23 +24 @@
            'stage=s' => \$stage, # Stage
            'label=s@' => \$label, # Label(s)
+           'data_group=s@' => \$group, # Data group(s)
            'fault=s' => \$fault, # Fault code
            'limit=s' => \$limit, # Limit to query
@@ -82 +84 @@
 my $where = "";                 # WHERE restriction
 $where .= " AND ($label_table.label LIKE '" . join("' OR $label_table.label LIKE '", @$label) . "')" if defined $label;
+$where .= " AND ($label_table.data_group LIKE '" . join("' OR $label_table.data_group LIKE '", @$group) . "')" if defined $group;
 $where .= " AND $fault_table.fault = $fault" if defined $fault;