$data{'invoiceprice'}=$input->param('invoice_currency');
$data{'gstreg'}=$input->param('gst');
$data{'listincgst'}=$input->param('list_gst');
-$data{'invoiceincgst'}=$input->param('invoiceincgst');
+$data{'invoiceincgst'}=$input->param('invoice_gst');
$data{'discount'}=$input->param('discount');
-my $id=$input->param('id');
-if ($data{'id'} != 0){
- ModBookseller(\%data);
+if($data{'name'}) {
+ if ($data{'id'}){
+ ModBookseller(\%data);
+ } else {
+ $data{id}=AddBookseller(\%data);
+ }
+#redirect to booksellers.pl
+print $input->redirect("booksellers.pl?id=".$data{id});
} else {
- $id=AddBookseller(\%data);
+print $input->redirect("supplier.pl?op=enter"); # fail silently.
}
-
-#redirect to booksellers.pl
-print $input->redirect("booksellers.pl?supplier=$id");