|
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 |
- |
|
|