X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=acqui%2Fordered.pl;h=cdf2cd75c300ecaad1ea4fffd0e70e74f51ea94c;hb=HEAD;hp=0ae5dad6234a68bd3d2cde44427e44831870f928;hpb=ddb6883b578830c75a4d73ca84d630998f89ee6c;p=koha_gimpoz diff --git a/acqui/ordered.pl b/acqui/ordered.pl index 0ae5dad623..cdf2cd75c3 100755 --- a/acqui/ordered.pl +++ b/acqui/ordered.pl @@ -19,7 +19,7 @@ =head1 NAME -committed.pl +ordered.pl =head1 DESCRIPTION @@ -33,13 +33,11 @@ use warnings; use CGI; use C4::Auth; use C4::Output; -use C4::Dates; my $dbh = C4::Context->dbh; my $input = new CGI; my $fund_id = $input->param('fund'); -my $start = $input->param('start'); -my $end = $input->param('end'); +my $fund_code = $input->param('fund_code'); my ( $template, $loggedinuser, $cookie ) = get_template_and_user( { @@ -47,7 +45,7 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user( query => $input, type => "intranet", authnotrequired => 0, - flagsrequired => { acquisition => 1 }, + flagsrequired => { acquisition => '*' }, debug => 1, } ); @@ -97,14 +95,13 @@ while ( my $data = $sth->fetchrow_hashref ) { push @ordered, $data; $total += $subtotal; } - my $entrydate = C4::Dates->new( $data->{'entrydate'}, 'iso' ); - $data->{'entrydate'} = $entrydate->output("syspref"); } $total = sprintf( "%.2f", $total ); $template->{VARS}->{'fund'} = $fund_id; $template->{VARS}->{'ordered'} = \@ordered; $template->{VARS}->{'total'} = $total; +$template->{VARS}->{'fund_code'} = $fund_code; $sth->finish;