projekt kivitendo

  my %part_by_part_id;

  my $entries;

  foreach my $source (@$sources) {

    my $part_id  = $source->part_id ? $source->part_id

                 : $default_part_id ? $default_part_id

                 : undef;