$hData{$aContr[1]}->{ $aContr[3] } = (
           {
           TYP   =>  $aContr[0],
           DV     =>  $aContr[1],
           STATUS =>  $aContr[2],
           PATTERN =>  $aContr[3],
           }
     }
  );