$Text::Wrap::columns = 35;
   my $q = wrap ('','',$qa{$isin}) if defined $qa{$_};
   my $i = wrap ('','',$ib{$isin}) if defined $ib{$isin};
   my $j = wrap ('','',$jk{$isin}) if defined $jk{$isin};
   my $d = wrap ('','',$da{$isin}) if defined $da{$isin};
                       			
   push @data, [$q, $i, $j, $d];      
   $row++;
   ## $dd is a "Delta_Days" value from Date::Calc
   $worksheet->set_row($row-1, undef, $new) if $dd <= 7;
   $worksheet->set_row($row-1, 60, $notnew) if $dd > 7 and $dd <=14;
   $worksheet->set_row($row-1, 60, $stale) if $dd > 14;
   $worksheet->write('A'.$row, \@data);