diff options
| author | jeff <jeff> | 2007-12-04 18:35:55 +0000 |
|---|---|---|
| committer | jeff <jeff> | 2007-12-04 18:35:55 +0000 |
| commit | 76c7355b1f97f99b5a3f673cf72429761924ee31 (patch) | |
| tree | cef9fd31b8a875303ee93ee3d16e7f85e2c927ee /httemplate | |
| parent | e8a09e945986a32f9b7d0a5d546142ada91654ca (diff) | |
add suspend/cancel reason to advanced package report (#2779)
Diffstat (limited to 'httemplate')
| -rwxr-xr-x | httemplate/search/cust_pkg.cgi | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/httemplate/search/cust_pkg.cgi b/httemplate/search/cust_pkg.cgi index 5c209eba7..b354bc133 100755 --- a/httemplate/search/cust_pkg.cgi +++ b/httemplate/search/cust_pkg.cgi @@ -16,6 +16,7 @@ 'Susp.', 'Expire', 'Cancel', + 'Reason', FS::UI::Web::cust_header( $cgi->param('cust_fields') ), @@ -46,6 +47,17 @@ ( map { time_or_blank($_) } qw( setup last_bill bill adjourn susp expire cancel ) ), + sub { my $self = shift; + my $return = ''; + if ($self->getfield('cancel') || + $self->getfield('suspend')) { + my $reason = $self->last_reason;# too inefficient? + $return = $reason->reason if $reason; + + } + $return; + }, + \&FS::UI::Web::cust_fields, #sub { '<table border=0 cellspacing=0 cellpadding=0 STYLE="border:none">'. # join('', map { '<tr><td align="right" style="border:none">'. $_->[0]. |