diff options
author | ivan <ivan> | 2002-01-29 17:42:46 +0000 |
---|---|---|
committer | ivan <ivan> | 2002-01-29 17:42:46 +0000 |
commit | c5c0ba135749164ec8ba75d18f76c29625e1bc7e (patch) | |
tree | 6c855b5b5e0a4774d7f6737fc46bf357042e6d3c /FS | |
parent | 6991d4986df7fb3a6c7c49b5ae1b3713e87a16c4 (diff) |
weight, plan and plandata fields in part_bill_event
Diffstat (limited to 'FS')
-rw-r--r-- | FS/FS/part_bill_event.pm | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/FS/FS/part_bill_event.pm b/FS/FS/part_bill_event.pm index fb2c06ad4..4a23315dd 100644 --- a/FS/FS/part_bill_event.pm +++ b/FS/FS/part_bill_event.pm @@ -44,6 +44,12 @@ FS::Record. The following fields are currently supported: =item seconds - how long after the invoice date events of this type are triggered +=item weight - ordering for events with identical seconds + +=item plan - eventcode plan + +=item plandata - additional plan data + =item disabled - Disabled flag, empty or `Y' =back @@ -106,12 +112,17 @@ insert and replace methods. sub check { my $self = shift; + $self->weight(0) unless $self->weight; + $self->ut_numbern('eventpart') || $self->ut_enum('payby', [qw( CARD BILL COMP )] ) || $self->ut_text('event') || $self->ut_anything('eventcode') || $self->ut_number('seconds') || $self->ut_enum('disabled', [ '', 'Y' ] ) + || $self->ut_number('weight') + || $self->ut_alphan('plan') + || $self->ut_anything('plandata') ; } |