diff options
Diffstat (limited to 'httemplate')
| -rw-r--r-- | httemplate/docs/schema.html | 7 | ||||
| -rw-r--r-- | httemplate/docs/upgrade10.html | 4 | ||||
| -rwxr-xr-x | httemplate/edit/cust_main.cgi | 22 | ||||
| -rwxr-xr-x | httemplate/edit/part_pkg.cgi | 11 | 
4 files changed, 29 insertions, 15 deletions
| diff --git a/httemplate/docs/schema.html b/httemplate/docs/schema.html index 2e78f6e9e..c5cfd5119 100644 --- a/httemplate/docs/schema.html +++ b/httemplate/docs/schema.html @@ -268,13 +268,14 @@          <li>pkgpart - primary key          <li>pkg - package name          <li>comment - non-customer visable package comment -        <li>setup - setup fee expression +        <li>promo_code - promotional code +        <li><i>deprecated</i> setup - setup fee expression          <li>freq - recurring frequency (months) -        <li>recur - recurring fee expression +        <li><i>deprecated</i> recur - recurring fee expression          <li>setuptax - Setup fee tax exempt flag, empty or `Y'          <li>recurtax - Recurring fee tax exempt flag, empty or `Y'          <li>plan - price plan -        <li>plandata - additional price plan data +        <li><i>deprecated</i> plandata - additional price plan data          <li>disabled - Disabled flag, empty or `Y'        </ul>      <li><a name="part_pkg_option" href="man/FS/part_pkg_option.html">part_pkg_option</a> - Package definition options diff --git a/httemplate/docs/upgrade10.html b/httemplate/docs/upgrade10.html index e17f7add3..9dacf91d8 100644 --- a/httemplate/docs/upgrade10.html +++ b/httemplate/docs/upgrade10.html @@ -250,6 +250,10 @@ ALTER TABLE pkg_svc ADD primary_svc char(1) NULL;  ALTER TABLE h_pkg_svc ADD primary_svc char(1) NULL;  ALTER TABLE svc_forward ADD src varchar(255) NULL;  ALTER TABLE h_svc_forward ADD src varchar(255) NULL; +ALTER TABLE part_pkg ADD promo_code varchar(80) NULL; +ALTER TABLE h_part_pkg ADD promo_code varchar(80) NULL; +CREATE INDEX part_pkg2 ON part_pkg ( promo_code ); +CREATE INDEX h_part_pkg2 ON h_part_pkg ( promo_code );  On recent Pg versions: diff --git a/httemplate/edit/cust_main.cgi b/httemplate/edit/cust_main.cgi index 4a8f70540..f5826f31b 100755 --- a/httemplate/edit/cust_main.cgi +++ b/httemplate/edit/cust_main.cgi @@ -168,8 +168,8 @@ print "<BR><BR>Billing address", &itable("#cccccc"), <<END;  END  print <<END; -<INPUT TYPE="text" NAME="last" VALUE="$last"> ,  -<INPUT TYPE="text" NAME="first" VALUE="$first"> +<INPUT TYPE="text" NAME="last" VALUE="$last" onChange="changed(this)"> ,  +<INPUT TYPE="text" NAME="first" VALUE="$first" onChange="changed(this)">  </TD>  END @@ -181,10 +181,10 @@ if ( $conf->exists('show_ss') ) {  print <<END;  </TR> -<TR><TD ALIGN="right">Company</TD><TD COLSPAN=5><INPUT TYPE="text" NAME="company" VALUE="$company" SIZE=70></TD></TR> -<TR><TH ALIGN="right">${r}Address</TH><TD COLSPAN=5><INPUT TYPE="text" NAME="address1" VALUE="$address1" SIZE=70></TD></TR> -<TR><TD ALIGN="right"> </TD><TD COLSPAN=5><INPUT TYPE="text" NAME="address2" VALUE="$address2" SIZE=70></TD></TR> -<TR><TH ALIGN="right">${r}City</TH><TD><INPUT TYPE="text" NAME="city" VALUE="$city"></TD><TH ALIGN="right">${r}State</TH><TD> +<TR><TD ALIGN="right">Company</TD><TD COLSPAN=5><INPUT TYPE="text" NAME="company" VALUE="$company" SIZE=70 onChange="changed(this)"></TD></TR> +<TR><TH ALIGN="right">${r}Address</TH><TD COLSPAN=5><INPUT TYPE="text" NAME="address1" VALUE="$address1" SIZE=70 onChange="changed(this)"></TD></TR> +<TR><TD ALIGN="right"> </TD><TD COLSPAN=5><INPUT TYPE="text" NAME="address2" VALUE="$address2" SIZE=70 onChange="changed(this)"></TD></TR> +<TR><TH ALIGN="right">${r}City</TH><TD><INPUT TYPE="text" NAME="city" VALUE="$city" onChange="changed(this)"></TD><TH ALIGN="right">${r}State</TH><TD>  END  #false laziness with ship state @@ -203,12 +203,14 @@ my($county_html, $state_html, $country_html) =  print "$county_html $state_html"; -print qq!</TD><TH>${r}Zip</TH><TD><INPUT TYPE="text" NAME="zip" VALUE="$zip" SIZE=10></TD></TR>!; +print qq!</TD><TH>${r}Zip</TH><TD><INPUT TYPE="text" NAME="zip" VALUE="$zip" SIZE=10 onChange="changed(this)"></TD></TR>!;  my($daytime,$night,$fax)=(    $cust_main->daytime,    $cust_main->night,    $cust_main->fax, +  '', +  'changed(this)',  );  my $daytime_label = FS::Msgcat::_gettext('daytime') || 'Day Phone'; @@ -216,9 +218,9 @@ my $night_label = FS::Msgcat::_gettext('night') || 'Night Phone';  print <<END;  <TR><TH ALIGN="right">${r}Country</TH><TD>$country_html</TD></TR> -<TR><TD ALIGN="right">$daytime_label</TD><TD COLSPAN=5><INPUT TYPE="text" NAME="daytime" VALUE="$daytime" SIZE=18></TD></TR> -<TR><TD ALIGN="right">$night_label</TD><TD COLSPAN=5><INPUT TYPE="text" NAME="night" VALUE="$night" SIZE=18></TD></TR> -<TR><TD ALIGN="right">Fax</TD><TD COLSPAN=5><INPUT TYPE="text" NAME="fax" VALUE="$fax" SIZE=12></TD></TR> +<TR><TD ALIGN="right">$daytime_label</TD><TD COLSPAN=5><INPUT TYPE="text" NAME="daytime" VALUE="$daytime" SIZE=18 onChange="changed(this)"></TD></TR> +<TR><TD ALIGN="right">$night_label</TD><TD COLSPAN=5><INPUT TYPE="text" NAME="night" VALUE="$night" SIZE=18 onChange="changed(this)"></TD></TR> +<TR><TD ALIGN="right">Fax</TD><TD COLSPAN=5><INPUT TYPE="text" NAME="fax" VALUE="$fax" SIZE=12 onChange="changed(this)"></TD></TR>  END  print "</TABLE>${r}required fields<BR>"; diff --git a/httemplate/edit/part_pkg.cgi b/httemplate/edit/part_pkg.cgi index dc2992459..b3c389c9d 100755 --- a/httemplate/edit/part_pkg.cgi +++ b/httemplate/edit/part_pkg.cgi @@ -93,7 +93,12 @@ Package information        <INPUT TYPE="text" NAME="comment" SIZE=32 VALUE="<%=$part_pkg->comment%>">      </TD>    </TR> - +  <TR> +    <TD ALIGN="right">Promotional code</TD> +    <TD> +      <INPUT TYPE="text" NAME="promo_code" SIZE=32 VALUE="<%=$part_pkg->promo_code%>"> +    </TD> +  </TR>    <TR>      <TD ALIGN="right">Disable new orders</TD>      <TD> @@ -257,7 +262,9 @@ my $widget = new HTML::Widgets::SelectLayers(    'options'        => \%options,    'form_name'      => 'dummy',    'form_action'    => 'process/part_pkg.cgi', -  'form_text'      => [ qw(pkg comment clone pkgnum pkgpart), @fixups ], +  'form_text'      => [ qw(pkg comment promo_code clone pkgnum pkgpart), +                        @fixups +                      ],    'form_checkbox'  => [ qw(setuptax recurtax disabled) ],    'form_radio'     => \@form_radio,    'form_select'    => \@form_select, | 
