summaryrefslogtreecommitdiff
path: root/httemplate/search
diff options
context:
space:
mode:
authorivan <ivan>2009-10-30 23:29:18 +0000
committerivan <ivan>2009-10-30 23:29:18 +0000
commit2c7d4f461a5d42178e88d04c34a3f8ca256ee285 (patch)
tree9e25ac1acfb715f2deeda3f76641a96d8461d65f /httemplate/search
parent5b76f0c1b944534613058a4b9252d5952406c557 (diff)
more reporting options for failed billing events, RT#6447
Diffstat (limited to 'httemplate/search')
-rw-r--r--httemplate/search/cust_event.html15
-rw-r--r--httemplate/search/report_cust_event.html66
2 files changed, 38 insertions, 43 deletions
diff --git a/httemplate/search/cust_event.html b/httemplate/search/cust_event.html
index f8cf6b2a6..b22644efe 100644
--- a/httemplate/search/cust_event.html
+++ b/httemplate/search/cust_event.html
@@ -157,12 +157,18 @@ my $title = $cgi->param('failed') ? 'Failed billing events' : 'Billing events';
my %search = ();
-my @scalars = qw ( agentnum custnum invnum pkgnum failed );
-for my $param ( @scalars ) {
+my @scalars = qw( agentnum status custnum invnum pkgnum failed );
+for my $param (@scalars) {
$search{$param} = scalar( $cgi->param($param) )
if $cgi->param($param);
}
+#lists
+my @lists = qw( payby eventpart );
+foreach my $param (@lists) {
+ $search{$param} = [ $cgi->param($param) ];
+}
+
my($beginning, $ending) = FS::UI::Web::parse_beginning_ending($cgi);
$search{'beginning'} = $beginning;
$search{'ending'} = $ending;
@@ -208,6 +214,11 @@ my $html_init = join("\n", map {
}
@params #keys %search
),
+ ( map { my $value = encode_entities( join(',', @{ $search{$_} } ) );
+ qq(<INPUT TYPE="hidden" NAME="$_" VALUE="$value">);
+ }
+ @lists
+ ),
qq!</FORM>!
} qw( print_ email_ fax_ ) ).
diff --git a/httemplate/search/report_cust_event.html b/httemplate/search/report_cust_event.html
index e63b6375d..f77a072dc 100644
--- a/httemplate/search/report_cust_event.html
+++ b/httemplate/search/report_cust_event.html
@@ -6,52 +6,36 @@
<FORM ACTION="cust_event.html" METHOD="GET">
<INPUT TYPE="hidden" NAME="failed" VALUE="<% $cgi->param('failed') ? 1 : 0 %>">
- <TABLE>
+ <TABLE BGCOLOR="#cccccc" CELLSPACING=0>
+
+ <TR>
+ <TH BGCOLOR="#e8e8e8" COLSPAN=2 ALIGN="left"><FONT SIZE="+1">Search options</FONT></TH>
+ </TR>
<% include( '/elements/tr-select-agent.html', 'disable_empty'=>0 ) %>
- <!--<TR>
- <TD ALIGN="right">Customer type</TD>
- <TD><SELECT MULTIPLE NAME="perhaps_payby">
- <OPTION SELECTED VALUE="CARD">Credit card (automatic)
- <OPTION SELECTED VALUE="CHEK">E-check (automatic)
- <OPTION SELECTED VALUE="LECB">Phone bill billing
- <OPTION SELECTED VALUE="BILL">Billing
- <OPTION SELECTED VALUE="DCRD">Credit card (on-demand)
- <OPTION SELECTED VALUE="DCHK">E-check (on-demand)
- </TD>
- </TR>
- -->
+ <% include( '/elements/tr-select-cust_main-status.html',
+ 'label' => 'Status'
+ )
+ %>
+
+ <% include( '/elements/tr-select-payby.html',
+ 'label' => 'Customer payment type',
+ 'payby_type' => 'cust',
+ 'multiple' => 1,
+ 'all_selected' => 1,
+ )
+ %>
+
+ <% include( '/elements/tr-select-part_event.html',
+ 'label' => 'Events',
+ 'multiple' => 1,
+ 'all_selected' => 1,
+ )
+ %>
+
<% include( '/elements/tr-input-beginning_ending.html' ) %>
- <!--
- <TR>
- <TD ALIGN="right">Events: </TD>
- <TD>
- <SELECT NAME="eventpart">
- <OPTION SELECTED VALUE=""><% $cgi->param('failed') ? '(all failed events)' : '(all events)' %>
-% #foreach my $part_bill_event ( qsearch( 'part_bill_event', {} ) ) {
-% #}
- </SELECT>
- </TD>
- </TR>
- -->
-<!-- <TR>
- <TD ALIGN="right">Events for payment type: </TD>
- <TD>
- <SELECT NAME="part_bill_event.payby">
- <OPTION SELECTED VALUE="">(all)
- <OPTION VALUE="CARD">Credit card (automatic)
- <OPTION VALUE="BILL">Billing
- <OPTION VALUE="CHEK">Electronic check (automatic)
- <OPTION VALUE="DCRD">Credit card (on-demand)
- <OPTION VALUE="DCHK">Electronic check (on-demand)
- <OPTION VALUE="LECB">Phone bill billing
- <OPTION VALUE="COMP">Complimentary
- </SELECT>
- </TD>
- </TR>
--->
</TABLE>
<BR><INPUT TYPE="submit" VALUE="Get Report">
</FORM>