my @row_A_count_A_Ref_vs_Comp;
	  my @fields_A_count_A_Ref_vs_Comp;
	  my @record_A_count_A_Ref_vs_Comp;
	  

	  print BILATERAL_COMPARISONS_A   "$sql_count_A_Ref_vs_Comp";


	  while(my @row_A_count_A_Ref_vs_Comp = $sth_Count_Ref_vs_Comp->fetchrow_array()) { 
	      
	           
	      
	      print BILATERAL_COMPARISONS_A   "\t\t\t\t";
	      	      
	      print BILATERAL_COMPARISONS_A  "$entry_no_new_MINUS_ONE\t";     
	      
	      local $\ = "\n"; 
	      local $, = "\t"; 
	      
	      print BILATERAL_COMPARISONS_A @row_A_count_A_Ref_vs_Comp;     
	      
	      my @record_A_count_A_Ref_vs_Comp = @row_A_count_A_Ref_vs_Comp;          
	      push(my @fields_A_count_A_Ref_vs_Comp, @record_A_count_A_Ref_vs_Comp);  
	      
	  }
	  $sth_Count_Ref_vs_Comp->finish();