#create customer DB
print $Q_FH "INSERT INTO CUSOMER 
           (customer_id, company_name)\n";
print $Q_FH "VALUES";
print $Q_FH join(',', map{"\n($cust_id_href->{$_}, $_)"} keys %$cust_id_href);
print $Q_FH ";\n";

#create vendor DB
print $Q_FH "INSERT INTO VENDOR (vendor_id, company_name)\n";
print $Q_FH "VALUES";
print $Q_FH join(',', map{"\n($vendor_id_href->{$_}, $_)"} keys %$vendor_id_href);
print $Q_FH ";\n";