# read trans barcode 
		$primer = Util::Util::fileDecode($transFile);
		chomp($primer);
		print "(",$primer,")\n";
		# set transaction folder path
		my $transPath = $wDir. "plsTrans/$primer/tmp/";
		if(-d $transPath){
		   print "Transpath : " . $transPath . "\n";
		   print "FileName : ".  $transFile . "\n";
		   print "Cmd      : >cp $transFile $transPath<\n";
		   system("mv",$transFile,$transPath);
		}