Lines 561-566
sub GetCorruptedData {
Link Here
|
561 |
q|SELECT b.biblionumber FROM biblio b JOIN deletedbiblio db ON b.biblionumber=db.biblionumber|, |
561 |
q|SELECT b.biblionumber FROM biblio b JOIN deletedbiblio db ON b.biblionumber=db.biblionumber|, |
562 |
{ Slice => {} } |
562 |
{ Slice => {} } |
563 |
); |
563 |
); |
|
|
564 |
my $biblioitems = $dbh->selectall_arrayref( |
565 |
q|SELECT b.biblioitemnumber FROM biblioitems b JOIN deletedbiblioitems db ON b.biblioitemnumber=db.biblioitemnumber|, |
566 |
{ Slice => {} } |
567 |
); |
564 |
my $items = $dbh->selectall_arrayref( |
568 |
my $items = $dbh->selectall_arrayref( |
565 |
q|SELECT i.itemnumber FROM items i JOIN deleteditems di ON i.itemnumber=di.itemnumber|, |
569 |
q|SELECT i.itemnumber FROM items i JOIN deleteditems di ON i.itemnumber=di.itemnumber|, |
566 |
{ Slice => {} } |
570 |
{ Slice => {} } |
Lines 590-595
sub GetCorruptedData {
Link Here
|
590 |
: () |
594 |
: () |
591 |
), |
595 |
), |
592 |
( |
596 |
( |
|
|
597 |
@$biblioitems |
598 |
? { entity => 'biblioitems', col_name => 'biblioitemnumber', rows => $biblioitems, tables => ['biblioitems', 'deletedbiblioitems'] } |
599 |
: () |
600 |
), |
601 |
( |
593 |
@$items ? { entity => 'items', col_name => 'itemnumber', rows => $items, tables => [ 'items', 'deleteditems' ] } |
602 |
@$items ? { entity => 'items', col_name => 'itemnumber', rows => $items, tables => [ 'items', 'deleteditems' ] } |
594 |
: () |
603 |
: () |
595 |
), |
604 |
), |
596 |
- |
|
|