Revision 78912e55
Von Jan Büren vor fast 10 Jahren hinzugefügt
| SL/IR.pm | ||
|---|---|---|
| 757 | 757 |
Common::webdav_folder($form); |
| 758 | 758 |
|
| 759 | 759 |
# Link this record to the records it was created from. |
| 760 |
RecordLinks->create_links('dbh' => $dbh,
|
|
| 761 |
'mode' => 'ids', |
|
| 762 |
'from_table' => 'oe', |
|
| 763 |
'from_ids' => $form->{convert_from_oe_ids},
|
|
| 764 |
'to_table' => 'ap', |
|
| 765 |
'to_id' => $form->{id},
|
|
| 766 |
); |
|
| 767 |
delete $form->{convert_from_oe_ids};
|
|
| 760 |
if ($form->{convert_from_oe_ids}) {
|
|
| 761 |
RecordLinks->create_links('dbh' => $dbh,
|
|
| 762 |
'mode' => 'ids', |
|
| 763 |
'from_table' => 'oe', |
|
| 764 |
'from_ids' => $form->{convert_from_oe_ids},
|
|
| 765 |
'to_table' => 'ap', |
|
| 766 |
'to_id' => $form->{id},
|
|
| 767 |
); |
|
| 768 |
delete $form->{convert_from_oe_ids};
|
|
| 769 |
} |
|
| 768 | 770 |
|
| 769 | 771 |
my @convert_from_do_ids = map { $_ * 1 } grep { $_ } split m/\s+/, $form->{convert_from_do_ids};
|
| 770 | 772 |
if (scalar @convert_from_do_ids) {
|
| SL/IS.pm | ||
|---|---|---|
| 1215 | 1215 |
} |
| 1216 | 1216 |
|
| 1217 | 1217 |
# Link this record to the records it was created from. |
| 1218 |
RecordLinks->create_links('dbh' => $dbh,
|
|
| 1219 |
'mode' => 'ids', |
|
| 1220 |
'from_table' => 'oe', |
|
| 1221 |
'from_ids' => $form->{convert_from_oe_ids},
|
|
| 1222 |
'to_table' => 'ar', |
|
| 1223 |
'to_id' => $form->{id},
|
|
| 1224 |
); |
|
| 1225 |
delete $form->{convert_from_oe_ids};
|
|
| 1218 |
if ($form->{convert_from_oe_ids}) {
|
|
| 1219 |
RecordLinks->create_links('dbh' => $dbh,
|
|
| 1220 |
'mode' => 'ids', |
|
| 1221 |
'from_table' => 'oe', |
|
| 1222 |
'from_ids' => $form->{convert_from_oe_ids},
|
|
| 1223 |
'to_table' => 'ar', |
|
| 1224 |
'to_id' => $form->{id},
|
|
| 1225 |
); |
|
| 1226 |
delete $form->{convert_from_oe_ids};
|
|
| 1227 |
} |
|
| 1226 | 1228 |
|
| 1227 | 1229 |
my @convert_from_do_ids = map { $_ * 1 } grep { $_ } split m/\s+/, $form->{convert_from_do_ids};
|
| 1228 | 1230 |
|
Auch abrufbar als: Unified diff
Konditional RecordLink save aufrufen (analog zu ar auch für oe)