|
Lines 122-128
elsif ($op eq 'add') {
Link Here
|
| 122 |
$maxissueqty = undef if $maxissueqty !~ /^\d+/; |
122 |
$maxissueqty = undef if $maxissueqty !~ /^\d+/; |
| 123 |
my $issuelength = $input->param('issuelength'); |
123 |
my $issuelength = $input->param('issuelength'); |
| 124 |
my $lengthunit = $input->param('lengthunit'); |
124 |
my $lengthunit = $input->param('lengthunit'); |
| 125 |
my $hardduedate = eval { dt_from_string( $input->param('hardduedate') ) }; |
125 |
my $hardduedate = $input->param('hardduedate'); |
|
|
126 |
$hardduedate = eval { dt_from_string( $input->param('hardduedate') ) } if ( $hardduedate ); |
| 126 |
$hardduedate = output_pref( { dt => $hardduedate, dateonly => 1, dateformat => 'iso' } ) if ( $hardduedate ); |
127 |
$hardduedate = output_pref( { dt => $hardduedate, dateonly => 1, dateformat => 'iso' } ) if ( $hardduedate ); |
| 127 |
my $hardduedatecompare = $input->param('hardduedatecompare'); |
128 |
my $hardduedatecompare = $input->param('hardduedatecompare'); |
| 128 |
my $rentaldiscount = $input->param('rentaldiscount'); |
129 |
my $rentaldiscount = $input->param('rentaldiscount'); |
| 129 |
- |
|
|