Lines 1942-1947
sub GetHistory {
Link Here
|
1942 |
aqorders.ordernumber, |
1942 |
aqorders.ordernumber, |
1943 |
aqinvoices.invoicenumber, |
1943 |
aqinvoices.invoicenumber, |
1944 |
aqbooksellers.id as id, |
1944 |
aqbooksellers.id as id, |
|
|
1945 |
aqorders.branch, |
1946 |
aqorders.budget_id, |
1945 |
aqorders.biblionumber |
1947 |
aqorders.biblionumber |
1946 |
FROM aqorders |
1948 |
FROM aqorders |
1947 |
LEFT JOIN aqbasket ON aqorders.basketno=aqbasket.basketno |
1949 |
LEFT JOIN aqbasket ON aqorders.basketno=aqbasket.basketno |
Lines 2030-2035
sub GetHistory {
Link Here
|
2030 |
$total_qty += $line->{'quantity'}; |
2032 |
$total_qty += $line->{'quantity'}; |
2031 |
$total_qtyreceived += $line->{'quantityreceived'}; |
2033 |
$total_qtyreceived += $line->{'quantityreceived'}; |
2032 |
$total_price += $line->{'quantity'} * $line->{'ecost'}; |
2034 |
$total_price += $line->{'quantity'} * $line->{'ecost'}; |
|
|
2035 |
my $budget = C4::Budgets::GetBudget($line->{budget_id}); |
2036 |
$line->{budget_name} = $budget->{budget_name} if $budget; |
2037 |
$line->{branchname} = C4::Branch::GetBranchName($line->{branch}); |
2033 |
} |
2038 |
} |
2034 |
return \@order_loop, $total_qty, $total_price, $total_qtyreceived; |
2039 |
return \@order_loop, $total_qty, $total_price, $total_qtyreceived; |
2035 |
} |
2040 |
} |