1 package FS::part_event::Action::pkg_cancel;
4 use base qw( FS::part_event::Action );
6 sub description { 'Cancel this package'; }
8 sub eventtable_hashref {
14 'reasonnum' => { 'label' => 'Reason',
15 'type' => 'select-reason',
16 'reason_class' => 'C',
21 sub default_weight { 20; }
24 my( $self, $cust_pkg, $cust_event ) = @_;
26 my $error = $cust_pkg->cancel( 'reason' => $self->option('reasonnum') );