$rec->[IMP_WG]    = defined $rec->[IMP_WG]  ? $rec->[IMP_WG]  : '';
$rec->[CSC_HAN]   = defined $rec->[CSC_HAN] ? $rec->[CSC_HAN] : '';
$rec->[CLASSIF]   = defined $rec->[CLASSIF] ? $rec->[CLASSIF] : '';
$rec->[SRV_PLT]   = defined $rec->[SRV_PLT] ? $rec->[SRV_PLT] : '';

print STDERR "$rec->[IMP_WG] $rec->[CSC_HAN]\n";

if ( $rec->[IMP_WG] ne '' && $rec->[CSC_HAN] eq '1' )
{
  print "$rec->[CLASSIF] $rec->[IMP_WG] $rec->[SRV_PLT]\n";
}