Lines 66-75
my ($template, $loggedinuser, $cookie) = get_template_and_user(
Link Here
|
66 |
); |
66 |
); |
67 |
|
67 |
|
68 |
#print $input->header(); |
68 |
#print $input->header(); |
69 |
my $supplier=$input->param('supplier'); |
69 |
my $booksellerid=$input->param('booksellerid'); |
70 |
#print startpage; |
70 |
#print startpage; |
71 |
my %data; |
71 |
my %data; |
72 |
$data{'booksellerid'}=$input->param('booksellerid'); |
72 |
$data{'id'}=$booksellerid; |
73 |
|
73 |
|
74 |
$data{'name'}=$input->param('company'); |
74 |
$data{'name'}=$input->param('company'); |
75 |
$data{'postal'}=$input->param('company_postal'); |
75 |
$data{'postal'}=$input->param('company_postal'); |
Lines 109-121
if ($gstrate eq '') {
Link Here
|
109 |
$data{'discount'}=$input->param('discount'); |
109 |
$data{'discount'}=$input->param('discount'); |
110 |
$data{'active'}=$input->param('status'); |
110 |
$data{'active'}=$input->param('status'); |
111 |
if($data{'name'}) { |
111 |
if($data{'name'}) { |
112 |
if ($data{'booksellerid'}){ |
112 |
if ($data{'id'}){ |
113 |
ModBookseller(\%data); |
113 |
ModBookseller(\%data); |
114 |
} else { |
114 |
} else { |
115 |
$data{booksellerid}=AddBookseller(\%data); |
115 |
$data{id}=AddBookseller(\%data); |
116 |
} |
116 |
} |
117 |
#redirect to booksellers.pl |
117 |
#redirect to booksellers.pl |
118 |
print $input->redirect("booksellers.pl?booksellerid=".$data{booksellerid}); |
118 |
print $input->redirect("booksellers.pl?booksellerid=".$data{id}); |
119 |
} else { |
119 |
} else { |
120 |
print $input->redirect("supplier.pl?op=enter"); # fail silently. |
120 |
print $input->redirect("supplier.pl?op=enter"); # fail silently. |
121 |
} |
121 |
} |