my $crTmpMRN = qq{create table #mrns (PAT_MRN_ID varchar(25))};
$dbh->do($crTmpMRN);

my $mrn;
my $name;
my $fileRowCount=0;
my $dbRowCount=0;
my $distinctMRNCount = 0;
#for some reason SybaseIQ is trying to insert $mrn as an integer
my $insertMRNQuery = qq{insert #mrns (PAT_MRN_ID) values (?)};
my $sth=$dbh->prepare($insertMRNQuery);
open (MRNFILE,"$baseDir$mrn_file") or die "Can't read file $baseDir$mrn_file [$!]\n";
while (<MRNFILE>) {
	chomp ($_);
	($mrn,$name)=split('\t',$_);
	#uses 10 character MRNs
	$mrn = substr '0000000000'.$mrn, -10;
	$sth->execute($mrn);
	$fileRowCount ++;
	print qq{'$mrn'\n};
}
close (MRNFILE);
print '$fileRowCount: '.$fileRowCount."\n";