my $SQLlog = 'SQL.log';
open (SQL_LOG, ">$SQLlog") or warn "Cannot open SQL commands logging at $SQLlog: $!\n";
print SQL_LOG "\n==========SQLCMDLOG===================BEGIN==============================\n";