Lines 5692-5704
if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) {
Link Here
|
5692 |
SELECT * FROM accountlines |
5692 |
SELECT * FROM accountlines |
5693 |
WHERE ( accounttype = 'FU' OR accounttype = 'F' ) |
5693 |
WHERE ( accounttype = 'FU' OR accounttype = 'F' ) |
5694 |
AND description like '%23:59%' |
5694 |
AND description like '%23:59%' |
5695 |
ORDER BY borrowernumber, itemnumber, accountno, description |
5695 |
ORDER BY borrowernumber, itemnumber, accountno, description, timestamp DESC |
5696 |
"; |
5696 |
"; |
5697 |
my $sth = $dbh->prepare( $query ); |
5697 |
my $sth = $dbh->prepare( $query ); |
5698 |
$sth->execute(); |
5698 |
$sth->execute(); |
5699 |
my $results = $sth->fetchall_arrayref({}); |
5699 |
my $results = $sth->fetchall_arrayref({}); |
5700 |
|
5700 |
|
5701 |
$query = "SELECT * FROM accountlines WHERE description LIKE ? AND description NOT LIKE ?"; |
5701 |
$query = "SELECT * FROM accountlines a WHERE a.description LIKE ? AND a.timestamp != ?"; |
5702 |
$sth = $dbh->prepare( $query ); |
5702 |
$sth = $dbh->prepare( $query ); |
5703 |
|
5703 |
|
5704 |
my @fines; |
5704 |
my @fines; |
Lines 5708-5714
if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) {
Link Here
|
5708 |
$description_to_match .= '%'; |
5708 |
$description_to_match .= '%'; |
5709 |
#warn "DESCRIPTION TO MATCH: " . $description_to_match; |
5709 |
#warn "DESCRIPTION TO MATCH: " . $description_to_match; |
5710 |
|
5710 |
|
5711 |
$sth->execute( $description_to_match, $keeper->{'description'} ); |
5711 |
$sth->execute( $description_to_match, $keeper->{'timestamp'} ); |
5712 |
|
5712 |
|
5713 |
my $has_changed = 0; |
5713 |
my $has_changed = 0; |
5714 |
|
5714 |
|
5715 |
- |
|
|