freeside/httemplate/edit REAL_cust_pkg.cgi,1.7,1.8

[ivan]

Update of /home/cvs/cvsroot/freeside/httemplate/edit
In directory pouncequick:/tmp/cvs-serv7213

Modified Files:
	REAL_cust_pkg.cgi 
Log Message:
warn and require confirmation when editing next bill dates to a date in the past, closes; Bug#430

Index: REAL_cust_pkg.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/edit/REAL_cust_pkg.cgi,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -d -r1.7 -r1.8
--- REAL_cust_pkg.cgi	19 Nov 2003 12:21:09 -0000	1.7
+++ REAL_cust_pkg.cgi	22 Dec 2004 14:06:45 -0000	1.8
@@ -7,6 +7,13 @@
 if ( $cgi->param('error') ) {
   $error = $cgi->param('error');
   $pkgnum = $cgi->param('pkgnum');
+  if ( $error eq '_bill_areyousure' ) {
+    my $bill = $cgi->param('bill');
+    $error = "You are attempting to set the next bill date to $bill, which is
+              in the past.  This will charge the customer for the interval
+              from $bill until now.  Are you sure you want to do this? ".
+           '<INPUT TYPE="checkbox" NAME="bill_areyousure" VALUE="1">';
+  }
 } else {
   my($query) = $cgi->keywords;
   $query =~ /^(\d+)$/ or die "no pkgnum";