|
Lines 2093-2098
params:
Link Here
|
| 2093 |
budget |
2093 |
budget |
| 2094 |
orderstatus (note that orderstatus '' will retrieve orders |
2094 |
orderstatus (note that orderstatus '' will retrieve orders |
| 2095 |
of any status except cancelled) |
2095 |
of any status except cancelled) |
|
|
2096 |
is_standing |
| 2096 |
managing_library |
2097 |
managing_library |
| 2097 |
biblionumber |
2098 |
biblionumber |
| 2098 |
get_canceled_order (if set to a true value, cancelled orders will |
2099 |
get_canceled_order (if set to a true value, cancelled orders will |
|
Lines 2116-2121
returns:
Link Here
|
| 2116 |
'quantityreceived' => undef, |
2117 |
'quantityreceived' => undef, |
| 2117 |
'title' => 'The Adventures of Huckleberry Finn', |
2118 |
'title' => 'The Adventures of Huckleberry Finn', |
| 2118 |
'managing_library' => 'CPL' |
2119 |
'managing_library' => 'CPL' |
|
|
2120 |
'is_standing' => '1' |
| 2119 |
} |
2121 |
} |
| 2120 |
|
2122 |
|
| 2121 |
=cut |
2123 |
=cut |
|
Lines 2136-2141
sub GetHistory {
Link Here
|
| 2136 |
my $basketgroupname = $params{basketgroupname}; |
2138 |
my $basketgroupname = $params{basketgroupname}; |
| 2137 |
my $budget = $params{budget}; |
2139 |
my $budget = $params{budget}; |
| 2138 |
my $orderstatus = $params{orderstatus}; |
2140 |
my $orderstatus = $params{orderstatus}; |
|
|
2141 |
my $is_standing = $params{is_standing}; |
| 2139 |
my $biblionumber = $params{biblionumber}; |
2142 |
my $biblionumber = $params{biblionumber}; |
| 2140 |
my $get_canceled_order = $params{get_canceled_order} || 0; |
2143 |
my $get_canceled_order = $params{get_canceled_order} || 0; |
| 2141 |
my $ordernumber = $params{ordernumber}; |
2144 |
my $ordernumber = $params{ordernumber}; |
|
Lines 2176-2181
sub GetHistory {
Link Here
|
| 2176 |
aqbasket.basketname, |
2179 |
aqbasket.basketname, |
| 2177 |
aqbasket.basketgroupid, |
2180 |
aqbasket.basketgroupid, |
| 2178 |
aqbasket.authorisedby, |
2181 |
aqbasket.authorisedby, |
|
|
2182 |
aqbasket.is_standing, |
| 2179 |
concat( borrowers.firstname,' ',borrowers.surname) AS authorisedbyname, |
2183 |
concat( borrowers.firstname,' ',borrowers.surname) AS authorisedbyname, |
| 2180 |
branch as managing_library, |
2184 |
branch as managing_library, |
| 2181 |
aqbasketgroups.name as groupname, |
2185 |
aqbasketgroups.name as groupname, |
|
Lines 2269-2274
sub GetHistory {
Link Here
|
| 2269 |
push @query_params, "$orderstatus"; |
2273 |
push @query_params, "$orderstatus"; |
| 2270 |
} |
2274 |
} |
| 2271 |
|
2275 |
|
|
|
2276 |
if ( $is_standing ) { |
| 2277 |
$query .= " AND is_standing = ? "; |
| 2278 |
push @query_params, $is_standing; |
| 2279 |
} |
| 2280 |
|
| 2272 |
if ($basket) { |
2281 |
if ($basket) { |
| 2273 |
if ($basket =~ m/^\d+$/) { |
2282 |
if ($basket =~ m/^\d+$/) { |
| 2274 |
$query .= " AND aqorders.basketno = ? "; |
2283 |
$query .= " AND aqorders.basketno = ? "; |