VantagePro.pm constructor 

sub new {
  my $class = shift;
  my $self  = $class->SUPER::new(@_);
  return $self;
}