projects
/
koha_fer
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 9850: Update Admin Help Files for 3.12
[koha_fer]
/
admin
/
check_parent_total.pl
diff --git
a/admin/check_parent_total.pl
b/admin/check_parent_total.pl
index
76b3e9a
..
f0f8c9b
100755
(executable)
--- a/
admin/check_parent_total.pl
+++ b/
admin/check_parent_total.pl
@@
-25,7
+25,7
@@
use C4::Output;
use C4::Auth;
use C4::Budgets;
use C4::Auth;
use C4::Budgets;
-=head1
+=head1
DESCRIPTION
This script checks the amount unallocated from the new parent budget , or the period - if no parent_id is given
This script checks the amount unallocated from the new parent budget , or the period - if no parent_id is given
@@
-62,7
+62,13
@@
my ($sub_unalloc , $period_sum, $budget_period_unalloc);
if ($parent) {
my $query = " SELECT SUM(budget_amount) as sum FROM aqbudgets where budget_parent_id = ? ";
my $sth = $dbh->prepare($query);
if ($parent) {
my $query = " SELECT SUM(budget_amount) as sum FROM aqbudgets where budget_parent_id = ? ";
my $sth = $dbh->prepare($query);
- $sth->execute( $parent->{'budget_id'} );
+ my @sql_params;
+ push @sql_params, $parent->{'budget_id'} ;
+ if ($budget_id){
+ $query.=qq| and budget_id <> ? |;
+ push @sql_params,$budget_id;
+ }
+ $sth->execute( @sql_params );
my $sum = $sth->fetchrow_hashref;
$sth->finish;
my $sum = $sth->fetchrow_hashref;
$sth->finish;
@@
-75,10
+81,16
@@
if ($parent) {
# ELSE , IF NO PARENT PASSED, THEN CHECK UNALLOCATED FOR PERIOD, IF NOT THEN RETURN 2
else {
my $query = qq| SELECT SUM(budget_amount) as sum
# ELSE , IF NO PARENT PASSED, THEN CHECK UNALLOCATED FOR PERIOD, IF NOT THEN RETURN 2
else {
my $query = qq| SELECT SUM(budget_amount) as sum
- FROM aqbudgets WHERE budget_period_id = ?|;
+ FROM aqbudgets WHERE budget_period_id = ? and budget_parent_id IS NULL |;
+ my @sql_params;
+ push @sql_params, $period_id;
+ if ($budget_id){
+ $query.=qq| and budget_id <> ? |;
+ push @sql_params,$budget_id;
+ }
- my $sth
= $dbh->prepare($query);
- $sth->execute(
$period_id );
+ my $sth = $dbh->prepare($query);
+ $sth->execute(
@sql_params);
$period_sum = $sth->fetchrow_hashref;
$sth->finish;
$budget_period_unalloc = $period->{'budget_period_total'} - $period_sum->{'sum'} if $period->{'budget_period_total'};
$period_sum = $sth->fetchrow_hashref;
$sth->finish;
$budget_period_unalloc = $period->{'budget_period_total'} - $period_sum->{'sum'} if $period->{'budget_period_total'};
@@
-95,7
+107,6
@@
if ( $parent_id) {
$returncode = 0;
}
$returncode = 0;
}
-$template->param( return => $returncode );
-output_html_with_http_headers $input, $cookie, $
template->output
;
+output_html_with_http_headers $input, $cookie, $
returncode
;
1;
1;