X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=acqui%2Fupdatesupplier.pl;h=7b3bf9d6d8c403bd403ced759a29163ffe9226d5;hb=96b6f39e7a51ce414083b15125685a37844c5f29;hp=1d487cb7ad42250983472bbb4f54f31ab5e69fe8;hpb=a8222aeeb1169d7b1939d1e64c319a16e3846e8c;p=koha.git diff --git a/acqui/updatesupplier.pl b/acqui/updatesupplier.pl index 1d487cb7ad..7b3bf9d6d8 100755 --- a/acqui/updatesupplier.pl +++ b/acqui/updatesupplier.pl @@ -48,7 +48,8 @@ use strict; #use warnings; FIXME - Bug 2505 use C4::Context; use C4::Auth; -use C4::Bookseller; + +use C4::Bookseller qw( ModBookseller AddBookseller ); use C4::Biblio; use C4::Output; use CGI; @@ -65,10 +66,10 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user( ); #print $input->header(); -my $supplier=$input->param('supplier'); +my $booksellerid=$input->param('booksellerid'); #print startpage; my %data; -$data{'id'}=$input->param('id'); +$data{'id'}=$booksellerid; $data{'name'}=$input->param('company'); $data{'postal'}=$input->param('company_postal'); @@ -79,6 +80,7 @@ $data{'address2'}=$addresses[1]; $data{'address3'}=$addresses[2]; $data{'address4'}=$addresses[3]; $data{'phone'}=$input->param('company_phone'); +$data{'accountnumber'}=$input->param('accountnumber'); $data{'fax'}=$input->param('company_fax'); $data{'url'}=$input->param('website'); $data{'contact'}=$input->param('company_contact_name'); @@ -91,20 +93,16 @@ $data{'contnotes'}=$input->param('contact_notes'); # warn "".$data{'contnotes'}; $data{'notes'}=$input->param('notes'); $data{'active'}=$input->param('status'); -$data{'specialty'}=$input->param('publishers_imprints'); + $data{'listprice'}=$input->param('list_currency'); $data{'invoiceprice'}=$input->param('invoice_currency'); $data{'gstreg'}=$input->param('gst'); $data{'listincgst'}=$input->param('list_gst'); $data{'invoiceincgst'}=$input->param('invoice_gst'); #have to transform this into fraction so it's easier to use -my $gstrate = $input->param('gstrate'); -if ($gstrate eq '') { - $data{'gstrate'} = undef; -} else { - $data{'gstrate'} = $input->param('gstrate')/100; -} -$data{'discount'}=$input->param('discount'); +$data{'gstrate'} = $input->param('gstrate'); +$data{'discount'} = $input->param('discount'); +$data{deliverytime} = $input->param('deliverytime'); $data{'active'}=$input->param('status'); if($data{'name'}) { if ($data{'id'}){ @@ -113,7 +111,7 @@ if($data{'name'}) { $data{id}=AddBookseller(\%data); } #redirect to booksellers.pl -print $input->redirect("booksellers.pl?id=".$data{id}); +print $input->redirect("booksellers.pl?booksellerid=".$data{id}); } else { print $input->redirect("supplier.pl?op=enter"); # fail silently. }