| 
      
      
        Link Here
      
     | 
  
        
          | 69 | 
          );  | 
          69 | 
          );  | 
        
        
          | 70 | 
           | 
          70 | 
           | 
        
        
          | 71 | 
          #parameters:  | 
          71 | 
          #parameters:  | 
        
          
            
              | 72 | 
              my $booksellerid = scalar $input->param('booksellerid'); | 
              72 | 
              my $booksellerid = $input->param('booksellerid'); | 
            
            
              | 73 | 
              my $basketno = scalar $input->param('basketno'); | 
              73 | 
              my $basketno = $input->param('basketno'); | 
            
        
          | 74 | 
          my $basket;  | 
          74 | 
          my $basket;  | 
        
          
            
              | 75 | 
              my $op = scalar $input->param('op'); | 
              75 | 
              my $op = $input->param('op'); | 
            
            
              | 76 | 
              my $is_an_edit = scalar $input->param('is_an_edit'); | 
              76 | 
              my $is_an_edit = $input->param('is_an_edit'); | 
            
        
          | 77 | 
           | 
          77 | 
           | 
        
        
          | 78 | 
          if ( $op eq 'add_form' ) { | 
          78 | 
          if ( $op eq 'add_form' ) { | 
        
        
          | 79 | 
              my @contractloop;  | 
          79 | 
              my @contractloop;  | 
        
            
              | 80 | 
              -   | 
               | 
               |