1 <% include("/elements/header-popup.html", 'One-time charge entry', '',
2 ( $cgi->param('error') ? '' : 'onload="addRow()"' ),
6 <% include('/elements/error.html') %>
8 <SCRIPT TYPE="text/javascript">
10 function enable_quick_charge () {
11 if ( document.QuickChargeForm.amount.value
12 && document.QuickChargeForm.pkg.value ) {
13 document.QuickChargeForm.submit.disabled = false;
15 document.QuickChargeForm.submit.disabled = true;
19 function enable_quick_charge_desc () {
20 if ( document.QuickChargeForm.amount.value && document.QuickChargeForm.pkg.value ) {
21 document.QuickChargeForm.submit.disabled = false;
23 document.QuickChargeForm.submit.disabled = true;
27 function enable_quick_charge_amount () {
28 if ( document.QuickChargeForm.amount.value && document.QuickChargeForm.pkg.value ) {
29 document.QuickChargeForm.submit.disabled = false;
31 document.QuickChargeForm.submit.disabled = true;
35 function validate_quick_charge () {
36 var pkg = document.QuickChargeForm.pkg.value;
37 var pkg_regex = /^([\w \!\@\#\$\%\&\(\)\-\+\;\:\'\"\,\.\?\/\=\[\]]*)$/ ;
38 var amount = document.QuickChargeForm.amount.value;
39 var amount_regex = /^\s*\$?\s*(\d+(\.\d{1,2})?)\s*$/ ;
42 if ( ! amount_regex.test(amount) ) {
43 alert('Illegal amount - enter an amount to charge, for example, "5" or "43" or "21.46".');
46 if ( String(pkg).length < 1 ) {
49 if ( ! pkg_regex.test(pkg) ) {
53 for (i=0; i < rownum; i++) {
54 if (! eval('pkg_regex.test(document.QuickChargeForm.description' + i + '.value)')){
64 alert('Enter a description for the one-time charge');
68 alert('Illegal description - spaces, letters, numbers, and the following punctuation characters are allowed: . , ! ? @ # $ % & ( ) - + ; : ' + "'" + ' " = [ ]' );
74 <FORM ACTION="process/quick-charge.cgi" NAME="QuickChargeForm" METHOD="POST" onsubmit="document.QuickChargeForm.submit.disabled=true;return validate_quick_charge();">
76 <INPUT TYPE="hidden" NAME="custnum" VALUE="<% $custnum %>">
78 <TABLE ID="QuickChargeTable" BGCOLOR="#cccccc" BORDER=0 CELLSPACING=0 STYLE="background-color: #cccccc">
81 <TD ALIGN="right">Amount:</TD>
83 $<INPUT TYPE="text" NAME="amount" SIZE=6 VALUE="<% $amount %>" onChange="enable_quick_charge()" onKeyPress="enable_quick_charge_amount()">
85 <% include('/elements/tr-select-pkg_class.html', 'curr_value' => $cgi->param('classnum') ) %>
86 <% include('/elements/tr-select-taxclass.html', 'curr_value' => $cgi->param('taxclass') ) %>
90 <INPUT TYPE="text" NAME="pkg" SIZE="60" MAXLENGTH="65" VALUE="<% $pkg %>" onChange="enable_quick_charge()" onKeyPress="enable_quick_charge_desc()">
95 <TD><FONT SIZE="-1">Optional additional description: </FONT></TD>
99 % if ( $cgi->param('error') ) {
100 % my $param = $cgi->Vars;
102 % for ( $row = 0; exists($param->{"description$row"}); $row++ ) {
107 <INPUT TYPE="text" NAME="description<% $row %>" SIZE="60" MAXLENGTH="65" VALUE="<% $param->{"description$row"} |h %>" rownum="<% $row %>" onkeyup = "possiblyAddRow;" >
117 <INPUT TYPE="submit" NAME="submit" VALUE="Add one-time charge" <% $cgi->param('error') ? '' :' DISABLED' %>>
122 <SCRIPT TYPE="text/javascript">
124 var rownum = <% $row %>;
126 function possiblyAddRow() {
127 if ( ( rownum - this.getAttribute('rownum') ) == 1 ) {
134 var table = document.getElementById('QuickChargeTable');
135 var tablebody = table.getElementsByTagName('tbody').item(0);
137 var row = document.createElement('TR');
139 var empty_cell = document.createElement('TD');
140 row.appendChild(empty_cell);
142 var description_cell = document.createElement('TD');
144 var description_input = document.createElement('INPUT');
145 description_input.setAttribute('name', 'description'+rownum);
146 description_input.setAttribute('id', 'description'+rownum);
147 description_input.setAttribute('size', 60);
148 description_input.setAttribute('maxLength', 65);
149 description_input.setAttribute('rownum', rownum);
150 description_input.onkeyup = possiblyAddRow;
151 description_cell.appendChild(description_input);
153 row.appendChild(description_cell);
155 tablebody.appendChild(row);
168 unless $FS::CurrentUser::CurrentUser->access_right('One-time charge');
170 $cgi->param('custnum') =~ /^(\d+)$/ or die 'illegal custnum';
174 if ( $cgi->param('amount') =~ /^\s*\$?\s*(\d+(\.\d{1,2})?)\s*$/ ) {
178 $cgi->param('pkg') =~ /^([\w \!\@\#\$\%\&\(\)\-\+\;\:\'\"\,\.\?\/\=\[\]]*)$/
179 or die 'illegal description';