%#get record
%
%my $error = '';
-%my($custnum, $username, $password, $popnum, $cust_main, $saved_pkgpart);
+%my($custnum, $username, $password, $popnum, $cust_main, $saved_pkgpart, $saved_domsvc);
%my(@invoicing_list);
+%my ($ss,$stateid,$payinfo);
%my $same = '';
%if ( $cgi->param('error') ) {
% $error = $cgi->param('error');
% map { $_, scalar($cgi->param($_)) } fields('cust_main')
% } );
% $custnum = $cust_main->custnum;
+% $saved_domsvc = $cgi->param('domsvc') || '';
+% if ( $saved_domsvc =~ /^(\d+)$/ ) {
+% $saved_domsvc = $1;
+% } else {
+% $saved_domsvc = '';
+% }
% $saved_pkgpart = $cgi->param('pkgpart_svcpart') || '';
% if ( $saved_pkgpart =~ /^(\d+)_/ ) {
% $saved_pkgpart = $1;
% @invoicing_list = split( /\s*,\s*/, $cgi->param('invoicing_list') );
% $same = $cgi->param('same');
% $cust_main->setfield('paid' => $cgi->param('paid')) if $cgi->param('paid');
+% $ss = $cust_main->ss; # don't mask an entered value on errors
+% $stateid = $cust_main->stateid; # don't mask an entered value on errors
+% $payinfo = $cust_main->payinfo; # don't mask an entered value on errors
%} elsif ( $cgi->keywords ) { #editing
% my( $query ) = $cgi->keywords;
% $query =~ /^(\d+)$/;
% $cust_main->paycvv($paycvv);
% }
% $saved_pkgpart = 0;
+% $saved_domsvc = 0;
% $username = '';
% $password = '';
% $popnum = 0;
% @invoicing_list = $cust_main->invoicing_list;
+% $ss = $cust_main->masked('ss');
+% $stateid = $cust_main->masked('stateid');
+% $payinfo = $cust_main->paymask;
%} else {
% $custnum='';
% $cust_main = new FS::cust_main ( {} );
% $cust_main->otaker( &getotaker );
% $cust_main->referral_custnum( $cgi->param('referral_custnum') );
% $saved_pkgpart = 0;
+% $saved_domsvc = 0;
% $username = '';
% $password = '';
% $popnum = 0;
% @invoicing_list = ();
+% push @invoicing_list, 'POST'
+% unless $conf->exists('disablepostalinvoicedefault');
+% $ss = '';
+% $stateid = '';
+% $payinfo = '';
%}
%$cgi->delete_all();
%
% } else {
- <% include('/elements/tr-select-part_referral.html') %>
+ <% include('/elements/tr-select-part_referral.html', $refnum ) %>
% }
</TABLE>
+<!-- birthdate -->
+
+% if ( $conf->exists('cust_main-enable_birthdate') ) {
+
+ <BR>
+ <% ntable("#cccccc", 2) %>
+ <% include ('/elements/tr-input-date-field.html',
+ 'birthdate',
+ $cust_main->birthdate,
+ 'Date of Birth',
+ $conf->config('date_format') || "%m/%d/%Y",
+ 1)
+ %>
+
+ </TABLE>
+
+% }
+
<!-- contact info -->
<BR><BR>
Billing address
-<% include('cust_main/contact.html', $cust_main, '', 'bill_changed(this)', '' ) %>
+<% include('cust_main/contact.html', $cust_main, '', 'bill_changed(this)', '', 'ss' => $ss, 'stateid' => $stateid ) %>
<!-- service address -->
% if ( defined $cust_main->dbdef_table->column('ship_last') ) {
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,
)
%>
function bottomfixup(what) {
var topvars = new Array(
+ 'birthdate',
+
'custnum', 'agentnum', 'refnum', 'referral_custnum',
'last', 'first', 'ss', 'company',
'address1', 'address2', 'city',
'county', 'state', 'zip', 'country',
'daytime', 'night', 'fax',
+ 'stateid', 'stateid_state',
'same',
var layervars = new Array(
'payauto',
- 'payinfo', 'payinfo1', 'payinfo2',
- 'payname', 'exp_month', 'exp_year', 'paycvv',
+ 'payinfo', 'payinfo1', 'payinfo2', 'paytype',
+ 'payname', 'paystate', 'exp_month', 'exp_year', 'paycvv',
'paystart_month', 'paystart_year', 'payissue',
'payip',
'paid'
var billing_bottomvars = new Array(
'tax',
'invoicing_list', 'invoicing_list_POST', 'invoicing_list_FAX',
+ 'invoice_terms',
'spool_cdr'
);
<FORM ACTION="<% popurl(1) %>process/cust_main.cgi" METHOD=POST NAME="bottomform" onSubmit="document.bottomform.submit.disabled=true; bottomfixup(this.form);" STYLE="margin-top: 0; margin-bottom: 0">
% foreach my $hidden (
+% 'birthdate',
+%
% 'custnum', 'agentnum', 'refnum', 'referral_custnum',
% 'last', 'first', 'ss', 'company',
% 'address1', 'address2', 'city',
% 'county', 'state', 'zip', 'country',
% 'daytime', 'night', 'fax',
+% 'stateid', 'stateid_state',
%
% 'same',
%
% 'select', #XXX key
%
% 'payauto',
-% 'payinfo', 'payinfo1', 'payinfo2',
-% 'payname', 'exp_month', 'exp_year', 'paycvv',
+% 'payinfo', 'payinfo1', 'payinfo2', 'paytype',
+% 'payname', 'paystate', 'exp_month', 'exp_year', 'paycvv',
% 'paystart_month', 'paystart_year', 'payissue',
% 'payip',
% 'paid',
%
% 'tax',
% 'invoicing_list', 'invoicing_list_POST', 'invoicing_list_FAX',
+% 'invoice_terms',
% 'spool_cdr'
% ) {
%
% #eslaf
%
% my @part_pkg = grep { $_->svcpart('svc_acct') && $pkgpart->{ $_->pkgpart } }
-% qsearch( 'part_pkg', { 'disabled' => '' } );
+% qsearch( 'part_pkg', { 'disabled' => '' }, '', 'ORDER BY pkg' ); # case?
%
% if ( @part_pkg ) {
%
<TR>
<TD COLSPAN=2>
- <SELECT NAME="pkgpart_svcpart">
- <OPTION VALUE="">(none)
-% foreach my $part_pkg ( @part_pkg ) {
-
-
- <OPTION VALUE="<% $part_pkg->pkgpart. "_". $part_pkg->svcpart('svc_acct') %>"<% ( $saved_pkgpart && $part_pkg->pkgpart == $saved_pkgpart ) ? ' SELECTED' : '' %>><% $part_pkg->pkg. " - ". $part_pkg->comment %>
-% }
-
- </SELECT>
+ <% include('cust_main/select-domain.html',
+ 'pkgparts' => \@part_pkg,
+ 'saved_pkgpart' => $saved_pkgpart,
+ 'saved_domsvc' => $saved_domsvc,
+ )
+ %>
</TD>
</TR>
%
</TD>
</TR>
+ <TR>
+ <TD ALIGN="right">Domain</TD>
+ <TD>
+ <SELECT NAME="domsvc">
+ <OPTION>(none)</OPTION>
+ </SELECT>
+ </TD>
+ </TR>
+
<TR>
<TD ALIGN="right">Password</TD>
<TD>