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