while( @data = $query->fetchrow ) {
$rowcolor = $rowcolor == $color2 ? $color1:$color2;
print REPORT_FILE qq(