<& /elements/header.html, $title &> % #foreach my $group (keys(%$errors)) { % foreach my $error (@$errors) { % my $group = (keys %$error)[0]; % unless ($error->{$group}->{'errors'}) { %} % foreach my $e (keys(%{$error->{$group}->{'errors'}})) { % foreach my $err (keys(%{$error->{$group}->{'errors'}->{$e}->{'errors'}})) { % } % }

Found <% $error->{$group}->{'count'} %> <% $error->{$group}->{'description'} %> attached to <% $export %> export. % if ($error->{$group}->{'errors'}) { (<% scalar(keys %{$error->{$group}->{'errors'}}) %>) error(s) % }
	No errors found
	<% $error->{$group}->{'errors'}->{$e}->{'description'} %> % if ($error->{$group}->{'errors'}->{$e}->{'link'}) { (edit) % }
		<% $error->{$group}->{'errors'}->{$e}->{'errors'}->{$err} %>

% } <& /elements/footer.html &> <%init> my $DEBUG = $cgi->param('debug') || 0; my $conf = new FS::Conf; my $export = $cgi->param('export'); my $title = $export." export test"; my $opts = { 'fsurl' => $fsurl, }; my $exports = FS::part_export::export_info(); my $class = "FS::part_export::$export" if $exports->{$export}; my $errors = $class->test_export_report($opts);