1 package FS::part_event::Action::pkg_suspend;
4 use base qw( FS::part_event::Action );
6 sub description { 'Suspend this package'; }
8 sub eventtable_hashref {
15 'reasonnum' => { 'label' => 'Reason',
16 'type' => 'select-reason',
17 'reason_class' => 'S',
22 sub default_weight { 20; }
25 my( $self, $object, $cust_event ) = @_;
26 my $cust_pkg = $self->cust_pkg($object);
28 my $error = $cust_pkg->suspend( 'reason' => $self->option('reasonnum') );