All pastes #254594 Raw Edit

Miscellany

public text v1 · immutable
#254594 ·published 2006-11-22 01:06 UTC
rendered paste body
sub help_complete_combobox : Local {
    my ( $self, $c, $class_name, $field_name  ) = @_;

    my @class_instances =
      $c->model( 'EBusinessSphere::' . $class_name )
      ->search(
        { $field_name => { 'like' => $c->req->params->{field} . '%' } } )
      ->all();

	my @out;
    foreach my $item (@class_instances) {
		push @out, ['' . $item->$field_name . '' ];
    }
	$c->stash->{result}=[@out];
	$c->forward('JSON');
}