%my $error = '';
%my($custnum, $username, $password, $popnum, $cust_main, $saved_pkgpart);
%my(@invoicing_list);
+%my $payinfo;
%my $same = '';
%if ( $cgi->param('error') ) {
% $error = $cgi->param('error');
% @invoicing_list = split( /\s*,\s*/, $cgi->param('invoicing_list') );
% $same = $cgi->param('same');
% $cust_main->setfield('paid' => $cgi->param('paid')) if $cgi->param('paid');
+% $payinfo = $cust_main->payinfo; # don't mask an entered value on errors
%} elsif ( $cgi->keywords ) { #editing
% my( $query ) = $cgi->keywords;
% $query =~ /^(\d+)$/;
% $password = '';
% $popnum = 0;
% @invoicing_list = $cust_main->invoicing_list;
+% $payinfo = $cust_main->paymask;
%} else {
% $custnum='';
% $cust_main = new FS::cust_main ( {} );
% $password = '';
% $popnum = 0;
% @invoicing_list = ();
+% push @invoicing_list, 'POST'
+% unless $conf->exists('disablepostalinvoicedefault');
+% $payinfo = '';
%}
%$cgi->delete_all();
%
what.form.ship_<%$_%>.value = what.form.<%$_%>.value;
% }
-
what.form.ship_country.selectedIndex = what.form.country.selectedIndex;
+
+ function fix_ship_county() {
+ what.form.ship_county.selectedIndex = what.form.county.selectedIndex;
+ }
+
function fix_ship_state() {
what.form.ship_state.selectedIndex = what.form.state.selectedIndex;
+ ship_state_changed(what.form.ship_state, fix_ship_county );
}
+
ship_country_changed(what.form.ship_country, fix_ship_state );
- function fix_ship_county() {
- what.form.ship_county.selectedIndex = what.form.county.selectedIndex;
- }
- ship_state_changed(what.form.ship_state, fix_ship_county );
}
}
function samechanged(what) {
% my $disabledselect = '';
% unless ( $cust_main->ship_last && $same ne 'Y' ) {
% $checked = 'CHECKED';
-% $disabled = 'DISABLED style="background-color: #dddddd"';
+% $disabled = 'DISABLED STYLE="background-color: #dddddd"';
% foreach (
% qw( last first company address1 address2 city county state zip country
% daytime night fax )
<!-- billing info -->
<% include( 'cust_main/billing.html', $cust_main,
+ 'payinfo' => $payinfo,
'invoicing_list' => \@invoicing_list,
)
%>