Lines 126-132
if ($op eq 'add_form') {
Link Here
|
126 |
elsif ($op eq 'add_validate') { |
126 |
elsif ($op eq 'add_validate') { |
127 |
my $bookfundname = $input->param('bookfundname'); |
127 |
my $bookfundname = $input->param('bookfundname'); |
128 |
my $branchcode = $input->param('branchcode') || undef; |
128 |
my $branchcode = $input->param('branchcode') || undef; |
129 |
my $number = Countbookfund($bookfundid,$branchcodeid); |
129 |
my $number = Countbookfund($bookfundid); |
130 |
if ($number == 0 ) { |
130 |
if ($number == 0 ) { |
131 |
NewBookFund( |
131 |
NewBookFund( |
132 |
$bookfundid, |
132 |
$bookfundid, |
Lines 134-141
elsif ($op eq 'add_validate') {
Link Here
|
134 |
$input->param('branchcode')||'' |
134 |
$input->param('branchcode')||'' |
135 |
); |
135 |
); |
136 |
} |
136 |
} |
137 |
print $input->redirect('aqbookfund.pl'); # FIXME: unnecessary redirect |
137 |
$template->param(error_bookfundid_exist => $number); |
138 |
exit; |
|
|
139 |
# END $OP eq ADD_VALIDATE |
138 |
# END $OP eq ADD_VALIDATE |
140 |
} |
139 |
} |
141 |
|
140 |
|