%#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 $payinfo;
%my $same = '';
% 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;
% $cust_main->paycvv($paycvv);
% }
% $saved_pkgpart = 0;
+% $saved_domsvc = 0;
% $username = '';
% $password = '';
% $popnum = 0;
% $cust_main->otaker( &getotaker );
% $cust_main->referral_custnum( $cgi->param('referral_custnum') );
% $saved_pkgpart = 0;
+% $saved_domsvc = 0;
% $username = '';
% $password = '';
% $popnum = 0;
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 )
% #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>