projekt kivitendo

      # Each profile needs a class and a row_ident

      my $info_ok = all { defined $_->{class} && defined $_->{row_ident} } @profile;

      $self->_push_error([

        0,

        "missing class or row_ident in one of the profiles for multiplexed data",

        0,

        my @header = @{ $self->header };

        my $t_ok = scalar @profile == scalar @header;

        $self->_push_error([

          0,

          "number of headers and number of profiles must be the same for multiplexed data",

          0,

        $t_ok = all { scalar @$_ > 0} @header;

        $self->_push_error([

          0,

          "no empty headers are allowed for multiplexed data",

          0,

    $self->_multiplex_datatype_position($first_pos);

    return 1;

  } else {

                        "datatype field must be at the same position for all datatypes for multiplexed data",

                        0,

                        0]);

      my $header = $self->_header_by_row($row);

      if (!$header) {

        push @errors, [

          0,

          "Cannot get header for row. Maybe row name and datatype field not matching.",

          0,

  ignore_unknown_columns => 1,

);

ok !$csv->parse, 'multiplex check detects incosistent datatype field position';

#####