add progressbar, redirection, and improve links RT#8274

2 files changed, 12 insertions, 11 deletions

diff --git a/httemplate/search/report_newtax.html b/httemplate/search/report_newtax.html
index 2588b48d3..da39b0c4d 100755
--- a/httemplate/search/report_newtax.html
+++ b/httemplate/search/report_newtax.html
@@ -1,6 +1,6 @@
 <% include('/elements/header.html', 'Tax Report' ) %>
 
-<FORM ACTION="report_queued_newtax.cgi" METHOD="GET">
+<FORM NAME="newtax">
 
 <TABLE>
 
@@ -10,10 +10,17 @@
 
 </TABLE>
 
-<BR><INPUT TYPE="submit" VALUE="Get Report">
+<BR><INPUT TYPE="button" VALUE="Get Report" onClick="document.newtax.submit.disabled=true; process();">
 
 </FORM>
 
+<% include( '/elements/progress-init.html',
+            'newtax',
+            [ qw( agentnum beginning ending ) ],
+            'report_queued_newtax.cgi',
+          )
+%>
+
 <% include('/elements/footer.html') %>
 <%init>
 
diff --git a/httemplate/search/report_queued_newtax.cgi b/httemplate/search/report_queued_newtax.cgi
index 1d5813ece..a375fce62 100755
--- a/httemplate/search/report_queued_newtax.cgi
+++ b/httemplate/search/report_queued_newtax.cgi
@@ -1,16 +1,10 @@
-<% include("/elements/header.html", "Queue Tax Report") %>
-<% include("/elements/error.html") %>
-% unless ($error) {
-  <CENTER>
-  Report queued.  Check the job queue for status.
-  </CENTER>
-% }
-<% include("/elements/footer.html") %>
+<% $server->process %>
 <%init>
 
 die "access denied"
   unless $FS::CurrentUser::CurrentUser->access_right('Financial reports');
 
-my $error = FS::tax_rate::queue_liability_report($cgi);
+my $server =
+   new FS::UI::Web::JSRPC 'FS::tax_rate::queue_liability_report', $cgi;
 
 </%init>