[freeside-commits] freeside/FS/FS Schema.pm, 1.239.2.8, 1.239.2.9 cust_pkg.pm, 1.179.2.6, 1.179.2.7

[Erik Levinson]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv19869/FS/FS

Modified Files:
      Tag: FREESIDE_2_1_BRANCH
	Schema.pm cust_pkg.pm 
Log Message:
add cust_pkg.order_date, RT6628

Index: Schema.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Schema.pm,v
retrieving revision 1.239.2.8
retrieving revision 1.239.2.9
diff -u -w -d -r1.239.2.8 -r1.239.2.9
--- Schema.pm	28 Dec 2010 15:58:13 -0000	1.239.2.8
+++ Schema.pm	28 Dec 2010 18:34:43 -0000	1.239.2.9
@@ -1296,6 +1296,7 @@
         'locationnum',         'int', 'NULL', '', '', '',
         'otaker',          'varchar', 'NULL', 32, '', '', 
         'usernum',             'int', 'NULL', '', '', '',
+        'order_date',     @date_type,             '', '', 
         'start_date',     @date_type,             '', '', 
         'setup',          @date_type,             '', '', 
         'bill',           @date_type,             '', '', 
@@ -1319,7 +1320,7 @@
                    [ 'usernum' ],
                    [ 'start_date' ], ['setup'], ['last_bill'], ['bill'],
                    ['susp'], ['adjourn'], ['expire'], ['cancel'],
-                   ['change_date'],
+                   ['change_date'], ['order_date'],
                  ],
     },
 

Index: cust_pkg.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_pkg.pm,v
retrieving revision 1.179.2.6
retrieving revision 1.179.2.7
diff -u -w -d -r1.179.2.6 -r1.179.2.7
--- cust_pkg.pm	24 Dec 2010 09:56:49 -0000	1.179.2.6
+++ cust_pkg.pm	28 Dec 2010 18:34:44 -0000	1.179.2.7
@@ -125,6 +125,10 @@
 
 Optional link to package location (see L<FS::location>)
 
+=item order_date
+
+date package was ordered (also remains same on changes)
+
 =item start_date
 
 date
@@ -271,6 +275,8 @@
     }
   }
 
+  $self->order_date(time);
+
   local $SIG{HUP} = 'IGNORE';
   local $SIG{INT} = 'IGNORE';
   local $SIG{QUIT} = 'IGNORE';