diff options
author | mark <mark> | 2011-04-01 02:52:24 +0000 |
---|---|---|
committer | mark <mark> | 2011-04-01 02:52:24 +0000 |
commit | b65b8096089410001dfbcd35f9a56f9405b9f5f1 (patch) | |
tree | df16b0422007bd876bc969bdff857d8a510b0aca /FS/FS/cust_svc.pm | |
parent | 19b0c403fbf697a1de92f12abc8a2104daca07bc (diff) |
svc_hardware and svc_dish, #11454
Diffstat (limited to 'FS/FS/cust_svc.pm')
-rw-r--r-- | FS/FS/cust_svc.pm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/FS/FS/cust_svc.pm b/FS/FS/cust_svc.pm index 30e49c5..8cce7af 100644 --- a/FS/FS/cust_svc.pm +++ b/FS/FS/cust_svc.pm @@ -371,6 +371,20 @@ sub date_inserted { $self->h_date('insert'); } +=item pkg_cancel_date + +Returns the date this service's package was canceled. This normally only +exists for a service that's been preserved through cancellation with the +part_pkg.preserve flag. + +=cut + +sub pkg_cancel_date { + my $self = shift; + my $cust_pkg = $self->cust_pkg or return; + return $cust_pkg->getfield('cancel') || ''; +} + =item label Returns a list consisting of: |