Lines 326-331
use C4::Biblio qw( GetMarcFromKohaField );
Link Here
|
326 |
} |
326 |
} |
327 |
} |
327 |
} |
328 |
|
328 |
|
|
|
329 |
{ |
330 |
# search patrons that have date fields that are 0000-00-00 |
331 |
foreach my $date_type (qw(dateofbirth dateenrolled dateexpiry date_renewed lastseen updated_on_debarred)) { |
332 |
my $borrowers = Koha::Patrons->search( { $date_type=>'0000-00-00' } ); |
333 |
while (my $borrower = $borrowers->next()) { |
334 |
$borrower->$date_type(undef)->store(); |
335 |
} |
336 |
} |
337 |
} |
338 |
|
329 |
{ |
339 |
{ |
330 |
my @loop_borrowers_relationships; |
340 |
my @loop_borrowers_relationships; |
331 |
my @guarantor_ids = Koha::Patron::Relationships->_resultset->get_column('guarantor_id')->all(); |
341 |
my @guarantor_ids = Koha::Patron::Relationships->_resultset->get_column('guarantor_id')->all(); |
332 |
- |
|
|