diff options
| author | levinse <levinse> | 2010-12-28 18:34:45 +0000 |
|---|---|---|
| committer | levinse <levinse> | 2010-12-28 18:34:45 +0000 |
| commit | ed25910812734764d5fe54a826fad4791a7dcda8 (patch) | |
| tree | e45d31cb6147efa34b159ef847fb792dd5bb3278 /FS | |
| parent | 880e8fd4a4e9b193793452f7666952b7643c479e (diff) | |
add cust_pkg.order_date, RT6628
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/Schema.pm | 3 | ||||
| -rw-r--r-- | FS/FS/cust_pkg.pm | 6 |
2 files changed, 8 insertions, 1 deletions
diff --git a/FS/FS/Schema.pm b/FS/FS/Schema.pm index 393d05f4e..1a88dd2a9 100644 --- a/FS/FS/Schema.pm +++ b/FS/FS/Schema.pm @@ -1296,6 +1296,7 @@ sub tables_hashref { '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 @@ sub tables_hashref { [ 'usernum' ], [ 'start_date' ], ['setup'], ['last_bill'], ['bill'], ['susp'], ['adjourn'], ['expire'], ['cancel'], - ['change_date'], + ['change_date'], ['order_date'], ], }, diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm index 2ed25a06c..d1c3f3bf8 100644 --- a/FS/FS/cust_pkg.pm +++ b/FS/FS/cust_pkg.pm @@ -125,6 +125,10 @@ Billing item definition (see L<FS::part_pkg>) 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 @@ sub insert { } } + $self->order_date(time); + local $SIG{HUP} = 'IGNORE'; local $SIG{INT} = 'IGNORE'; local $SIG{QUIT} = 'IGNORE'; |