#
# hide_ignored.pl
# Unset display_ignored, so excluded records are not output

use strict;

#Usage:
#hide_ignored.pl _url_
#where _url_ (usually the URL of calling report) will be brought up (refresh'ed)
#after setting the variable.


{


#Allow for url to contain ,'s itself 
my ($url) = split(/,/, $::html_script_args,1);


my $message = <<EOF;
<p>
Excluded records will no longer be displayed.
</p>
EOF

if ( ! $url )
{	$message= <<EOF2;
<h3>ERROR</h3>
<strong> reporting/hide_ignored.pl called with wrong number of parameters.
</strong>
<p>
usage: <code>hide_ignored.pl <var>url</var></code>
EOF2

	$url=$::HTML_ROOT;
}

$Exclusions::display_ignored=undef;

&refresh_html(\*::CLIENT,$url,0,$message);
}

