Revision 1c3e55fd
Von Tamino Steinert vor etwa 1 Jahr hinzugefügt
SL/DB/Helper/RecordLink.pm | ||
---|---|---|
61 | 61 |
|
62 | 62 |
|
63 | 63 |
sub set_record_link_conversions { |
64 |
my ($record, $from_type, $from_ids, $item_type, $item_ids) = @_; |
|
64 |
my ($record, $from_type, $from_ids, $item_types, $item_ids) = @_;
|
|
65 | 65 |
|
66 | 66 |
return unless listify($from_ids); |
67 | 67 |
|
... | ... | |
76 | 76 |
for my $idx (0..$#$item_ids) { |
77 | 77 |
my $item = $items->[$idx]; |
78 | 78 |
|
79 |
$item->{ RECORD_ITEM_TYPE_REF() } = $item_type; |
|
79 |
$item->{ RECORD_ITEM_TYPE_REF() } = $item_types->[$idx];
|
|
80 | 80 |
$item->{ RECORD_ITEM_ID() } = $item_ids->[$idx]; |
81 | 81 |
} |
82 | 82 |
} |
Auch abrufbar als: Unified diff
FIX: S:D:H:RecordLink: Belegpositionen können aus verschieden Belegen kommen