|
Lines 433-439
sub _should_be_fk {
Link Here
|
| 433 |
# A column is not marked as FK, but a belongs_to relation is defined |
433 |
# A column is not marked as FK, but a belongs_to relation is defined |
| 434 |
my ( $source, $column ) = @_; |
434 |
my ( $source, $column ) = @_; |
| 435 |
my $inconsistencies = { |
435 |
my $inconsistencies = { |
| 436 |
'Item.biblionumber' => 1, #FIXME: Please remove me when I become FK |
436 |
'Item.biblionumber' => 1, #FIXME: Please remove me when I become FK |
|
|
437 |
'ReturnClaim.issue_id' => |
| 438 |
1, #FIXME: Please remove me when we merge issues and old_issues |
| 437 |
}; |
439 |
}; |
| 438 |
return $inconsistencies->{ "$source.$column" }; |
440 |
return $inconsistencies->{ "$source.$column" }; |
| 439 |
} |
441 |
} |
|
Lines 601-610
sub _gen_default_values {
Link Here
|
| 601 |
suggesteddate => dt_from_string()->ymd, |
603 |
suggesteddate => dt_from_string()->ymd, |
| 602 |
STATUS => 'ASKED' |
604 |
STATUS => 'ASKED' |
| 603 |
}, |
605 |
}, |
| 604 |
ReturnClaim => { |
|
|
| 605 |
issue_id => undef, # It should be a FK but we removed it |
| 606 |
# We don't want to generate a random value |
| 607 |
}, |
| 608 |
ImportItem => { |
606 |
ImportItem => { |
| 609 |
status => 'staged', |
607 |
status => 'staged', |
| 610 |
import_error => undef |
608 |
import_error => undef |
| 611 |
- |
|
|