[freeside-commits] branch master updated. 1ade81c5455b7a74a7ccc374bc980444f30f6a1a

Christopher Burger burgerc at freeside.biz
Tue Apr 30 10:46:01 PDT 2019


The branch, master has been updated
       via  1ade81c5455b7a74a7ccc374bc980444f30f6a1a (commit)
      from  90e15da7354b55cc5461b58ac087096ed47e0240 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 1ade81c5455b7a74a7ccc374bc980444f30f6a1a
Author: Christopher Burger <burgerc at freeside.biz>
Date:   Tue Apr 30 13:43:18 2019 -0400

    RT# 83211 - added new report

diff --git a/httemplate/search/report_svc_export_test.cgi b/httemplate/search/report_svc_export_test.cgi
new file mode 100644
index 000000000..b02f0e216
--- /dev/null
+++ b/httemplate/search/report_svc_export_test.cgi
@@ -0,0 +1,44 @@
+<& /elements/header.html, $title &>
+
+% #foreach my $group (keys(%$errors)) {
+% foreach my $error (@$errors) {
+% my $group = (keys %$error)[0];	
+<TABLE>
+  <TR><TH ALIGN="left" COLSPAN="3"><FONT SIZE="+1">
+    Found <% $error->{$group}->{'count'} %> <% $error->{$group}->{'description'} %> attached to <% $export %> export.
+% if ($error->{$group}->{'errors'}) {
+    <FONT COLOR="red">(<% scalar(keys %{$error->{$group}->{'errors'}}) %>) error(s)</FONT>
+% }
+  </FONT></TH></TR>
+% unless ($error->{$group}->{'errors'}) {
+    <TR><TD> </TD><TD COLSPAN=2><FONT COLOR="green">No errors found</FONT></TD></TR>
+%}
+% foreach my $e (keys(%{$error->{$group}->{'errors'}})) {
+    <TR><TD> </TD><TD COLSPAN=2>
+      <% $error->{$group}->{'errors'}->{$e}->{'description'} %>
+%     if ($error->{$group}->{'errors'}->{$e}->{'link'}) {
+	   <A HREF="<% $error->{$group}->{'errors'}->{$e}->{'link'} %>">(edit)</A>
+%     }
+    </TD></TR>
+%   foreach my $err (keys(%{$error->{$group}->{'errors'}->{$e}->{'errors'}})) {
+      <TR><TD> </TD><TD> </TD><TD><FONT COLOR="red" SIZE="-1"><% $error->{$group}->{'errors'}->{$e}->{'errors'}->{$err} %></FONT></TD></TR>
+%   }
+% }  
+</TABLE>
+% }
+<& /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);
+
+</%init>
\ No newline at end of file

-----------------------------------------------------------------------

Summary of changes:
 httemplate/search/report_svc_export_test.cgi | 44 ++++++++++++++++++++++++++++
 1 file changed, 44 insertions(+)
 create mode 100644 httemplate/search/report_svc_export_test.cgi




More information about the freeside-commits mailing list