diff options
| author | Mark Wells <mark@freeside.biz> | 2012-08-14 17:02:47 -0700 |
|---|---|---|
| committer | Mark Wells <mark@freeside.biz> | 2012-08-14 17:02:47 -0700 |
| commit | 00938b30a69411a743aa01db5e27100818a3c82b (patch) | |
| tree | 378d531b00f90c6d8b12998eba792ed3970a22ab /httemplate/browse | |
| parent | 08ac47123e098939db3d94cc136ff02f174e8dd0 (diff) | |
unsuspend fees, #6587
Diffstat (limited to 'httemplate/browse')
| -rw-r--r-- | httemplate/browse/reason.html | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/httemplate/browse/reason.html b/httemplate/browse/reason.html index fe285be4a..14e97bf2f 100644 --- a/httemplate/browse/reason.html +++ b/httemplate/browse/reason.html @@ -17,14 +17,17 @@ 'header' => [ '#', ucfirst($classname) . ' Reason Type', ucfirst($classname) . ' Reason', + ($class eq 'S' ? 'Unsuspension Fee' : ()), ], 'fields' => [ 'reasonnum', sub { shift->reasontype->type }, 'reason', + $unsuspend_pkg_comment, ], 'links' => [ $link, $link, '', + $unsuspend_pkg_link, ], ) %> @@ -50,4 +53,18 @@ my $count_query = 'SELECT COUNT(*) FROM reason LEFT JOIN reason_type on ' . my $link = [ $p."edit/reason.html?class=$class&reasonnum=", 'reasonnum' ]; +my ($unsuspend_pkg_comment, $unsuspend_pkg_link); +if ( $class eq 'S' ) { + $unsuspend_pkg_comment = sub { + my $pkgpart = shift->unsuspend_pkgpart or return ''; + my $part_pkg = FS::part_pkg->by_key($pkgpart) or return ''; + $part_pkg->pkg_comment; + }; + + my $unsuspend_pkg_link = sub { + my $pkgpart = shift->unsuspend_pkgpart or return ''; + [ $p."edit/part_pkg.cgi?", $pkgpart ]; + }; +} + </%init> |