From 2b8ffc98529637ffddfe7cbf6b4f9b8deb90f0fa Mon Sep 17 00:00:00 2001 From: ivan Date: Thu, 8 Jan 2009 01:45:22 +0000 Subject: start adding package locations, RT#4499 --- httemplate/view/cust_main/packages/package.html | 213 ++++++++++++++++++++++++ 1 file changed, 213 insertions(+) create mode 100644 httemplate/view/cust_main/packages/package.html (limited to 'httemplate/view/cust_main/packages/package.html') diff --git a/httemplate/view/cust_main/packages/package.html b/httemplate/view/cust_main/packages/package.html new file mode 100644 index 000000000..4311d8cf2 --- /dev/null +++ b/httemplate/view/cust_main/packages/package.html @@ -0,0 +1,213 @@ + + + + + + +% 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'. + ''; +} + + -- cgit v1.2.1