|
Lines 263-269
elsif ($op eq 'add') {
Link Here
|
| 263 |
my $maxissueqty = strip_non_numeric( scalar $input->param('maxissueqty') ); |
263 |
my $maxissueqty = strip_non_numeric( scalar $input->param('maxissueqty') ); |
| 264 |
my $maxonsiteissueqty = strip_non_numeric( scalar $input->param('maxonsiteissueqty') ); |
264 |
my $maxonsiteissueqty = strip_non_numeric( scalar $input->param('maxonsiteissueqty') ); |
| 265 |
my $renewalsallowed = $input->param('renewalsallowed'); |
265 |
my $renewalsallowed = $input->param('renewalsallowed'); |
| 266 |
my $unseen_renewals_allowed = strip_non_numeric( scalar $input->param('unseen_renewals_allowed') ) // q{}; |
266 |
my $unseen_renewals_allowed = defined $input->param('unseen_renewals_allowed') ? strip_non_numeric( scalar $input->param('unseen_renewals_allowed') ) : q{}; |
| 267 |
my $renewalperiod = $input->param('renewalperiod'); |
267 |
my $renewalperiod = $input->param('renewalperiod'); |
| 268 |
my $norenewalbefore = $input->param('norenewalbefore'); |
268 |
my $norenewalbefore = $input->param('norenewalbefore'); |
| 269 |
$norenewalbefore = q{} if $norenewalbefore =~ /^\s*$/; |
269 |
$norenewalbefore = q{} if $norenewalbefore =~ /^\s*$/; |
| 270 |
- |
|
|