#############################
  $db_array_ref = $WinSelSth->fetchall_arrayref() ;
  for my $row (@$db_array_ref) {
    my ($req, $lob, $cycle, $status, $comments) = @$row ;
#############################