projekt kivitendo

sub check_objects {

  my ($self) = @_;

  foreach my $entry (@{ $self->controller->data }) {

    $self->check_name($entry);

    $self->check_vc($entry, 'cp_cv_id');

    $self->check_gender($entry);

    $self->handle_cvars($entry);

  }

  $self->add_info_columns({ header => $::locale->text('Customer/Vendor'), method => 'vc_name' });

                                );

}

sub check_objects {

  my ($self) = @_;

  my $numbercolumn  = $self->controller->profile->get('table') . "number";

  my %vcs_by_number = map { ( $_->$numbercolumn => 1 ) } @{ $self->existing_objects };

  foreach my $entry (@{ $self->controller->data }) {

    my $object = $entry->{object};

    $self->check_name($entry);

    } else {

      $vcs_by_number{ $object->$numbercolumn } = $object;

    }

  }

  $self->add_columns(map { "${_}_id" } grep { exists $self->controller->data->[0]->{raw_data}->{$_} } qw(language business payment));

# TODO:

# salesman_id -- Kunden mit Typ 'Verkäufer', falls Vertreter-Modus an ist, ansonsten Employees

sub check_objects {

  my ($self) = @_;

  foreach my $entry (@{ $self->controller->data }) {

    $self->handle_cvars($entry);

  }

  $self->add_cvar_raw_data_columns;

                                );

}

sub check_objects {

  my ($self) = @_;

  foreach my $entry (@{ $self->controller->data }) {

    $self->check_vc($entry, 'trans_id');

    $entry->{object}->module('CT');

  }

  $self->add_info_columns({ header => $::locale->text('Customer/Vendor'), method => 'vc_name' });

                                );

}