diff options
Diffstat (limited to 'httemplate/edit/cust_tax_adjustment.html')
-rw-r--r-- | httemplate/edit/cust_tax_adjustment.html | 102 |
1 files changed, 0 insertions, 102 deletions
diff --git a/httemplate/edit/cust_tax_adjustment.html b/httemplate/edit/cust_tax_adjustment.html deleted file mode 100644 index 9d4afbc..0000000 --- a/httemplate/edit/cust_tax_adjustment.html +++ /dev/null @@ -1,102 +0,0 @@ -<% include('/elements/header-popup.html', 'Tax adjustment' ) %> - -<% include('/elements/error.html') %> - -<SCRIPT TYPE="text/javascript"> - -function enable_tax_adjustment () { - if ( document.TaxAdjustmentForm.amount.value - && document.TaxAdjustmentForm.taxname.selectedIndex > 0 ) { - document.TaxAdjustmentForm.submit.disabled = false; - } else { - document.TaxAdjustmentForm.submit.disabled = true; - } -} - -function validate_tax_adjustment () { - var comment = document.TaxAdjustmentForm.comment.value; - var comment_regex = /^([\w \!\@\#\$\%\&\(\)\-\+\;\:\'\"\,\.\?\/\=\[\]]*)$/ ; - var amount = document.TaxAdjustmentForm.amount.value; - var amount_regex = /^\s*\$?\s*(\d*(\.?\d{1,2}))\s*$/ ; - var rval = true; - - if ( ! amount_regex.test(amount) ) { - alert('Illegal amount - enter the amount of the tax adjustment, for example, "5" or "43" or "21.46".'); - return false; - } - if ( ! comment_regex.test(comment) ) { - alert('Illegal comment - spaces, letters, numbers, and the following punctuation characters are allowed: . , ! ? @ # $ % & ( ) - + ; : ' + "'" + ' " = [ ]' ); - return false; - } - - return true; -} - -</SCRIPT> - -<FORM ACTION="process/cust_tax_adjustment.html" NAME="TaxAdjustmentForm" ID="TaxAdjustmentForm" METHOD="POST" onsubmit="document.TaxAdjustmentForm.submit.disabled=true;return validate_tax_adjustment();"> - -<INPUT TYPE="hidden" NAME="custnum" VALUE="<% $custnum %>"> - -<TABLE ID="TaxAdjustmentTable" BGCOLOR="#cccccc" BORDER=0 CELLSPACING=0 STYLE="background-color: #cccccc"> - -<TR> - <TD ALIGN="right">Tax </TD> - <TD> - <SELECT NAME="taxname" ID="taxname" onChange="enable_tax_adjustment()" onKeyPress="enable_tax_adjustment()"> - <OPTION VALUE=""></OPTION> -% foreach my $taxname (@taxname) { - <OPTION VALUE="<% $taxname %>"><% $taxname %></OPTION> -% } - </SELECT> - </TD> -</TR> - -<TR> - <TD ALIGN="right">Amount </TD> - <TD> - $<INPUT TYPE="text" NAME="amount" SIZE=6 VALUE="<% $amount %>" onChange="enable_tax_adjustment()" onKeyPress="enable_tax_adjustment()"> - </TD> -</TR> - -<TR> - <TD ALIGN="right">Comment </TD> - <TD> - <INPUT TYPE="text" NAME="comment" SIZE="50" MAXLENGTH="50" VALUE="<% $comment %>" onChange="enable_tax_adjustment()" onKeyPress="enable_tax_adjustment()"> - </TD> -</TR> - -</TABLE> - -<BR> -<INPUT TYPE="submit" ID="submit" NAME="submit" VALUE="Add tax adjustment" <% $cgi->param('error') ? '' :' DISABLED' %>> - -</FORM> - -</BODY> -</HTML> -<%init> - -die "access denied" - unless $FS::CurrentUser::CurrentUser->access_right('Add customer tax adjustment'); - -my $sql = 'SELECT DISTINCT(taxname) FROM cust_main_county'; -my $sth = dbh->prepare($sql) or die dbh->errstr; -$sth->execute() or die $sth->errstr; -my @taxname = map { $_->[0] || 'Tax' } @{ $sth->fetchall_arrayref([]) }; - -my $conf = new FS::Conf; - -$cgi->param('custnum') =~ /^(\d+)$/ or die 'illegal custnum'; -my $custnum = $1; - -my $amount = ''; -if ( $cgi->param('amount') =~ /^\s*\$?\s*(\d+(\.\d{1,2})?)\s*$/ ) { - $amount = $1; -} - -$cgi->param('comment') =~ /^([\w \!\@\#\$\%\&\(\)\-\+\;\:\'\"\,\.\?\/\=\[\]]*)$/ - or die 'illegal description'; -my $comment = $1; - -</%init> |