for(qw(ID APP X IMG IMGHV)){
    $self->{$_} = shift(@params);
  }   
  $self->{HV} = 0;