Lines 2006-2011
sub GetLateOrders {
Link Here
|
2006 |
$from .= ' AND borrowers.branchcode LIKE ? '; |
2006 |
$from .= ' AND borrowers.branchcode LIKE ? '; |
2007 |
push @query_params, C4::Context->userenv->{branch}; |
2007 |
push @query_params, C4::Context->userenv->{branch}; |
2008 |
} |
2008 |
} |
|
|
2009 |
$from .= " AND orderstatus <> 4 "; |
2009 |
my $query = "$select $from $having\nORDER BY latesince, basketno, borrowers.branchcode, supplier"; |
2010 |
my $query = "$select $from $having\nORDER BY latesince, basketno, borrowers.branchcode, supplier"; |
2010 |
$debug and print STDERR "GetLateOrders query: $query\nGetLateOrders args: " . join(" ",@query_params); |
2011 |
$debug and print STDERR "GetLateOrders query: $query\nGetLateOrders args: " . join(" ",@query_params); |
2011 |
my $sth = $dbh->prepare($query); |
2012 |
my $sth = $dbh->prepare($query); |
2012 |
- |
|
|