1 package FS::part_event::Action;
4 use base qw( FS::part_event );
9 FS::part_event::Action - Base class for event actions
13 package FS::part_event::Action::myaction;
15 use base FS::part_event::Action;
19 FS::part_event::Action is a base class for event action classes.
23 These methods are implemented in each action class.
29 Action classes must define a description method. This method should return a
30 scalar description of the action.
32 =item eventtable_hashref
34 Action classes must define a eventtable_hashref method if they can only be
35 triggered against some kinds of tables. This method should return a hash
36 reference of eventtables (values set true indicate the action can be performed):
38 sub eventtable_hashref {
42 'cust_pay_batch' => 0,
49 sub eventtable_hashref {
53 'cust_pay_batch' => 1,
59 Action classes may define an option_fields method to indicate that they
60 accept one or more options.
62 This method should return a list of option names and option descriptions.
63 Each option description can be a scalar description, for simple options, or a
64 hashref with the following values:
66 =item label - Description
68 =item type - Currently text, money, checkbox, checkbox-multiple, select, select-agent, select-pkg_class, select-part_referral, select-table, fixed, hidden, (others can be implemented as httemplate/elements/tr-TYPE.html mason components). Defaults to text.
70 =item size - Size for text fields
72 =item options - For checkbox-multiple and select, a list reference of available option values.
74 =item option_labels - For select, a hash reference of availble option values and labels.
76 =item value - for checkbox, fixed, hidden
78 =item table - for select-table
80 =item name_col - for select-table
82 =item NOTE: See httemplate/elements/select-table.html for a full list of the optinal options for the select-table type
86 NOTE: A database connection is B<not> yet available when this subroutine is
93 'field' => 'description',
95 'another_field' => { 'label'=>'Amount', 'type'=>'money', },
97 'third_field' => { 'label' => 'Types',
99 'options' => [ 'h', 's' ],
100 'option_labels' => { 'h' => 'Happy',
115 Action classes may define a default weighting. Weights control execution order
116 relative to other actions (that are triggered at the same time).
127 Action classes may define a deprecated method that returns true, indicating
128 that this action is deprecated.
137 =item do_action CUSTOMER_EVENT_OBJECT
139 Action classes must define an action method. This method is triggered if
140 all conditions have been met.
142 The object which triggered the event (an FS::cust_main, FS::cust_bill or
143 FS::cust_pkg object) is passed as an argument.
145 To retreive option values, call the option method on the desired option, i.e.:
147 my( $self, $cust_object ) = @_;
148 $value_of_field = $self->option('field');
150 To indicate sucessful completion, simply return. Optionally, you can return a
151 string of information status information about the sucessful completion, or
152 simply return the empty string.
154 To indicate a failure and that this event should retry, die with the desired
161 These methods are defined in the base class for use in action classes.
165 =item cust_main CUST_OBJECT
167 Return the customer object (see L<FS::cust_main>) associated with the provided
168 object (the object itself if it is already a customer object).
173 my( $self, $cust_object ) = @_;
175 $cust_object->isa('FS::cust_main') ? $cust_object : $cust_object->cust_main;
179 =item option_label OPTIONNAME
181 Returns the label for the specified option name.
186 my( $self, $optionname ) = @_;
188 my %option_fields = $self->option_fields;
190 ref( $option_fields{$optionname} )
191 ? $option_fields{$optionname}->{'label'}
192 : $option_fields{$optionname}
196 =item option_fields_hashref
198 Returns the option fields as an (ordered) hash reference.
202 sub option_fields_hashref {
204 tie my %hash, 'Tie::IxHash', $self->option_fields;
207 =item option_fields_listref
209 Returns just the option field names as a list reference.
213 sub option_fields_listref {
215 my $hashref = $self->option_fields_hashref;