+$cgi->param('dummy', 1);
+my $countrycode_filter_change =
+ "window.location = '".
+ $cgi->self_url. ";countrycode=' + this.options[this.selectedIndex].value;";
+
+my $countrycode = '';
+my $extra_sql = $group_sql;
+my $count_query = $base_count_sql;
+if ( $cgi->param('countrycode') =~ /^(\d+)$/ ) {
+ $countrycode = $1;
+ my $ccode_sql = '( SELECT countrycode FROM rate_prefix
+ WHERE rate_prefix.regionnum = rate_region.regionnum
+ LIMIT 1
+ )';
+ $extra_sql = " WHERE $ccode_sql = '$1' $extra_sql";
+ $count_query .= " WHERE $ccode_sql = '$1'";
+}
+
+my $html_posttotal =
+ '(show countrycode: '.
+ qq(<SELECT NAME="countrycode" onChange="$countrycode_filter_change">).
+ qq(<OPTION VALUE="">(all)).
+ join("\n", map { qq(<OPTION VALUE="$_").
+ ($_ eq $countrycode ? ' SELECTED' : '' ).
+ ">$_",
+ }
+ FS::rate_prefix->all_countrycodes
+ ).
+ '</SELECT>)';
+