% if ( $cust_pkg->quantity > 1 ) { % } % my $editi = $curuser->access_right('Edit customer package invoice details'); % my $editc = $curuser->access_right('Edit customer package comments'); % % if ( $cust_pkg->cust_pkg_detail('I') % || $cust_pkg->cust_pkg_detail('C') % || $editi % || $editc ) { % % my $editlink = $p. 'edit/cust_pkg_detail?pkgnum='. $cust_pkg->pkgnum. % ';detailtype='; % if ( $cust_pkg->cust_pkg_detail('I') ) { % foreach my $cust_pkg_detail ( $cust_pkg->cust_pkg_detail('I') ) { % }
<% $curuser->option('show_pkgnum') ? $cust_pkg->pkgnum.': ' : '' %><% $part_pkg->pkg |h %> - <% $part_pkg->comment |h %>
      Quantity: <% $cust_pkg->quantity %>
% unless ( $cust_pkg->get('cancel') ) { % % my $br = 0; % if ( $curuser->access_right('Change customer package') ) { % $br=1; ( <%pkg_change_link($cust_pkg)%> ) % } % % if ( $curuser->access_right('Edit customer package dates') ) { % $br=1; ( <%pkg_dates_link($cust_pkg)%> ) % } % % if ( $curuser->access_right('Customize customer package') ) { % $br=1; ( <%pkg_customize_link($cust_pkg,$cust_pkg->custnum)%> ) % } % <% $br ? '
' : '' %> % } % if ( $cust_pkg->num_cust_event % && ( $curuser->access_right('Billing event reports') % || $curuser->access_right('View customer billing events') % ) % ) { ( <%pkg_event_link($cust_pkg)%> ) % }
<% include('/elements/table-grid.html') %>
Invoice details % if ( $editi && ! $cust_pkg->get('cancel') ) { (<% include('/elements/popup_link.html', { 'action' => $editlink. 'I', 'label' => 'edit', 'actionlabel' => 'Edit invoice details', 'color' => '#333399', 'width' => 763, }) %>) % }
 - <% $cust_pkg_detail->detail |h %>
% } else { % if ( $editi && ! $cust_pkg->get('cancel') ) { ( <% include('/elements/popup_link.html', { 'action' => $editlink. 'I', 'label' => 'Add invoice details', 'actionlabel' => 'Add invoice details', 'color' => '#333399', 'width' => 763, }) %> ) % } % } % if ( $cust_pkg->cust_pkg_detail('C') ) { <% include('/elements/table-grid.html') %> Comments % if ( $editc ) { (<% include('/elements/popup_link.html', { 'action' => $editlink. 'C', 'label' => 'edit', 'actionlabel' => 'Edit comments', 'color' => '#333399', 'width' => 763, }) %>) % } % foreach my $cust_pkg_detail ( $cust_pkg->cust_pkg_detail('C') ) {  - <% $cust_pkg_detail->detail |h %> % } % } else { % if ( $editc ) { ( <% include('/elements/popup_link.html', { 'action' => $editlink. 'C', 'label' => 'Add comments', 'actionlabel' => 'Add comments', 'color' => '#333399', 'width' => 763, }) %> ) % } % } % } <%init> my %opt = @_; my $bgcolor = $opt{'bgcolor'}; my $cust_pkg = $opt{'cust_pkg'}; my $part_pkg = $opt{'part_pkg'}; my $curuser = $FS::CurrentUser::CurrentUser; #subroutines #false laziness w/status.html sub pkg_link { my($action, $label, $cust_pkg) = @_; return '' unless $cust_pkg; qq!$label!; } sub pkg_change_link { include( '/elements/popup_link-cust_pkg.html', 'action' => $p. 'misc/change_pkg.cgi?dummy=value', 'label' => 'Change package', 'actionlabel' => 'Change', 'cust_pkg' => shift, ) } sub pkg_dates_link { pkg_link('edit/REAL_cust_pkg', 'Edit dates', @_ ); } sub pkg_customize_link { my $cust_pkg = shift or return ''; my $custnum = $cust_pkg->custnum; qq!Customize!; } sub pkg_event_link { my($cust_pkg) = @_; qq!!. 'View package events'. ''; }