[freeside-commits] freeside/fs_selfservice/FS-SelfService/cgi bill.html, 1.1.2.1, 1.1.2.2 selfservice.cgi, 1.21.2.6, 1.21.2.7

[Jeff Finucane,420,,]

Update of /home/cvs/cvsroot/freeside/fs_selfservice/FS-SelfService/cgi
In directory wavetail.420.am:/tmp/cvs-serv27801/fs_selfservice/FS-SelfService/cgi

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	bill.html selfservice.cgi 
Log Message:
turn on and off postal billing from self-service

Index: selfservice.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/fs_selfservice/FS-SelfService/cgi/selfservice.cgi,v
retrieving revision 1.21.2.6
retrieving revision 1.21.2.7
diff -u -d -r1.21.2.6 -r1.21.2.7
--- selfservice.cgi	23 Jan 2008 19:09:39 -0000	1.21.2.6
+++ selfservice.cgi	30 Sep 2008 20:18:17 -0000	1.21.2.7
@@ -139,7 +139,7 @@
 sub process_change_bill {
         _process_change_info( 'change_bill', 
           qw( first last company address1 address2 city state
-              county state zip country daytime night fax )
+              county zip country daytime night fax )
         );
 }
 
@@ -156,11 +156,22 @@
 }
 
 sub process_change_pay {
-        _process_change_info( 'change_pay', 
+        my $postal = $cgi->param( 'postal_invoicing' );
+        my @list =
           qw( payby payinfo payinfo1 payinfo2 month year payname
               address1 address2 city county state zip country auto paytype
-              paystate ss stateid stateid_state )
-        );
+              paystate ss stateid stateid_state invoicing_list
+            );
+        push @list, 'postal_invoicing' if $postal;
+        unless ( $postal || $cgi->param( 'invoicing_list' ) ) {
+          $action = 'change_pay';
+          return {
+            %{&change_pay()},
+            $cgi->Vars,
+            'error' => '<FONT COLOR="#FF0000">Postal or email required.</FONT>',
+          };
+        }
+        _process_change_info( 'change_pay', @list );
 }
 
 sub view_invoice {

Index: bill.html
===================================================================
RCS file: /home/cvs/cvsroot/freeside/fs_selfservice/FS-SelfService/cgi/bill.html,v
retrieving revision 1.1.2.1
retrieving revision 1.1.2.2
diff -u -d -r1.1.2.1 -r1.1.2.2
--- bill.html	23 Jan 2008 19:09:37 -0000	1.1.2.1
+++ bill.html	30 Sep 2008 20:18:17 -0000	1.1.2.2
@@ -4,4 +4,12 @@
 </TR><TR>
   <TD ALIGN="right">Attention</TD>
   <TD><INPUT TYPE="text" SIZE=32 MAXLENGTH=80 NAME="payname" VALUE="<%=$payname%>"></TD>
+</TR><TR>
+  <TD><INPUT TYPE="checkbox" NAME="postal_invoicing" VALUE="POST" <%=
+    $postal_invoicing ? 'CHECKED' : ''
+    %>></TD>
+  <TD>Postal mail invoice</TD>
+</TR><TR>
+  <TD>Email address(es)</TD>
+  <TD><INPUT TYPE="text" NAME="invoicing_list" VALUE="<%= join(',', $invoicing_list ) %>"></TD>
 </TR>