X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fedit%2Fquick-charge.html;h=27841063fa9459da31504739c1d11a85827501f6;hp=94682d0a6540e50aac630a6f11ec77b54a583e9e;hb=75e11f1d1a5ced24496b5732e290f7762403feb8;hpb=89cb729e71c400307f47eef8e9e0b295db2dfca0 diff --git a/httemplate/edit/quick-charge.html b/httemplate/edit/quick-charge.html index 94682d0a6..27841063f 100644 --- a/httemplate/edit/quick-charge.html +++ b/httemplate/edit/quick-charge.html @@ -1,11 +1,13 @@ -<% include("/elements/header-popup.html", 'One-time charge entry', '', +<& /elements/header-popup.html, mt('One-time charge'), '', ( $cgi->param('error') ? '' : 'onload="addRow()"' ), - ) -%> -% if ( $cgi->param('error') ) { +&> - <% $cgi->param('error') %>

-% } + + + + + +<& /elements/error.html &> +function bill_now_changed (what) { + var form = what.form; + if ( what.checked ) { + form.start_date_text.disabled = true; + form.start_date.style.backgroundColor = '#dddddd'; + form.start_date_button.style.display = 'none'; + form.start_date_button_disabled.style.display = ''; + form.invoice_terms.disabled = false; + } else { + form.start_date_text.disabled = false; + form.start_date.style.backgroundColor = '#ffffff'; + form.start_date_button.style.display = ''; + form.start_date_button_disabled.style.display = 'none'; + form.invoice_terms.disabled = true; + } +} + +
- + - - + -<% include('/elements/tr-select-taxclass.html') %> - + +% if ( $conf->exists('invoice-unitprice') ) { + + + + +% } + +<& /elements/tr-select-pkg_class.html, 'curr_value' => $cgi->param('classnum') &> + + + + +%# false laziness w/misc/order_pkg.html + + + + + + + +% if ( $cust_main->payby =~ /^(CARD|CHEK)$/ ) { +% my $what = lc(FS::payby->shortname($cust_main->payby)); + + + + +% } + + + + + + +<& /elements/tr-select-taxclass.html, 'curr_value' => $cgi->param('taxclass') &> + +<& /elements/tr-select-taxproduct.html, 'label' => emt('Tax product'), 'onclick' => 'parent.taxproductmagic(this);', 'curr_value' => $cgi->param('taxproductnum') &> + +<& /elements/tr-select-taxoverride.html, 'onclick' => 'parent.taxoverridemagic(this);', 'curr_value' => $cgi->param('tax_override') &> + + + + + + - + % my $row = 0; -% if ( $cgi->param('error') ) { +% if ( $cgi->param('error') || $cgi->param('magic') ) { % my $param = $cgi->Vars; % % for ( $row = 0; exists($param->{"description$row"}); $row++ ) { @@ -106,7 +191,7 @@ function validate_quick_charge () { % } @@ -116,7 +201,7 @@ function validate_quick_charge () {
Amount:<% mt('Amount') |h %> - $ + <% $money_char %>
Description:
<% mt('Quantity') |h %> + +
<% mt('Invoice now') |h %> - + param('bill_now') ? 'CHECKED' : '' %> + onChange = "bill_now_changed(this);" + > + <% mt('with terms') |h %> + <& /elements/select-terms.html, + 'curr_value' => scalar($cgi->param('invoice_terms')), + 'empty_value' => $default_terms, + 'disabled' => ( $cgi->param('bill_now') ? 0 : 1 ), + &>
<% mt('Charge date') |h %> + param('bill_now') ? 'STYLE = "background-color:#dddddd" DISABLED' : '' %> + > + + param('bill_now') ? '' : 'STYLE="display:none"' %> + > + (<% mt('leave blank to charge immediately') |h %>) +
<% mt("Disable automatic $what charge") |h %>
<% mt('Tax exempt') |h %> param('setuptax') ? 'CHECKED' : '' %>>
<% mt('Description') |h %> + +
Optional additional description: <% mt('Optional additional description (also printed on invoice):') |h %>
- " rownum="<% $row %>" onkeyup = "possiblyAddRow;" > + " rownum="<% $row %>" onkeyup = "possiblyAddRow;" >

-param('error') ? '' :' DISABLED' %>> +param('error') ? '' :' DISABLED' %>>
@@ -147,7 +232,7 @@ function validate_quick_charge () { description_input.setAttribute('name', 'description'+rownum); description_input.setAttribute('id', 'description'+rownum); description_input.setAttribute('size', 60); - description_input.setAttribute('maxlength', 65); + description_input.setAttribute('maxLength', 65); description_input.setAttribute('rownum', rownum); description_input.onkeyup = possiblyAddRow; description_cell.appendChild(description_input); @@ -164,3 +249,44 @@ function validate_quick_charge () { +<%init> + +die "access denied" + unless $FS::CurrentUser::CurrentUser->access_right('One-time charge'); + +my $conf = new FS::Conf; +my $date_format = $conf->config('date_format') || '%m/%d/%Y'; +my $money_char = $conf->config('money_char') || '$'; + +$cgi->param('custnum') =~ /^(\d+)$/ or die 'illegal custnum'; +my $custnum = $1; +my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } ); #XXX agent-virt + +my $format = "%m/%d/%Y %T %z (%Z)"; #false laziness w/REAL_cust_pkg.cgi? +my $start_date = $cust_main->next_bill_date; +$start_date = $start_date ? time2str($format, $start_date) : ''; + +my $amount = ''; +if ( $cgi->param('amount') =~ /^\s*\$?\s*(\d+(\.\d{1,2})?)\s*$/ ) { + $amount = $1; +} + +my $quantity = 1; +if ( $cgi->param('quantity') =~ /^\s*(\d+)\s*$/ ) { + $quantity = $1; +} + +$cgi->param('pkg') =~ /^([\w \!\@\#\$\%\&\(\)\-\+\;\:\'\"\,\.\?\/\=\[\]]*)$/ + or die 'illegal description'; +my $pkg = $1; + +my $default_terms; +if ( $cust_main->invoice_terms ) { + $default_terms = emt("Customer default ([_1])", $cust_main->invoice_terms); +} else { + $default_terms = emt("Default ([_1])", + ($conf->config('invoice_default_terms') || emt('Payable upon receipt')) + ); +} + +