projekt kivitendo

sub action_search {

  my ($self) = @_;

  my $url = 'ct.pl?action=search&db='. ($self->is_vendor() ? 'vendor' : 'customer');

  if ( $::form->{callback} ) {

    $url .= '&callback='. $::from->escape($::form->{callback});

  }

  print $::form->redirect_header($url);

}

sub action_search_contact {

  my ($self) = @_;

  my $url = 'ct.pl?action=search_contact&db=customer';

  if ( $::form->{callback} ) {

    $url .= '&callback='. $::from->escape($::form->{callback});

  }

  print $::form->redirect_header($url);

}