View | Details | Raw Unified | Return to bug 7595
Collapse All | Expand All

(-)a/C4/Accounts.pm (-6 / +5 lines)
Lines 243-255 borrower number. Link Here
243
243
244
#'
244
#'
245
# FIXME - Okay, so what does the above actually _mean_?
245
# FIXME - Okay, so what does the above actually _mean_?
246
sub getnextacctno ($) {
246
sub getnextacctno {
247
    my ($borrowernumber) = shift or return undef;
247
    my ($borrowernumber) = shift or return;
248
    my $sth = C4::Context->dbh->prepare(
248
    my $sth = C4::Context->dbh->prepare(
249
        "SELECT accountno+1 FROM accountlines
249
        "SELECT accountno+1 FROM accountlines
250
         WHERE    (borrowernumber = ?)
250
            WHERE    (borrowernumber = ?)
251
         ORDER BY accountno DESC
251
            ORDER BY accountno DESC
252
		 LIMIT 1"
252
            LIMIT 1"
253
    );
253
    );
254
    $sth->execute($borrowernumber);
254
    $sth->execute($borrowernumber);
255
    return ($sth->fetchrow || 1);
255
    return ($sth->fetchrow || 1);
256
- 

Return to bug 7595