X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fsearch%2Freport_cust_pkg.html;h=3da59c2ac3d732237fc63bec8eb3f922c50cf25c;hb=4dc8bf3514ea36d834b238d5af0098779c4a44ad;hp=fcc0934104de3ccb55544a3e794c10bbcabdb8d7;hpb=63a268637b2d51a8766412617724b9436439deb6;p=freeside.git diff --git a/httemplate/search/report_cust_pkg.html b/httemplate/search/report_cust_pkg.html index fcc093410..3da59c2ac 100755 --- a/httemplate/search/report_cust_pkg.html +++ b/httemplate/search/report_cust_pkg.html @@ -1,4 +1,4 @@ -<% include('/elements/header.html', $title ) %> +<& /elements/header.html, mt($title, @title_arg) &>
@@ -7,7 +7,7 @@ - @@ -33,7 +33,7 @@ if ( what.options[what.selectedIndex].value == '<% $status %>' ) { -% foreach my $field (qw( setup last_bill bill adjourn susp expire cancel )) { +% foreach my $field (@date_fields) { % if ( $disable{$status}->{$field} ) { what.form.<% $field %>_beginning_text.disabled = true; @@ -89,7 +89,7 @@ % } -% foreach my $field (qw( setup last_bill bill adjourn susp expire cancel )) { +% foreach my $field (@date_fields) { @@ -137,11 +137,11 @@ <% include( '/elements/tr-selectmultiple-part_pkg.html' ) %> - + - + <% include( '/elements/tr-select-cust-fields.html' ) %> @@ -159,6 +159,8 @@ die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('List packages'); my $title = 'Package Report'; +#false laziness w/report_cust_bill.html +my @title_arg = (); my $custnum = ''; if ( $cgi->param('custnum') =~ /^(\d+)$/ ) { @@ -168,29 +170,33 @@ if ( $cgi->param('custnum') =~ /^(\d+)$/ ) { 'hashref' => { 'custnum' => $custnum }, 'extra_sql' => ' AND '. $FS::CurrentUser::CurrentUser->agentnums_sql, }) or die "unknown custnum $custnum"; - $title .= ': '. $cust_main->name; + $title .= ': [_1]'; + push @title_arg, $cust_main->name; } <%once> -my %label = ( - 'setup' => 'Setup', - 'last_bill' => 'Last bill', - 'bill' => 'Next bill', - 'adjourn' => 'Adjourns', - 'susp' => 'Suspended', - 'expire' => 'Expires', - 'cancel' => 'Cancelled', -); +tie my %label, 'Tie::IxHash', + 'setup' => 'Setup', + 'last_bill' => 'Last bill', + 'bill' => 'Next bill', + 'adjourn' => 'Adjourns', + 'susp' => 'Suspended', + 'dundate' => 'Suspension delayed until', + 'expire' => 'Expires', + 'contract_end' => 'Contract ends', + 'cancel' => 'Cancelled', +; +my @date_fields = keys %label; #false laziness w/cust_pkg.cgi my %disable = ( 'all' => {}, 'not yet billed' => { 'setup'=>1, 'last_bill'=>1, 'bill'=>1, 'adjourn'=>1, 'susp'=>1, 'expire'=>1, 'cancel'=>1, }, - 'one-time charge' => { 'last_bill'=>1, 'bill'=>1, 'adjourn'=>1, 'susp'=>1, 'expire'=>1, 'cancel'=>1, }, + 'one-time charge' => { 'last_bill'=>1, 'bill'=>1, 'adjourn'=>1, 'susp'=>1, 'expire'=>1, 'cancel'=>1, 'contract_end'=>1, 'dundate'=>1, }, 'active' => { 'susp'=>1, 'cancel'=>1 }, - 'suspended' => { 'cancel' => 1 }, + 'suspended' => { 'cancel'=>1, 'dundate'=>1, }, 'cancelled' => {}, '' => {}, ); @@ -201,6 +207,7 @@ my %checkbox = ( 'last_bill' => 0, 'bill' => 0, 'susp' => 1, + 'dundate' => 1, 'expire' => 1, 'cancel' => 1, );
+ Search options
<% $label{$field} %>
  
Display optionsDisplay options