NAME

Workflow::Action - Base class for Workflow actions

SYNOPSIS

# Configure the Action...
<action name="CreateUser"
class="MyApp::Action::CreateUser">
<field name="username" is_required="yes"/>
<field name="email" is_required="yes"/>
<validator name="IsUniqueUser">
<arg>$username</arg>
</validator>
<validator name="IsValidEmail">
<arg>$email</arg>
</validator>
</action>
# Define the action
use Workflow::Exception qw( workflow_error );
sub execute {
my ( $self, $wf ) = @_;
my $context = $wf->context;
# Since 'username' and 'email' have already been validated we
# don't need to check them for uniqueness, well-formedness, etc.
my $user = eval {
User->create({ username => $context->param( 'username' ),
email => $context->param( 'email' ) })
};
# Wrap all errors returned...
if ( $@ ) {
workflow_error
"Cannot create new user with name '", $context->param( 'username' ), "': $@";
}
# Set the created user in the context for the application and/or
# other actions (observers) to use
$context->param( user => $user );
# return the username since it might be used elsewhere...
return $user->username;
}

DESCRIPTION

This is the base class for all Workflow Actions. You do not have to use it as such but it is strongly recommended.

OBJECT METHODS

Public Methods

add_field( @fields )

Add one or more Workflow::Action::InputFields to the action.

required_fields()

Return a list of Workflow::Action::InputField objects that are required.

optional_fields()

Return a list of Workflow::Action::InputField objects that are optional.

fields()

Return a list of all Workflow::Action::InputField objects associated with this action.

add_validators( @validator_config )

Given the 'validator' configuration declarations in the action configuration, ask the Workflow::Factory for the Workflow::Validator object associated with each name and store that along with the arguments to be used, runtime and otherwise.

get_validators()

Get a list of all the validator hashrefs, each with two keys: 'validator' and 'args'. The 'validator' key contains the appropriate Workflow::Validator object, while 'args' contains an arrayref of arguments to pass to the validator, some of which may need to be evaluated at runtime.

validate( $workflow )

Run through all validators for this action. If any fail they will throw a Workflow::Exception, the validation subclass.

execute( $workflow )

Subclasses must implement -- this will perform the actual work. It's not required that you return anything, but if the action may be used in a Workflow::State object that has multiple resulting states you should return a simple scalar for a return value.

Private Methods

init( $workflow, \%params )

SEE ALSO

Workflow

Workflow::Factory

COPYRIGHT

Copyright (c) 2003-2004 Chris Winters. All rights reserved.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHORS

Chris Winters <chris@cwinters.com>