X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2FREAL_cust_pkg.cgi;h=606cf87e73e15f6f7372164778d6d8cc5875702c;hb=50fc1d226ec89bf5fb66622ee913ec9e470b8d6c;hp=ac8aa40cb6d0c9b565c3af8bc0bdf9eae46e9dca;hpb=ebcfdd04f1fe69028836d231238845801aa69505;p=freeside.git diff --git a/httemplate/edit/REAL_cust_pkg.cgi b/httemplate/edit/REAL_cust_pkg.cgi index ac8aa40cb..606cf87e7 100755 --- a/httemplate/edit/REAL_cust_pkg.cgi +++ b/httemplate/edit/REAL_cust_pkg.cgi @@ -35,6 +35,11 @@ function confirm_changes() {
+% if ($contract_only) { + + +% } + % # raw error from below % if ( $error ) { Error: <% $error %> @@ -124,8 +129,10 @@ function confirm_changes() { % my $value = $cust_pkg->get($column); % $value = $value ? time2str($format, $value) : ""; % +% if ($contract_only and $column ne 'contract_end') { + <& .row_display, %ARGS &> % # if_primary for the dates that can't be edited on supplemental packages -% if ($if_primary and $cust_pkg->main_pkgnum) { +% } elsif ($if_primary and $cust_pkg->main_pkgnum) { <& .row_display, %ARGS &> @@ -198,12 +205,15 @@ my $date_format = $conf->config('date_format') || '%m/%d/%Y'; my $format = $date_format. ' %T'; # %z (%Z)'; +my $contract_only = $FS::CurrentUser::CurrentUser->access_right('Edit customer package dates') ? 0 : 1; + <%init> +# see $contract_only in shared block above die "access denied" - unless $FS::CurrentUser::CurrentUser->access_right('Edit customer package dates'); - + unless $FS::CurrentUser::CurrentUser->access_right('Edit customer package dates') + or $FS::CurrentUser::CurrentUser->access_right('Change package contract end date'); my $error = ''; my( $pkgnum, $cust_pkg );