| Lines 127-133
          elsif ($op eq 'add') {
      
      
        Link Here | 
        
          | 127 |     $maxonsiteissueqty = undef if $maxonsiteissueqty !~ /^\d+/; | 127 |     $maxonsiteissueqty = undef if $maxonsiteissueqty !~ /^\d+/; | 
        
          | 128 |     my $issuelength  = $input->param('issuelength'); | 128 |     my $issuelength  = $input->param('issuelength'); | 
        
          | 129 |     my $lengthunit  = $input->param('lengthunit'); | 129 |     my $lengthunit  = $input->param('lengthunit'); | 
          
            
              | 130 |     my $hardduedate = $input->param('hardduedate'); | 130 |     my $hardduedate = $input->param('hardduedate') || undef; | 
        
          | 131 |     $hardduedate = eval { dt_from_string( $input->param('hardduedate') ) } if ( $hardduedate ); | 131 |     $hardduedate = eval { dt_from_string( $input->param('hardduedate') ) } if ( $hardduedate ); | 
        
          | 132 |     $hardduedate = output_pref( { dt => $hardduedate, dateonly => 1, dateformat => 'iso' } ) if ( $hardduedate ); | 132 |     $hardduedate = output_pref( { dt => $hardduedate, dateonly => 1, dateformat => 'iso' } ) if ( $hardduedate ); | 
        
          | 133 |     my $hardduedatecompare = $input->param('hardduedatecompare'); | 133 |     my $hardduedatecompare = $input->param('hardduedatecompare'); | 
            
              | 134 | -  |  |  |