X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=acqui%2Funcertainprice.pl;h=fd76e473fb4d99c838a8cf56caf1007b2ac3e7a9;hb=95e2754af6a2dbd5f042a1c3504488f5de8c8d23;hp=f50a1b74c22f2845b2ca11f9e6e7543e0c173055;hpb=8ad2c7d7acc3cb0033426bd78928214a22ad9dd1;p=koha_fer diff --git a/acqui/uncertainprice.pl b/acqui/uncertainprice.pl index f50a1b74c2..fd76e473fb 100755 --- a/acqui/uncertainprice.pl +++ b/acqui/uncertainprice.pl @@ -17,9 +17,9 @@ # WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR # A PARTICULAR PURPOSE. See the GNU General Public License for more details. # -# You should have received a copy of the GNU General Public License along with -# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA +# You should have received a copy of the GNU General Public License along +# with Koha; if not, write to the Free Software Foundation, Inc., +# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. =head1 NAME @@ -52,7 +52,7 @@ use C4::Output; use CGI; use C4::Bookseller qw/GetBookSellerFromId/; -use C4::Acquisition qw/GetPendingOrders GetOrder ModOrder/; +use C4::Acquisition qw/SearchOrders GetOrder ModOrder/; use C4::Biblio qw/GetBiblioData/; my $input=new CGI; @@ -73,7 +73,12 @@ my $owner = $input->param('owner') || 0 ; # flag to see only "my" orders, or eve my $bookseller = &GetBookSellerFromId($booksellerid); #show all orders that have uncertain price for the bookseller -my $pendingorders = &GetPendingOrders($booksellerid,0,$owner,$basketno); +my $pendingorders = SearchOrders({ + booksellerid => $booksellerid, + owner => $owner, + basketno => $basketno, + pending => 1, +}); my @orders; foreach my $order (@{$pendingorders}) { @@ -127,6 +132,8 @@ $template->param( uncertainpriceorders => \@orders, booksellercontemail => $bookseller->{'contemail'}, booksellercontnotes => $bookseller->{'contnotes'}, booksellernotes => $bookseller->{'notes'}, + basketcount => $bookseller->{'basketcount'}, + subscriptioncount => $bookseller->{'subscriptioncount'}, owner => $owner, scriptname => "/cgi-bin/koha/acqui/uncertainprice.pl"); output_html_with_http_headers $input, $cookie, $template->output;