my $report_date		= "\#".&UnixDate(&ParseDate("3/19/2003"), "%m%/%d%/%Y")."\#";
my $start_date		= "\#".&UnixDate(&ParseDate("3/19/2003"), "%m%/%d%/%Y")."\#";
my $end_date		= "\#".&UnixDate(&ParseDate("3/20/2003"), "%m%/%d%/%Y")."\#";

my ($DaysOpen, $Priority, $Status)	= undef;
my ($WO2, $Ticket, $DateOpened, $ClearDate, $SiteCode,  $Problem1, $SiteCall1, $Dispatch, $Troubleshooting, $Solution1 )= undef;

$sqlstatement= qq (
	SELECT WorkOrd.WO2, WorkOrd.ClearDate
	from WorkOrd
	where WorkOrd.StatCode5 = 'C' and ( 
		WorkOrd.ClearDate is NULL or ( 
			WorkOrd.ClearDate  BETWEEN ? and  ?
		)
	)
);

print("Report run on $report_date \t Report runs from $start_date to $end_date.\n");

$sth = $dbh->prepare($sqlstatement) or  die "Could not prepare statement. Error:$sth->errstr()\n";
$sth->execute($start_date, $end_date) or  die "Could not execute statement. Error:$sth->errstr()\n";