$destRow = $current->{'rowTop'} + $row - 2;

            if ($destRow>$screen->{'height'})
                  {
                  $destRow = $screen->{'height'};
                  }