oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

added that friendly error message to www_runCronJob

Browse source
This commit is contained in:
Doug Bell 2008-07-10 20:21:43 +00:00
parent 483bdd441f
commit d975109e1f
1 changed files with 23 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

32
lib/WebGUI/Operation/Cron.pm
View file

@ -277,16 +277,30 @@ sub www_runCronJob {
}
my $taskId = $session->form->param("taskId");
if ($taskId) {
my $task = WebGUI::Workflow::Cron->new($session, $taskId);
# Try to instantiate the task
my $task = WebGUI::Workflow::Cron->new($session, $taskId);
return "done" unless (defined $task);
WebGUI::Workflow::Instance->create($session, {
workflowId=>$task->get("workflowId"),
className=>$task->get("className"),
methodName=>$task->get("methodName"),
parameters=>$task->get("parameters"),
priority=>$task->get("priority"),
})->start(1);
$task->delete(1) if ($task->get("runOnce"));
# Make a new workflow instance
my $instance =
WebGUI::Workflow::Instance->create($session, {
workflowId => $task->get("workflowId"),
className => $task->get("className"),
methodName => $task->get("methodName"),
parameters => $task->get("parameters"),
priority => $task->get("priority"),
});
if ( !$instance ) {
$session->errorHandler->error(
"Could not create workflow instance for workflowId '" . $task->get( "workflowId" )
. "': The result was undefined"
);
return "done";
}
# Run the instance
$instance->start( 1 );
$task->delete( 1 ) if ( $task->get("runOnce") );
return "done";
}
$session->errorHandler->warn("No task ID passed to cron job runner.");